Module Comparator.Poly

type 'a t = 'a
type comparator_witness
val comparator : ('a tcomparator_witness) comparator