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