JsonSchema.JE
val construct :
?include_default_fields:[ `Always | `Auto | `Never ] ->
't Json_encoding.encoding ->
't ->
repr_value
val destruct :
?ignore_extra_fields:bool ->
?bson_relaxation:bool ->
't Json_encoding.encoding ->
repr_value ->
't
val custom :
?is_object:bool ->
('t -> repr_value) ->
(repr_value -> 't) ->
schema:Json_schema.schema ->
't Json_encoding.encoding