Bounded_heap.MakeSourcemodule E : Set.OrderedTypecreate size create a bounded sequence of at most size elements.
Raise Invalid_argument if size < 0 or size > Sys.max_array_length.
insert e b adds element e to bounded sequence b if:
b is not full (i.e, we have not inserted size elements until now); ore' from b such that E.compare e' e < 0.Worst-case complexity: O(log n) where n is the size of the heap.
get b returns the contents of b as a sorted list in increasing order according to E.compare.
Worst-case complexity: O(n log n) where n is the size of the heap.