Json.Option
type 'a t = 'a option
val yojson_of_t : ('a -> [> `Null ] as 'b) -> 'c option -> 'd
val t_of_yojson : ([> `Null ] as 'a -> 'b) -> 'c -> 'd option