cdleme11g - Mathbox for Norm Megill

	Mathbox for Norm Megill		< Previous Next > Nearby theorems
Mirrors > Home > MPE Home > Th. List > Mathboxes > cdleme11g		Structured version Visualization version GIF version

Theorem cdleme11g 39649

Description: Part of proof of Lemma E in [Crawley] p. 113. Lemma leading to cdleme11 39654. (Contributed by NM, 14-Jun-2012.)

**Hypotheses**
Ref	Expression
cdleme11.l	⊢ ≤ = (le‘𝐾)
cdleme11.j	⊢ ∨ = (join‘𝐾)
cdleme11.m	⊢ ∧ = (meet‘𝐾)
cdleme11.a	⊢ 𝐴 = (Atoms‘𝐾)
cdleme11.h	⊢ 𝐻 = (LHyp‘𝐾)
cdleme11.u	⊢ 𝑈 = ((𝑃 ∨ 𝑄) ∧ 𝑊)
cdleme11.c	⊢ 𝐶 = ((𝑃 ∨ 𝑆) ∧ 𝑊)
cdleme11.d	⊢ 𝐷 = ((𝑃 ∨ 𝑇) ∧ 𝑊)
cdleme11.f	⊢ 𝐹 = ((𝑆 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)))

**Assertion**
Ref	Expression
cdleme11g	⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ 𝐹) = (𝑄 ∨ 𝐶))

