Module type Comparable.With_compare

val lexicographic : ('a -> 'a -> int) list -> 'a -> 'a -> int
val lift : ('a -> 'a -> 'result) -> f:('b -> 'a) -> 'b -> 'b -> 'result
val reverse : ('a -> 'a -> 'result) -> 'a -> 'a -> 'result
type !'a reversed = 'a
val compare_reversed : ('a -> 'a -> int) -> 'a reversed -> 'a reversed -> int
val equal : ('a -> 'a -> int) -> 'a -> 'a -> bool
val max : ('a -> 'a -> int) -> 'a -> 'a -> 'a
val min : ('a -> 'a -> int) -> 'a -> 'a -> 'a