Module Binary_heap_test.IntMaxHeap

module IntMaxHeap: Binary_heap.BinaryHeap(sig

type t = int 

val compare : 'a -> 'a -> int

val show : int -> string

end)

type t = {

include struct ... end

val peek : t -> Ord.t option

val extract : t -> Ord.t option * t