Values_0.ContactReferencesSourceval to_value :
('a * Reference.t) list ->
[> `Map of
([> `String of 'a ]
* [> `Structure of
(string * [> `Enum of string | `String of ReferenceValue.t ])
list ])
list ]