sig   type 'a t   val v : id:string -> 'Omod_support.Codec.t   val write :     'Omod_support.Codec.t ->     Omod.fpath -> '-> (unit, string) Pervasives.result   val read :     'Omod_support.Codec.t -> Omod.fpath -> ('a, string) Pervasives.result end