Leftist Heaps
Implementation following Okasaki's book.
Sourcetype 'a iter = ('a -> unit) -> unit Sourcetype 'a gen = unit -> 'a option Sourcetype 'a ktree = unit -> [ `Nil | `Node of 'a * 'a ktree list ] A convenient version of Make that take a TOTAL_ORD instead of a partially ordered module. It allow to directly pass modules that implement compare without implementing leq explicitly