Module type Binary_search_tree.BSTPassThruFields

module type BSTPassThruFields = sig .. end

type t 

type comparable 

val empty_tree : t

val insert : t ->
       comparable ->
       t