ConcreteBidirectionalLabeled.2-E
include Sig.ORDERED_TYPE
type t
val compare : t -> t -> int
val default : t