Values.PartsSourceval to_value :
Part.t list ->
[> `List of
[> `Structure of
(string
* [> `Integer of PartNumber.t
| `Long of Size.t
| `String of ETag.t
| `Timestamp of LastModified.t ])
list ]
list ]