Metamath Proof Explorer


Theorem cdleme29ex

Description: Lemma for cdleme29b . (Compare cdleme25a .) TODO: FIX COMMENT. (Contributed by NM, 7-Feb-2013)

Ref Expression
Hypotheses cdleme26.b ⊢ B = Base K
cdleme26.l ⊢ ≤ ˙ = ≤ K
cdleme26.j ⊢ ∨ ˙ = join ⁡ K
cdleme26.m ⊢ ∧ ˙ = meet ⁡ K
cdleme26.a ⊢ A = Atoms ⁡ K
cdleme26.h ⊢ H = LHyp ⁡ K
cdleme27.u ⊢ U = P ∨ ˙ Q ∧ ˙ W
cdleme27.f ⊢ F = s ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ s ∧ ˙ W
cdleme27.z ⊢ Z = z ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ z ∧ ˙ W
cdleme27.n ⊢ N = P ∨ ˙ Q ∧ ˙ Z ∨ ˙ s ∨ ˙ z ∧ ˙ W
cdleme27.d ⊢ D = ι u ∈ B | ∀ z ∈ A ¬ z ≤ ˙ W ∧ ¬ z ≤ ˙ P ∨ ˙ Q → u = N
cdleme27.c ⊢ C = if s ≤ ˙ P ∨ ˙ Q D F
Assertion cdleme29ex ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W → ∃ s ∈ A ¬ s ≤ ˙ W ∧ s ∨ ˙ X ∧ ˙ W = X ∧ C ∨ ˙ X ∧ ˙ W ∈ B

Proof

Step Hyp Ref Expression
1 cdleme26.b ⊢ B = Base K
2 cdleme26.l ⊢ ≤ ˙ = ≤ K
3 cdleme26.j ⊢ ∨ ˙ = join ⁡ K
4 cdleme26.m ⊢ ∧ ˙ = meet ⁡ K
5 cdleme26.a ⊢ A = Atoms ⁡ K
6 cdleme26.h ⊢ H = LHyp ⁡ K
7 cdleme27.u ⊢ U = P ∨ ˙ Q ∧ ˙ W
8 cdleme27.f ⊢ F = s ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ s ∧ ˙ W
9 cdleme27.z ⊢ Z = z ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ z ∧ ˙ W
10 cdleme27.n ⊢ N = P ∨ ˙ Q ∧ ˙ Z ∨ ˙ s ∨ ˙ z ∧ ˙ W
11 cdleme27.d ⊢ D = ι u ∈ B | ∀ z ∈ A ¬ z ≤ ˙ W ∧ ¬ z ≤ ˙ P ∨ ˙ Q → u = N
12 cdleme27.c ⊢ C = if s ≤ ˙ P ∨ ˙ Q D F
13 simp11 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W → K ∈ HL ∧ W ∈ H
14 simp3 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W → X ∈ B ∧ ¬ X ≤ ˙ W
15 1 2 3 4 5 6 lhpmcvr2 ⊢ K ∈ HL ∧ W ∈ H ∧ X ∈ B ∧ ¬ X ≤ ˙ W → ∃ s ∈ A ¬ s ≤ ˙ W ∧ s ∨ ˙ X ∧ ˙ W = X
16 13 14 15 syl2anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W → ∃ s ∈ A ¬ s ≤ ˙ W ∧ s ∨ ˙ X ∧ ˙ W = X
17 simp11l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W → K ∈ HL
18 17 adantr ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → K ∈ HL
19 18 hllatd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → K ∈ Lat
20 simp11r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W → W ∈ H
21 20 adantr ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → W ∈ H
22 simpl12 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → P ∈ A ∧ ¬ P ≤ ˙ W
23 simpl13 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → Q ∈ A ∧ ¬ Q ≤ ˙ W
24 simpr ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → s ∈ A ∧ ¬ s ≤ ˙ W
25 simpl2 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → P ≠ Q
26 1 2 3 4 5 6 7 8 9 10 11 12 cdleme27cl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W ∧ P ≠ Q → C ∈ B
27 18 21 22 23 24 25 26 syl222anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → C ∈ B
28 simpl3l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → X ∈ B
29 1 6 lhpbase ⊢ W ∈ H → W ∈ B
30 21 29 syl ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → W ∈ B
31 1 4 latmcl ⊢ K ∈ Lat ∧ X ∈ B ∧ W ∈ B → X ∧ ˙ W ∈ B
32 19 28 30 31 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → X ∧ ˙ W ∈ B
33 1 3 latjcl ⊢ K ∈ Lat ∧ C ∈ B ∧ X ∧ ˙ W ∈ B → C ∨ ˙ X ∧ ˙ W ∈ B
34 19 27 32 33 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A ∧ ¬ s ≤ ˙ W → C ∨ ˙ X ∧ ˙ W ∈ B
35 34 expr ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A → ¬ s ≤ ˙ W → C ∨ ˙ X ∧ ˙ W ∈ B
36 35 adantrd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A → ¬ s ≤ ˙ W ∧ s ∨ ˙ X ∧ ˙ W = X → C ∨ ˙ X ∧ ˙ W ∈ B
37 36 ancld ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W ∧ s ∈ A → ¬ s ≤ ˙ W ∧ s ∨ ˙ X ∧ ˙ W = X → ¬ s ≤ ˙ W ∧ s ∨ ˙ X ∧ ˙ W = X ∧ C ∨ ˙ X ∧ ˙ W ∈ B
38 37 reximdva ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W → ∃ s ∈ A ¬ s ≤ ˙ W ∧ s ∨ ˙ X ∧ ˙ W = X → ∃ s ∈ A ¬ s ≤ ˙ W ∧ s ∨ ˙ X ∧ ˙ W = X ∧ C ∨ ˙ X ∧ ˙ W ∈ B
39 16 38 mpd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ X ∈ B ∧ ¬ X ≤ ˙ W → ∃ s ∈ A ¬ s ≤ ˙ W ∧ s ∨ ˙ X ∧ ˙ W = X ∧ C ∨ ˙ X ∧ ˙ W ∈ B