Values.KeyMapSourceval to_value :
('a * ObjectTypeKey.t list) list ->
[> `Map of
([> `String of 'a ]
* [> `List of
[> `Structure of
(string
* [> `List of
[> `Enum of string | `String of Name.t ] list ])
list ]
list ])
list ]