Diagnostics helper: a short, readable case name for logging. Unwraps a Command<_>/Event<_> envelope to its payload (via IEnvelope), then a C# `union` to its active case (its generated `.Value`), and falls back to the type name — so F# DUs and plain payloads work too. Reflection-based; meant for logs, not hot paths.