A module containing the ad-hoc polymorphic comparison functions. Useful when
you want to use polymorphic compare in some small scope of a file within which
polymorphic compare has been hidden, typically by No_polymorphic_compare.
Signature
val
compare : 'a -> 'a -> int
val
ascending : 'a -> 'a -> int
ascending is identical to compare. descending x y = ascending y x. These are
intended to be mnemonic when used like List.sort ~cmp:ascending and List.sort
~cmp:descending, since they cause the list to be sorted in ascending or descending
order, respectively.