module NodeMinHeap: Binary_heap.BinaryHeap(sig
Binary_heap.BinaryHeap
(
sig
type t = Huffman_coding.t
Huffman_coding.t
val compare : t -> t -> int
t -> t -> int
val show : t -> string
t -> string
end)
end
)
type t = {
heap : heap;
heap
index : int;
int
}
include struct ... end
val peek : t -> Ord.t option
t -> Ord.t option
val extract : t -> Ord.t option * t
t -> Ord.t option * t