Util.Setmodule type OrderedType = sig ... endmodule type ExtS = sig ... endmodule type HashedType = sig ... endmodule Hashcons (M : OrderedType) (_ : HashedType with type t = M.t) : Hashcons.S with type t = Stdlib.Set.Make(M).t and type u = M.t -> M.tCreate hash-consing for sets. The hashing function provided must be compatible with the comparison function.