Metamath Proof Explorer


Theorem cdleme43bN

Description: Lemma for Lemma E in Crawley p. 113. g(s) is an atom not under w. (Contributed by NM, 20-Mar-2013) (New usage is discouraged.)

Ref Expression
Hypotheses cdleme43.b ⊢ B = Base K
cdleme43.l ⊢ ≤ ˙ = ≤ K
cdleme43.j ⊢ ∨ ˙ = join ⁡ K
cdleme43.m ⊢ ∧ ˙ = meet ⁡ K
cdleme43.a ⊢ A = Atoms ⁡ K
cdleme43.h ⊢ H = LHyp ⁡ K
cdleme43.u ⊢ U = P ∨ ˙ Q ∧ ˙ W
cdleme43.x ⊢ X = Q ∨ ˙ P ∧ ˙ W
cdleme43.c ⊢ C = S ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ S ∧ ˙ W
cdleme43.f ⊢ Z = P ∨ ˙ Q ∧ ˙ C ∨ ˙ R ∨ ˙ S ∧ ˙ W
cdleme43.d ⊢ D = S ∨ ˙ X ∧ ˙ P ∨ ˙ Q ∨ ˙ S ∧ ˙ W
cdleme43.g ⊢ G = Q ∨ ˙ P ∧ ˙ D ∨ ˙ Z ∨ ˙ S ∧ ˙ W
cdleme43.e ⊢ E = D ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ D ∧ ˙ W
cdleme43.v ⊢ V = Z ∨ ˙ S ∧ ˙ W
cdleme43.y ⊢ Y = R ∨ ˙ D ∧ ˙ W
Assertion cdleme43bN ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → D ∈ A ∧ ¬ D ≤ ˙ W

Proof

Step Hyp Ref Expression
1 cdleme43.b ⊢ B = Base K
2 cdleme43.l ⊢ ≤ ˙ = ≤ K
3 cdleme43.j ⊢ ∨ ˙ = join ⁡ K
4 cdleme43.m ⊢ ∧ ˙ = meet ⁡ K
5 cdleme43.a ⊢ A = Atoms ⁡ K
6 cdleme43.h ⊢ H = LHyp ⁡ K
7 cdleme43.u ⊢ U = P ∨ ˙ Q ∧ ˙ W
8 cdleme43.x ⊢ X = Q ∨ ˙ P ∧ ˙ W
9 cdleme43.c ⊢ C = S ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ S ∧ ˙ W
10 cdleme43.f ⊢ Z = P ∨ ˙ Q ∧ ˙ C ∨ ˙ R ∨ ˙ S ∧ ˙ W
11 cdleme43.d ⊢ D = S ∨ ˙ X ∧ ˙ P ∨ ˙ Q ∨ ˙ S ∧ ˙ W
12 cdleme43.g ⊢ G = Q ∨ ˙ P ∧ ˙ D ∨ ˙ Z ∨ ˙ S ∧ ˙ W
13 cdleme43.e ⊢ E = D ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ D ∧ ˙ W
14 cdleme43.v ⊢ V = Z ∨ ˙ S ∧ ˙ W
15 cdleme43.y ⊢ Y = R ∨ ˙ D ∧ ˙ W
16 simp11 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → K ∈ HL ∧ W ∈ H
17 simp13 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Q ∈ A ∧ ¬ Q ≤ ˙ W
18 simp12 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ∈ A ∧ ¬ P ≤ ˙ W
19 simp2r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → S ∈ A ∧ ¬ S ≤ ˙ W
20 simp2l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ≠ Q
21 20 necomd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Q ≠ P
22 simp3 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ¬ S ≤ ˙ P ∨ ˙ Q
23 simp11l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → K ∈ HL
24 simp12l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ∈ A
25 simp13l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Q ∈ A
26 3 5 hlatjcom ⊢ K ∈ HL ∧ P ∈ A ∧ Q ∈ A → P ∨ ˙ Q = Q ∨ ˙ P
27 23 24 25 26 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ∨ ˙ Q = Q ∨ ˙ P
28 27 breq2d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → S ≤ ˙ P ∨ ˙ Q ↔ S ≤ ˙ Q ∨ ˙ P
29 22 28 mtbid ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ¬ S ≤ ˙ Q ∨ ˙ P
30 2 3 4 5 6 8 11 cdleme3fa ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ Q ≠ P ∧ ¬ S ≤ ˙ Q ∨ ˙ P → D ∈ A
31 16 17 18 19 21 29 30 syl132anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → D ∈ A
32 2 3 4 5 6 8 11 cdleme3 ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ Q ≠ P ∧ ¬ S ≤ ˙ Q ∨ ˙ P → ¬ D ≤ ˙ W
33 16 17 18 19 21 29 32 syl132anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ¬ D ≤ ˙ W
34 31 33 jca ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ P ∨ ˙ Q → D ∈ A ∧ ¬ D ≤ ˙ W