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