Module type Invariant_intf.S2

type ('a, 'b) t
val invariant : 'a inv -> 'b inv -> ('a, 'b) t inv