Module type Comparator.Derived2Source
val comparator :
('a, 'cmp_a) Base.Comparator.comparator ->
('b, 'cmp_b) Base.Comparator.comparator ->
(('a, 'b) t, ('cmp_a, 'cmp_b) comparator_witness) Base.Comparator.comparator