Util.OTProduct
module X : sig ... end
module Y : sig ... end
type t = X.t * Y.t
val compare : t -> t -> int