Module Id.Set
type elt = Id.tval empty : Id.Set.tval add : Id.Set.elt -> Id.Set.t -> Id.Set.tval elements : Id.Set.t -> Id.Set.elt listval iter : (Id.Set.elt -> unit) -> Id.Set.t -> unitval fold : (Id.Set.elt -> 'a -> 'a) -> Id.Set.t -> 'a -> 'a