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