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