IntDomainPropertiesmodule BI = IntOps.BigIntOpsmodule type OldS = sig ... endmodule type S = IntDomain.S with type int_t = BI.tmodule IntegerSet : sig ... endmodule CD = IntegerSetmodule Valid (AD : OldS) : DomainProperties.Smodule All (D : OldS) : DomainProperties.Smodule AllNonAssoc (D : OldS) : DomainProperties.S