Set
type t
type elt
val singleton : elt -> t
val iter : (elt -> unit) -> t -> unit
val union : t -> t -> t
val inter : t -> t -> t