Metamath Proof Explorer


Theorem cdleme43dN

Description: Part of proof of Lemma E in Crawley p. 113. TODO: FIX COMMENT p. 116 2nd line: f(r) v s = f(r) v f(g(s)). (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 cdleme43dN ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Z ∨ ˙ S = Z ∨ ˙ E

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 simp11l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → K ∈ HL
17 simp12l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ∈ A
18 simp13l ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Q ∈ A
19 3 5 hlatjcom ⊢ K ∈ HL ∧ P ∈ A ∧ Q ∈ A → P ∨ ˙ Q = Q ∨ ˙ P
20 16 17 18 19 syl3anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ∨ ˙ Q = Q ∨ ˙ P
21 20 oveq1d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ∨ ˙ Q ∧ ˙ W = Q ∨ ˙ P ∧ ˙ W
22 21 7 8 3eqtr4g ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → U = X
23 22 oveq2d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → D ∨ ˙ U = D ∨ ˙ X
24 23 oveq1d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → D ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ D ∧ ˙ W = D ∨ ˙ X ∧ ˙ Q ∨ ˙ P ∨ ˙ D ∧ ˙ W
25 simp11 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → K ∈ HL ∧ W ∈ H
26 simp13 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Q ∈ A ∧ ¬ Q ≤ ˙ W
27 simp12 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ∈ A ∧ ¬ P ≤ ˙ W
28 simp21 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → P ≠ Q
29 28 necomd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Q ≠ P
30 simp23 ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → S ∈ A ∧ ¬ S ≤ ˙ W
31 simp3r ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ¬ S ≤ ˙ P ∨ ˙ Q
32 20 breq2d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → S ≤ ˙ P ∨ ˙ Q ↔ S ≤ ˙ Q ∨ ˙ P
33 31 32 mtbid ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → ¬ S ≤ ˙ Q ∨ ˙ P
34 2 3 4 5 6 8 11 cdleme35g ⊢ K ∈ HL ∧ W ∈ H ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ≠ P ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ ¬ S ≤ ˙ Q ∨ ˙ P → D ∨ ˙ X ∧ ˙ Q ∨ ˙ P ∨ ˙ D ∧ ˙ W = S
35 25 26 27 29 30 33 34 syl321anc ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → D ∨ ˙ X ∧ ˙ Q ∨ ˙ P ∨ ˙ D ∧ ˙ W = S
36 24 35 eqtrd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → D ∨ ˙ U ∧ ˙ Q ∨ ˙ P ∨ ˙ D ∧ ˙ W = S
37 13 36 eqtrid ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → E = S
38 37 oveq2d ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Z ∨ ˙ E = Z ∨ ˙ S
39 38 eqcomd ⊢ K ∈ HL ∧ W ∈ H ∧ P ∈ A ∧ ¬ P ≤ ˙ W ∧ Q ∈ A ∧ ¬ Q ≤ ˙ W ∧ P ≠ Q ∧ R ∈ A ∧ ¬ R ≤ ˙ W ∧ S ∈ A ∧ ¬ S ≤ ˙ W ∧ R ≤ ˙ P ∨ ˙ Q ∧ ¬ S ≤ ˙ P ∨ ˙ Q → Z ∨ ˙ S = Z ∨ ˙ E