sig
type 'a elt_
type 'a set
val create : int -> 'a Hash_set.Mono_or_poly.set
val add :
'a Hash_set.Mono_or_poly.set -> 'a Hash_set.Mono_or_poly.elt_ -> unit
val strict_add :
'a Hash_set.Mono_or_poly.set -> 'a Hash_set.Mono_or_poly.elt_ -> unit
val remove :
'a Hash_set.Mono_or_poly.set -> 'a Hash_set.Mono_or_poly.elt_ -> unit
val strict_remove :
'a Hash_set.Mono_or_poly.set -> 'a Hash_set.Mono_or_poly.elt_ -> unit
val clear : 'a Hash_set.Mono_or_poly.set -> unit
val fold :
f:('a -> 'b Hash_set.Mono_or_poly.elt_ -> 'a) ->
init:'a -> 'b Hash_set.Mono_or_poly.set -> 'a
val iter :
f:('a Hash_set.Mono_or_poly.elt_ -> unit) ->
'a Hash_set.Mono_or_poly.set -> unit
val length : 'a Hash_set.Mono_or_poly.set -> int
val mem :
'a Hash_set.Mono_or_poly.set -> 'a Hash_set.Mono_or_poly.elt_ -> bool
val of_list :
'a Hash_set.Mono_or_poly.elt_ list -> 'a Hash_set.Mono_or_poly.set
val to_list :
'a Hash_set.Mono_or_poly.set -> 'a Hash_set.Mono_or_poly.elt_ list
end