module Make:
type
elt = Ord.t
type
t =
| |
Empty |
| |
Node of t * elt * t * int |
val height : t -> int
val create : t -> elt -> t -> t
val bal : t -> elt -> t -> t
val add : elt -> t -> t
val join : t -> elt -> t -> t
val min_elt : t -> elt
val max_elt : t -> elt
val remove_min_elt : t -> t
val merge : t -> t -> t
val concat : t -> t -> t
val split : Ord.t -> t -> t * bool * t
val empty : t
val is_empty : t -> bool
val mem : Ord.t -> t -> bool
val singleton : elt -> t
val remove : Ord.t -> t -> t
val union : t -> t -> t
val inter : t -> t -> t
val diff : t -> t -> t
type
enumeration =
val cons_enum : t -> enumeration -> enumeration
val compare_aux : enumeration -> enumeration -> int
val compare : t -> t -> int
val equal : t -> t -> bool
val subset : t -> t -> bool
val iter : (elt -> 'a) -> t -> unit
val fold : (elt -> 'a -> 'a) -> t -> 'a -> 'a
val for_all : (elt -> bool) -> t -> bool
val exists : (elt -> bool) -> t -> bool
val filter : (elt -> bool) -> t -> t
val partition : (elt -> bool) -> t -> t * t
val cardinal : t -> int
val elements_aux : elt list -> t -> elt list
val elements : t -> elt list
val choose : t -> elt