Module CCHeap
Leftist Heaps
Implementation following Okasaki's book.
type 'a gen= unit -> 'a optiontype 'a klist= unit -> [ `Nil | `Cons of 'a * 'a klist ]type 'a ktree= unit -> [ `Nil | `Node of 'a * 'a ktree list ]type 'a printer= Format.formatter -> 'a -> unit
module type PARTIAL_ORD = sig ... endmodule type TOTAL_ORD = sig ... endmodule type S = sig ... end