payload as raw JSON
make Payload a true data type rather than a type synonym
instance Arbitrary Data.Aeson.Value
encode and decode Event and Payload correctly