Module type Core_extended.Invariant.S3

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