pub open spec fn conjunct_shared<P: PCM>(a: P, b: P, c: P) -> bool
{ forall |p: P| p.valid() && incl(a, p) && incl(b, p) ==> #[trigger] incl(c, p) }