Module Comparator.S_to_S1

Parameters

• S : S

Signature

type 'a t = S.t

type comparator_witness = S.comparator_witness

val comparator : ('a t, comparator_witness) comparator