Module type Invariant.S3

type ('a, 'b, 'c) t
val invariant : 'a Base__.Invariant_intf.inv -> 'b Base__.Invariant_intf.inv -> 'c Base__.Invariant_intf.inv -> ('a'b'c) t Base__.Invariant_intf.inv