Util.Compare
Helpers to write comparison functions
type list =
| []
| :: : (('a -> 'a -> int) * 'a * 'a) * list -> list
val compare : list -> int
Compare the elements in the order they are given using the provided comparison function until the first non-zero result.