Metamath Proof Explorer


Theorem cdlemg17pq

Description: Utility theorem for swapping P and Q . TODO: fix comment. (Contributed by NM, 11-May-2013)

Ref Expression
Hypotheses cdlemg12.l ⊢ ≤ ˙ = ≤ K
cdlemg12.j ⊢ ∨ ˙ = join ⁡ K
cdlemg12.m ⊢ ∧ ˙ = meet ⁡ K
cdlemg12.a ⊢ A = Atoms ⁡ K
cdlemg12.h ⊢ H = LHyp ⁡ K
cdlemg12.t ⊢ T = LTrn ⁡ K ⁡ W
cdlemg12b.r ⊢ R = trL ⁡ K ⁡ W
Assertion cdlemg17pq ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ Q ≠ P ∧ G ⁡ Q ≠ Q ∧ R ⁡ G ≤ ˙ Q ∨ ˙ P ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ Q ∨ ˙ r = P ∨ ˙ r

Proof

Step Hyp Ref Expression
1 cdlemg12.l ⊢ ≤ ˙ = ≤ K
2 cdlemg12.j ⊢ ∨ ˙ = join ⁡ K
3 cdlemg12.m ⊢ ∧ ˙ = meet ⁡ K
4 cdlemg12.a ⊢ A = Atoms ⁡ K
5 cdlemg12.h ⊢ H = LHyp ⁡ K
6 cdlemg12.t ⊢ T = LTrn ⁡ K ⁡ W
7 cdlemg12b.r ⊢ R = trL ⁡ K ⁡ W
8 simp11 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → K ∈ HL ∧ W ∈ H
9 simp13 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → Q ∈ A ∧ ¬ Q ≤ ˙ W
10 simp12 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → P ∈ A ∧ ¬ P ≤ ˙ W
11 8 9 10 3jca ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ∈ A ∧ ¬ P ≤ ˙ W
12 simp21 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → F ∈ T
13 simp22 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → G ∈ T
14 simp23 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → P ≠ Q
15 14 necomd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → Q ≠ P
16 12 13 15 3jca ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → F ∈ T ∧ G ∈ T ∧ Q ≠ P
17 simp31 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → G ⁡ P ≠ P
18 1 4 5 6 ltrnatneq ⊢ K ∈ HL ∧ W ∈ H ∧ G ∈ T ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ G ⁡ P ≠ P → G ⁡ Q ≠ Q
19 8 13 10 9 17 18 syl131anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → G ⁡ Q ≠ Q
20 simp32 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → R ⁡ G ≤ ˙ P ∨ ˙ Q
21 simp11l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → K ∈ HL
22 simp12l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → P ∈ A
23 simp13l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → Q ∈ A
24 2 4 hlatjcom ⊢ K ∈ HL ∧ P ∈ A ∧ Q ∈ A → P ∨ ˙ Q = Q ∨ ˙ P
25 21 22 23 24 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → P ∨ ˙ Q = Q ∨ ˙ P
26 20 25 breqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → R ⁡ G ≤ ˙ Q ∨ ˙ P
27 simp33 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r
28 eqcom ⊢ P ∨ ˙ r = Q ∨ ˙ r ↔ Q ∨ ˙ r = P ∨ ˙ r
29 28 anbi2i ⊢ ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r ↔ ¬ r ≤ ˙ W ∧ Q ∨ ˙ r = P ∨ ˙ r
30 29 rexbii ⊢ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r ↔ ∃ r ∈ A ¬ r ≤ ˙ W ∧ Q ∨ ˙ r = P ∨ ˙ r
31 27 30 sylnib ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ Q ∨ ˙ r = P ∨ ˙ r
32 19 26 31 3jca ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → G ⁡ Q ≠ Q ∧ R ⁡ G ≤ ˙ Q ∨ ˙ P ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ Q ∨ ˙ r = P ∨ ˙ r
33 11 16 32 3jca ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ P ≠ Q ∧ G ⁡ P ≠ P ∧ R ⁡ G ≤ ˙ P ∨ ˙ Q ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ P ∨ ˙ r = Q ∨ ˙ r → K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ F ∈ T ∧ G ∈ T ∧ Q ≠ P ∧ G ⁡ Q ≠ Q ∧ R ⁡ G ≤ ˙ Q ∨ ˙ P ∧ ¬ ∃ r ∈ A ¬ r ≤ ˙ W ∧ Q ∨ ˙ r = P ∨ ˙ r