Module Core_extended.Set_lang.Raw

type ('base, 'set) t = private
| Base of 'base
| Set of 'set
| Union of ('base'sett * ('base'sett
| Inter of ('base'sett * ('base'sett
| Diff of ('base'sett * ('base'sett
include sig ... end
val compare : ('base ‑> 'base ‑> int) ‑> ('set ‑> 'set ‑> int) ‑> ('base'sett ‑> ('base'sett ‑> int