Module type Base__.Comparator.S

type t
type comparator_witness
val comparator : (tcomparator_witnesscomparator