module IntMinHeap:Binary_heap.BinaryHeap(sig
typet =int
val compare : 'a -> 'a -> int
val show : int -> stringend)
type t = {
|
heap : |
|
index : |
}
include struct ... end
val peek : t -> Ord.t option
val extract : t -> Ord.t option * t