Make.2-S
type t
type elt = E.t
val singleton : elt -> t
val iter : ( elt -> unit ) -> t -> unit
val union : t -> t -> t
val inter : t -> t -> t