val empty : 'a tree
val is_empty : 'a tree -> bool
val height : 'a tree -> int
val root : 'a tree -> 'a
val singleton_tree : 'a -> 'a tree
val iter : ('a -> unit) -> 'a tree -> unit
val fold : ('a -> 'b -> 'b) -> 'a tree -> 'b -> 'b
Private.AvlTree
Avltree