sig   val w_day :     (MrMime_date.day,      ([> `Partial of Bytes.t * int * int * (int -> 'a) ] as 'a)      Encoder.partial)     Wrap.k1   val w_time :     (int * int * int option,      ([> `Partial of Bytes.t * int * int * (int -> 'a) ] as 'a)      Encoder.partial)     Wrap.k1   val w_zone :     (MrMime_date.zone,      ([> `Partial of Bytes.t * int * int * (int -> 'a) ] as 'a)      Encoder.partial)     Wrap.k1   val w_date :     (MrMime_date.date,      ([> `Partial of Bytes.t * int * int * (int -> 'a) ] as 'a)      Encoder.partial)     Wrap.k1 end