Module type BatOrd.Comp

module type Comp = sig .. end
We use compare as member name instead of comp, so that the Comp modules can be used as the legacy OrderedType interface.

type t 
val compare : t BatOrd.comp