module type S_common =sig..end
include Comparable.Infix
val equal : comparable -> comparable -> boolval compare : comparable -> comparable -> intval ascending : comparable -> comparable -> intval descending : comparable -> comparable -> intval min : comparable -> comparable -> comparableval max : comparable -> comparable -> comparable