Metamath Proof Explorer


Theorem cdlemg18b

Description: Lemma for cdlemg18c . TODO: fix comment. (Contributed by NM, 15-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
cdlemg18b.u ⊢ U = P ∨ ˙ Q ∧ ˙ W
Assertion cdlemg18b ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q → ¬ P ≤ ˙ U ∨ ˙ F ⁡ Q

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 cdlemg18b.u ⊢ U = P ∨ ˙ Q ∧ ˙ W
9 simp33 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q → F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q
10 simp3r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ≤ ˙ U ∨ ˙ F ⁡ Q
11 simp1l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → K ∈ HL
12 simp1r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → W ∈ H
13 simp21 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ∈ A ∧ ¬ P ≤ ˙ W
14 simp22l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → Q ∈ A
15 simp3l1 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ≠ Q
16 1 2 3 4 5 8 cdleme0a ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ P ≠ Q → U ∈ A
17 11 12 13 14 15 16 syl212anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → U ∈ A
18 simp1 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → K ∈ HL ∧ W ∈ H
19 simp23 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → F ∈ T
20 1 4 5 6 ltrnat ⊢ K ∈ HL ∧ W ∈ H ∧ F ∈ T ∧ Q ∈ A → F ⁡ Q ∈ A
21 18 19 14 20 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → F ⁡ Q ∈ A
22 1 2 4 hlatlej1 ⊢ K ∈ HL ∧ U ∈ A ∧ F ⁡ Q ∈ A → U ≤ ˙ U ∨ ˙ F ⁡ Q
23 11 17 21 22 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → U ≤ ˙ U ∨ ˙ F ⁡ Q
24 11 hllatd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → K ∈ Lat
25 simp21l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ∈ A
26 eqid ⊢ Base K = Base K
27 26 4 atbase ⊢ P ∈ A → P ∈ Base K
28 25 27 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ∈ Base K
29 26 4 atbase ⊢ U ∈ A → U ∈ Base K
30 17 29 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → U ∈ Base K
31 26 2 4 hlatjcl ⊢ K ∈ HL ∧ U ∈ A ∧ F ⁡ Q ∈ A → U ∨ ˙ F ⁡ Q ∈ Base K
32 11 17 21 31 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → U ∨ ˙ F ⁡ Q ∈ Base K
33 26 1 2 latjle12 ⊢ K ∈ Lat ∧ P ∈ Base K ∧ U ∈ Base K ∧ U ∨ ˙ F ⁡ Q ∈ Base K → P ≤ ˙ U ∨ ˙ F ⁡ Q ∧ U ≤ ˙ U ∨ ˙ F ⁡ Q ↔ P ∨ ˙ U ≤ ˙ U ∨ ˙ F ⁡ Q
34 24 28 30 32 33 syl13anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ≤ ˙ U ∨ ˙ F ⁡ Q ∧ U ≤ ˙ U ∨ ˙ F ⁡ Q ↔ P ∨ ˙ U ≤ ˙ U ∨ ˙ F ⁡ Q
35 10 23 34 mpbi2and ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ∨ ˙ U ≤ ˙ U ∨ ˙ F ⁡ Q
36 1 2 3 4 5 8 cdleme0cp ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A → P ∨ ˙ U = P ∨ ˙ Q
37 11 12 13 14 36 syl22anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ∨ ˙ U = P ∨ ˙ Q
38 simp22 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → Q ∈ A ∧ ¬ Q ≤ ˙ W
39 5 6 1 2 4 3 8 cdlemg2kq ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T → F ⁡ P ∨ ˙ F ⁡ Q = F ⁡ Q ∨ ˙ U
40 18 13 38 19 39 syl121anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → F ⁡ P ∨ ˙ F ⁡ Q = F ⁡ Q ∨ ˙ U
41 2 4 hlatjcom ⊢ K ∈ HL ∧ F ⁡ Q ∈ A ∧ U ∈ A → F ⁡ Q ∨ ˙ U = U ∨ ˙ F ⁡ Q
42 11 21 17 41 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → F ⁡ Q ∨ ˙ U = U ∨ ˙ F ⁡ Q
43 40 42 eqtr2d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → U ∨ ˙ F ⁡ Q = F ⁡ P ∨ ˙ F ⁡ Q
44 35 37 43 3brtr3d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ∨ ˙ Q ≤ ˙ F ⁡ P ∨ ˙ F ⁡ Q
45 1 4 5 6 ltrnat ⊢ K ∈ HL ∧ W ∈ H ∧ F ∈ T ∧ P ∈ A → F ⁡ P ∈ A
46 18 19 25 45 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → F ⁡ P ∈ A
47 1 2 4 ps-1 ⊢ K ∈ HL ∧ P ∈ A ∧ Q ∈ A ∧ P ≠ Q ∧ F ⁡ P ∈ A ∧ F ⁡ Q ∈ A → P ∨ ˙ Q ≤ ˙ F ⁡ P ∨ ˙ F ⁡ Q ↔ P ∨ ˙ Q = F ⁡ P ∨ ˙ F ⁡ Q
48 11 25 14 15 46 21 47 syl132anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ∨ ˙ Q ≤ ˙ F ⁡ P ∨ ˙ F ⁡ Q ↔ P ∨ ˙ Q = F ⁡ P ∨ ˙ F ⁡ Q
49 44 48 mpbid ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → P ∨ ˙ Q = F ⁡ P ∨ ˙ F ⁡ Q
50 2 4 hlatjcom ⊢ K ∈ HL ∧ F ⁡ P ∈ A ∧ F ⁡ Q ∈ A → F ⁡ P ∨ ˙ F ⁡ Q = F ⁡ Q ∨ ˙ F ⁡ P
51 11 46 21 50 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → F ⁡ P ∨ ˙ F ⁡ Q = F ⁡ Q ∨ ˙ F ⁡ P
52 49 51 eqtr2d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → F ⁡ Q ∨ ˙ F ⁡ P = P ∨ ˙ Q
53 52 3exp ⊢ K ∈ HL ∧ W ∈ H → P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T → P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q ∧ P ≤ ˙ U ∨ ˙ F ⁡ Q → F ⁡ Q ∨ ˙ F ⁡ P = P ∨ ˙ Q
54 53 exp4a ⊢ K ∈ HL ∧ W ∈ H → P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T → P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q → P ≤ ˙ U ∨ ˙ F ⁡ Q → F ⁡ Q ∨ ˙ F ⁡ P = P ∨ ˙ Q
55 54 3imp ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q → P ≤ ˙ U ∨ ˙ F ⁡ Q → F ⁡ Q ∨ ˙ F ⁡ P = P ∨ ˙ Q
56 55 necon3ad ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q → F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q → ¬ P ≤ ˙ U ∨ ˙ F ⁡ Q
57 9 56 mpd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ F ∈ T ∧ P ≠ Q ∧ F ⁡ P ≠ Q ∧ F ⁡ Q ∨ ˙ F ⁡ P ≠ P ∨ ˙ Q → ¬ P ≤ ˙ U ∨ ˙ F ⁡ Q