**Proof of Theorem cdleme11g**
Step	Hyp	Ref	Expression
1		cdleme11.f	. . . 4 ⊢ 𝐹 = ((𝑆 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)))
2	1	oveq2i 7416	. . 3 ⊢ (𝑄 ∨ 𝐹) = (𝑄 ∨ ((𝑆 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))))
3		simp1l 1194	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝐾 ∈ HL)
4		simp22l 1289	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑄 ∈ 𝐴)
5	3	hllatd 38747	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝐾 ∈ Lat)
6		simp23 1205	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑆 ∈ 𝐴)
7		eqid 2726	. . . . . . 7 ⊢ (Base‘𝐾) = (Base‘𝐾)
8		cdleme11.a	. . . . . . 7 ⊢ 𝐴 = (Atoms‘𝐾)
9	7, 8	atbase 38672	. . . . . 6 ⊢ (𝑆 ∈ 𝐴 → 𝑆 ∈ (Base‘𝐾))
10	6, 9	syl 17	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑆 ∈ (Base‘𝐾))
11		simp1 1133	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
12		simp21 1203	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑃 ∈ 𝐴)
13		cdleme11.l	. . . . . . 7 ⊢ ≤ = (le‘𝐾)
14		cdleme11.j	. . . . . . 7 ⊢ ∨ = (join‘𝐾)
15		cdleme11.m	. . . . . . 7 ⊢ ∧ = (meet‘𝐾)
16		cdleme11.h	. . . . . . 7 ⊢ 𝐻 = (LHyp‘𝐾)
17		cdleme11.u	. . . . . . 7 ⊢ 𝑈 = ((𝑃 ∨ 𝑄) ∧ 𝑊)
18	13, 14, 15, 8, 16, 17, 7	cdleme0aa 39594	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) → 𝑈 ∈ (Base‘𝐾))
19	11, 12, 4, 18	syl3anc 1368	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑈 ∈ (Base‘𝐾))
20	7, 14	latjcl 18404	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑆 ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾)) → (𝑆 ∨ 𝑈) ∈ (Base‘𝐾))
21	5, 10, 19, 20	syl3anc 1368	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑆 ∨ 𝑈) ∈ (Base‘𝐾))
22	7, 8	atbase 38672	. . . . . 6 ⊢ (𝑄 ∈ 𝐴 → 𝑄 ∈ (Base‘𝐾))
23	4, 22	syl 17	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑄 ∈ (Base‘𝐾))
24	7, 8	atbase 38672	. . . . . . . 8 ⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ (Base‘𝐾))
25	12, 24	syl 17	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑃 ∈ (Base‘𝐾))
26	7, 14	latjcl 18404	. . . . . . 7 ⊢ ((𝐾 ∈ Lat ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾)) → (𝑃 ∨ 𝑆) ∈ (Base‘𝐾))
27	5, 25, 10, 26	syl3anc 1368	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑃 ∨ 𝑆) ∈ (Base‘𝐾))
28		simp1r 1195	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑊 ∈ 𝐻)
29	7, 16	lhpbase 39382	. . . . . . 7 ⊢ (𝑊 ∈ 𝐻 → 𝑊 ∈ (Base‘𝐾))
30	28, 29	syl 17	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑊 ∈ (Base‘𝐾))
31	7, 15	latmcl 18405	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑆) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) → ((𝑃 ∨ 𝑆) ∧ 𝑊) ∈ (Base‘𝐾))
32	5, 27, 30, 31	syl3anc 1368	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → ((𝑃 ∨ 𝑆) ∧ 𝑊) ∈ (Base‘𝐾))
33	7, 14	latjcl 18404	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑄 ∈ (Base‘𝐾) ∧ ((𝑃 ∨ 𝑆) ∧ 𝑊) ∈ (Base‘𝐾)) → (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)) ∈ (Base‘𝐾))
34	5, 23, 32, 33	syl3anc 1368	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)) ∈ (Base‘𝐾))
35	7, 13, 14	latlej1 18413	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑄 ∈ (Base‘𝐾) ∧ ((𝑃 ∨ 𝑆) ∧ 𝑊) ∈ (Base‘𝐾)) → 𝑄 ≤ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)))
36	5, 23, 32, 35	syl3anc 1368	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → 𝑄 ≤ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)))
37	7, 13, 14, 15, 8	atmod1i1 39241	. . . 4 ⊢ ((𝐾 ∈ HL ∧ (𝑄 ∈ 𝐴 ∧ (𝑆 ∨ 𝑈) ∈ (Base‘𝐾) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)) ∈ (Base‘𝐾)) ∧ 𝑄 ≤ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))) → (𝑄 ∨ ((𝑆 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)))) = ((𝑄 ∨ (𝑆 ∨ 𝑈)) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))))
38	3, 4, 21, 34, 36, 37	syl131anc 1380	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ ((𝑆 ∨ 𝑈) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)))) = ((𝑄 ∨ (𝑆 ∨ 𝑈)) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))))
39	2, 38	eqtrid 2778	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ 𝐹) = ((𝑄 ∨ (𝑆 ∨ 𝑈)) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))))
40		simp22 1204	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊))
41	13, 14, 15, 8, 16, 17	cdleme0cq 39599	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊))) → (𝑄 ∨ 𝑈) = (𝑃 ∨ 𝑄))
42	11, 12, 40, 41	syl12anc 834	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ 𝑈) = (𝑃 ∨ 𝑄))
43	42	oveq2d 7421	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑆 ∨ (𝑄 ∨ 𝑈)) = (𝑆 ∨ (𝑃 ∨ 𝑄)))
44	7, 14	latj12 18449	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ (𝑄 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾) ∧ 𝑈 ∈ (Base‘𝐾))) → (𝑄 ∨ (𝑆 ∨ 𝑈)) = (𝑆 ∨ (𝑄 ∨ 𝑈)))
45	5, 23, 10, 19, 44	syl13anc 1369	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ (𝑆 ∨ 𝑈)) = (𝑆 ∨ (𝑄 ∨ 𝑈)))
46	7, 14	latj13 18451	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ (𝑄 ∈ (Base‘𝐾) ∧ 𝑃 ∈ (Base‘𝐾) ∧ 𝑆 ∈ (Base‘𝐾))) → (𝑄 ∨ (𝑃 ∨ 𝑆)) = (𝑆 ∨ (𝑃 ∨ 𝑄)))
47	5, 23, 25, 10, 46	syl13anc 1369	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ (𝑃 ∨ 𝑆)) = (𝑆 ∨ (𝑃 ∨ 𝑄)))
48	43, 45, 47	3eqtr4d 2776	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ (𝑆 ∨ 𝑈)) = (𝑄 ∨ (𝑃 ∨ 𝑆)))
49	48	oveq1d 7420	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → ((𝑄 ∨ (𝑆 ∨ 𝑈)) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))) = ((𝑄 ∨ (𝑃 ∨ 𝑆)) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))))
50	7, 13, 15	latmle1 18429	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ 𝑆) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾)) → ((𝑃 ∨ 𝑆) ∧ 𝑊) ≤ (𝑃 ∨ 𝑆))
51	5, 27, 30, 50	syl3anc 1368	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → ((𝑃 ∨ 𝑆) ∧ 𝑊) ≤ (𝑃 ∨ 𝑆))
52	7, 13, 14	latjlej2 18419	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (((𝑃 ∨ 𝑆) ∧ 𝑊) ∈ (Base‘𝐾) ∧ (𝑃 ∨ 𝑆) ∈ (Base‘𝐾) ∧ 𝑄 ∈ (Base‘𝐾))) → (((𝑃 ∨ 𝑆) ∧ 𝑊) ≤ (𝑃 ∨ 𝑆) → (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)) ≤ (𝑄 ∨ (𝑃 ∨ 𝑆))))
53	5, 32, 27, 23, 52	syl13anc 1369	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (((𝑃 ∨ 𝑆) ∧ 𝑊) ≤ (𝑃 ∨ 𝑆) → (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)) ≤ (𝑄 ∨ (𝑃 ∨ 𝑆))))
54	51, 53	mpd 15	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)) ≤ (𝑄 ∨ (𝑃 ∨ 𝑆)))
55	7, 14	latjcl 18404	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ 𝑄 ∈ (Base‘𝐾) ∧ (𝑃 ∨ 𝑆) ∈ (Base‘𝐾)) → (𝑄 ∨ (𝑃 ∨ 𝑆)) ∈ (Base‘𝐾))
56	5, 23, 27, 55	syl3anc 1368	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ (𝑃 ∨ 𝑆)) ∈ (Base‘𝐾))
57	7, 13, 15	latleeqm2 18433	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)) ∈ (Base‘𝐾) ∧ (𝑄 ∨ (𝑃 ∨ 𝑆)) ∈ (Base‘𝐾)) → ((𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)) ≤ (𝑄 ∨ (𝑃 ∨ 𝑆)) ↔ ((𝑄 ∨ (𝑃 ∨ 𝑆)) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))) = (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))))
58	5, 34, 56, 57	syl3anc 1368	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → ((𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)) ≤ (𝑄 ∨ (𝑃 ∨ 𝑆)) ↔ ((𝑄 ∨ (𝑃 ∨ 𝑆)) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))) = (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))))
59	54, 58	mpbid 231	. . 3 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → ((𝑄 ∨ (𝑃 ∨ 𝑆)) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))) = (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊)))
60		cdleme11.c	. . . 4 ⊢ 𝐶 = ((𝑃 ∨ 𝑆) ∧ 𝑊)
61	60	oveq2i 7416	. . 3 ⊢ (𝑄 ∨ 𝐶) = (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))
62	59, 61	eqtr4di 2784	. 2 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → ((𝑄 ∨ (𝑃 ∨ 𝑆)) ∧ (𝑄 ∨ ((𝑃 ∨ 𝑆) ∧ 𝑊))) = (𝑄 ∨ 𝐶))
63	39, 49, 62	3eqtrd 2770	1 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑃 ∈ 𝐴 ∧ (𝑄 ∈ 𝐴 ∧ ¬ 𝑄 ≤ 𝑊) ∧ 𝑆 ∈ 𝐴) ∧ 𝑃 ≠ 𝑄) → (𝑄 ∨ 𝐹) = (𝑄 ∨ 𝐶))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 395 ∧ w3a 1084 = wceq 1533 ∈ wcel 2098 ≠ wne 2934 class class class wbr 5141 ‘cfv 6537 (class class class)co 7405 Basecbs 17153 lecple 17213 joincjn 18276 meetcmee 18277 Latclat 18396 Atomscatm 38646 HLchlt 38733 LHypclh 39368

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1789 ax-4 1803 ax-5 1905 ax-6 1963 ax-7 2003 ax-8 2100 ax-9 2108 ax-10 2129 ax-11 2146 ax-12 2163 ax-ext 2697 ax-rep 5278 ax-sep 5292 ax-nul 5299 ax-pow 5356 ax-pr 5420 ax-un 7722

