sig
type compare =
[ `no_polymorphic_compare ] ->
[ `no_polymorphic_compare ] -> [ `no_polymorphic_compare ]
val compare : compare
val ( < ) : compare
val ( <= ) : compare
val ( > ) : compare
val ( >= ) : compare
val ( = ) : compare
val ( <> ) : compare
val equal : compare
val min : compare
val max : compare
val _squelch_unused_module_warning_ : unit
end