Module type Base__.Invariant_intf.Invariant.S2

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