Functor Binary_search_tree.Make

module Make: 
functor (Ord : Ord.S) -> 
functor (Base : InputBST  with type comparable := Ord.t) -> sig .. end

include Base

val find : Base.t -> Ord.t -> bool

val height : Base.t -> int

val string_of_tree : t -> string