Module Total_map.Enumeration
type ('a, 'witness) t = private {}
module type S = sig ... endmodule type S_fc = sig ... endmodule Make : functor (T : sig ... end) -> S with type t := T.tval make : all:'a list -> (module S_fc with type enumerable_t = 'a)