To_yojson.Input
type ('input_type, 'a, 'c) t = < to_json : ( 'input_type -> Yojson.Safe.t ) Core_kernel.ref ; contramap : ( 'c -> 'input_type ) Core_kernel.ref ; skip : bool Core_kernel.ref.. > as 'a