Base.Decode
val (>>=) : 'a {SD}1.t -> ('a -> 'b {SD}1.t) -> 'b {SD}1.t
val (<$>) : ('a -> 'b) -> 'a {SD}1.t -> 'b {SD}1.t
val body : body {SD}1.t
val sign : sign {SD}1.t
val via : via {SD}1.t
val unicast_header : unicast_header Seaboar__.Decode.t
val multicast_header : int -> multicast_header Seaboar__.Decode.t
val message : int -> t {SD}1.parser