Codec.Sarsi
data Event
getEvent
putEvent
data Message
getMessage
putMessage
data Location
getLocation
putLocation
data Level
getLevel
putLevel