sig   val suffixes : 'a list -> 'a list Choice.t   val permutations : 'a list -> 'Choice.Enum.t   val combinations : int -> 'a list -> 'Choice.Enum.t end