This theorem depends on definitions: df-bi 206 df-an 396 df-or 845 df-3an 1086 df-tru 1536 df-fal 1546 df-ex 1774 df-nf 1778 df-sb 2060 df-mo 2528 df-eu 2557 df-clab 2704 df-cleq 2718 df-clel 2804 df-nfc 2879 df-ne 2935 df-ral 3056 df-rex 3065 df-rmo 3370 df-reu 3371 df-rab 3427 df-v 3470 df-sbc 3773 df-csb 3889 df-dif 3946 df-un 3948 df-in 3950 df-ss 3960 df-nul 4318 df-if 4524 df-pw 4599 df-sn 4624 df-pr 4626 df-op 4630 df-uni 4903 df-iun 4992 df-iin 4993 df-br 5142 df-opab 5204 df-mpt 5225 df-id 5567 df-xp 5675 df-rel 5676 df-cnv 5677 df-co 5678 df-dm 5679 df-rn 5680 df-res 5681 df-ima 5682 df-iota 6489 df-fun 6539 df-fn 6540 df-f 6541 df-f1 6542 df-fo 6543 df-f1o 6544 df-fv 6545 df-riota 7361 df-ov 7408 df-oprab 7409 df-mpo 7410 df-1st 7974 df-2nd 7975 df-proset 18260 df-poset 18278 df-plt 18295 df-lub 18311 df-glb 18312 df-join 18313 df-meet 18314 df-p0 18390 df-p1 18391 df-lat 18397 df-clat 18464 df-oposet 38559 df-ol 38561 df-oml 38562 df-covers 38649 df-ats 38650 df-atl 38681 df-cvlat 38705 df-hlat 38734 df-psubsp 38887 df-pmap 38888 df-padd 39180 df-lhyp 39372

This theorem is referenced by: cdleme11h 39650 cdleme11j 39651 cdleme15a 39658

W3C validator