Values.ProfileQuestionsSourceval to_value :
ProfileQuestion.t list ->
[> `List of
[> `Structure of
(string
* [> `Integer of MinSelectedProfileChoices.t
| `List of
[> `String of ChoiceId.t
| `Structure of (string * [> `String of ChoiceId.t ]) list ]
list
| `String of QuestionId.t ])
list ]
list ]