Module type Lwt_pqueue.OrderedType module type OrderedType = sig..endtype tval compare : t -> t -> int