sig   val w_left :     (MrMime_msgID.local,      ([> `Partial of Bytes.t * int * int * (int -> 'a) ] as 'a)      Encoder.partial)     Wrap.k1   val w_right :     (MrMime_msgID.domain,      ([> `Partial of Bytes.t * int * int * (int -> 'a) ] as 'a)      Encoder.partial)     Wrap.k1   val w_msg_id :     (MrMime_msgID.msg_id,      ([> `Partial of Bytes.t * int * int * (int -> 'a) ] as 'a)      Encoder.partial)     Wrap.k1 end