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