`sig
type 'a t
type 'a elt
val create : unit -> 'a Pqueue.MinPoly.t
val length : 'a Pqueue.MinPoly.t -> int
val is_empty : 'a Pqueue.MinPoly.t -> bool
val add : 'a Pqueue.MinPoly.t -> 'a Pqueue.MinPoly.elt -> unit
val add_iter :
'a Pqueue.MinPoly.t ->
(('a Pqueue.MinPoly.elt -> unit) -> 'x -> unit) -> 'x -> unit
val min_elt : 'a Pqueue.MinPoly.t -> 'a Pqueue.MinPoly.elt option
val get_min_elt : 'a Pqueue.MinPoly.t -> 'a Pqueue.MinPoly.elt
val pop_min : 'a Pqueue.MinPoly.t -> 'a Pqueue.MinPoly.elt option
val remove_min : 'a Pqueue.MinPoly.t -> unit
val clear : 'a Pqueue.MinPoly.t -> unit
val copy : 'a Pqueue.MinPoly.t -> 'a Pqueue.MinPoly.t
val of_array : 'a Pqueue.MinPoly.elt array -> 'a Pqueue.MinPoly.t
val of_list : 'a Pqueue.MinPoly.elt list -> 'a Pqueue.MinPoly.t
val of_iter :
(('a Pqueue.MinPoly.elt -> unit) -> 'x -> unit) ->
'x -> 'a Pqueue.MinPoly.t
val iter_unordered :
('a Pqueue.MinPoly.elt -> unit) -> 'a Pqueue.MinPoly.t -> unit
val fold_unordered :
('acc -> 'a Pqueue.MinPoly.elt -> 'acc) ->
'acc -> 'a Pqueue.MinPoly.t -> 'acc
end`