Values.MetricsSourceval to_value :
Metric.t list ->
[> `List of
[> `Structure of
(string
* [> `List of
[> `Structure of
(string * [> `String of DimensionName.t ]) list ]
list
| `String of Namespace.t ])
list ]
list ]