Module GapiDiscoveryV1Model.JsonSchema.Variant

module Variant: sig .. end

module Map: sig .. end

type t = {

	`discriminant : string;`	`(*`	The name of the type discriminant property.	`*)`
	`map : Map.t list;`	`(*`	The map of discriminant value to schema to use for parsing..	`*)`

}

val discriminant : (t, string) GapiLens.t

val map : (t,
        Map.t list)
       GapiLens.t

val empty : t

val render : t -> GapiJson.json_data_model list

val parse : t ->
       GapiJson.json_data_model -> t