Module type Binary_heap.S

module type S = sig .. end

include Binary_search_tree.BST

val peek : t -> comparable option

val extract : t -> comparable option * t