sig
  type t
  val compare : Lwt_pqueue.OrderedType.t -> Lwt_pqueue.OrderedType.t -> int
end