Up
#
val is_empty : 'a
tree -> bool
#
val height : 'a
tree -> int
#
val singleton_tree : 'a
-> 'a
tree
#
val split_leftmost : 'a
tree -> 'a * 'a
tree
#
val split_rightmost : 'a
tree -> 'a * 'a
tree
#
val iter : ('a
-> unit)
-> 'a
tree -> unit
#
val fold : ('a
-> 'b
-> 'b)
-> 'a
tree -> 'b
-> 'b
end