class ['a] enumeration_cp : (string * 'a) list -> ?group:group -> string list -> ?short_name:string -> 'a -> string -> ['a] cp
['a]
(string * 'a) list -> ?group:group -> string list -> ?short_name:string -> 'a -> string ->
cp