Codec.Json
val encode : 'a Irmin.Type.t -> 'a -> string
val decode : 'a Irmin.Type.t -> string -> ('a, [ `Msg of string ]) Stdlib.result