dalem56 - Mathbox for Norm Megill

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

Theorem dalem56 39233

Description: Lemma for dath 39241. Analogue of dalem55 39232 for line 𝑆𝑇. (Contributed by NM, 8-Aug-2012.)

**Hypotheses**
Ref	Expression
dalem.ph	⊢ (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴)) ∧ (𝑌 ∈ 𝑂 ∧ 𝑍 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (𝐶 ≤ (𝑃 ∨ 𝑆) ∧ 𝐶 ≤ (𝑄 ∨ 𝑇) ∧ 𝐶 ≤ (𝑅 ∨ 𝑈)))))
dalem.l	⊢ ≤ = (le‘𝐾)
dalem.j	⊢ ∨ = (join‘𝐾)
dalem.a	⊢ 𝐴 = (Atoms‘𝐾)
dalem.ps	⊢ (𝜓 ↔ ((𝑐 ∈ 𝐴 ∧ 𝑑 ∈ 𝐴) ∧ ¬ 𝑐 ≤ 𝑌 ∧ (𝑑 ≠ 𝑐 ∧ ¬ 𝑑 ≤ 𝑌 ∧ 𝐶 ≤ (𝑐 ∨ 𝑑))))
dalem54.m	⊢ ∧ = (meet‘𝐾)
dalem54.o	⊢ 𝑂 = (LPlanes‘𝐾)
dalem54.y	⊢ 𝑌 = ((𝑃 ∨ 𝑄) ∨ 𝑅)
dalem54.z	⊢ 𝑍 = ((𝑆 ∨ 𝑇) ∨ 𝑈)
dalem54.g	⊢ 𝐺 = ((𝑐 ∨ 𝑃) ∧ (𝑑 ∨ 𝑆))
dalem54.h	⊢ 𝐻 = ((𝑐 ∨ 𝑄) ∧ (𝑑 ∨ 𝑇))
dalem54.i	⊢ 𝐼 = ((𝑐 ∨ 𝑅) ∧ (𝑑 ∨ 𝑈))
dalem54.b1	⊢ 𝐵 = (((𝐺 ∨ 𝐻) ∨ 𝐼) ∧ 𝑌)

**Assertion**
Ref	Expression
dalem56	⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((𝐺 ∨ 𝐻) ∧ (𝑆 ∨ 𝑇)) = ((𝐺 ∨ 𝐻) ∧ 𝐵))

**Proof of Theorem dalem56**
Step	Hyp	Ref	Expression
1		dalem.ph	. . . . 5 ⊢ (𝜑 ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴)) ∧ (𝑌 ∈ 𝑂 ∧ 𝑍 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (𝐶 ≤ (𝑃 ∨ 𝑆) ∧ 𝐶 ≤ (𝑄 ∨ 𝑇) ∧ 𝐶 ≤ (𝑅 ∨ 𝑈)))))
2		dalem.l	. . . . 5 ⊢ ≤ = (le‘𝐾)
3		dalem.j	. . . . 5 ⊢ ∨ = (join‘𝐾)
4		dalem.a	. . . . 5 ⊢ 𝐴 = (Atoms‘𝐾)
5	1, 2, 3, 4	dalemswapyz 39161	. . . 4 ⊢ (𝜑 → (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴)) ∧ (𝑍 ∈ 𝑂 ∧ 𝑌 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (𝐶 ≤ (𝑆 ∨ 𝑃) ∧ 𝐶 ≤ (𝑇 ∨ 𝑄) ∧ 𝐶 ≤ (𝑈 ∨ 𝑅)))))
6	5	3ad2ant1 1130	. . 3 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴)) ∧ (𝑍 ∈ 𝑂 ∧ 𝑌 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (𝐶 ≤ (𝑆 ∨ 𝑃) ∧ 𝐶 ≤ (𝑇 ∨ 𝑄) ∧ 𝐶 ≤ (𝑈 ∨ 𝑅)))))
7		simp2 1134	. . . 4 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑌 = 𝑍)
8	7	eqcomd 2734	. . 3 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑍 = 𝑌)
9		dalem.ps	. . . 4 ⊢ (𝜓 ↔ ((𝑐 ∈ 𝐴 ∧ 𝑑 ∈ 𝐴) ∧ ¬ 𝑐 ≤ 𝑌 ∧ (𝑑 ≠ 𝑐 ∧ ¬ 𝑑 ≤ 𝑌 ∧ 𝐶 ≤ (𝑐 ∨ 𝑑))))
10	1, 2, 3, 4, 9	dalemswapyzps 39195	. . 3 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((𝑑 ∈ 𝐴 ∧ 𝑐 ∈ 𝐴) ∧ ¬ 𝑑 ≤ 𝑍 ∧ (𝑐 ≠ 𝑑 ∧ ¬ 𝑐 ≤ 𝑍 ∧ 𝐶 ≤ (𝑑 ∨ 𝑐))))
11		biid 260	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴)) ∧ (𝑍 ∈ 𝑂 ∧ 𝑌 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (𝐶 ≤ (𝑆 ∨ 𝑃) ∧ 𝐶 ≤ (𝑇 ∨ 𝑄) ∧ 𝐶 ≤ (𝑈 ∨ 𝑅)))) ↔ (((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴)) ∧ (𝑍 ∈ 𝑂 ∧ 𝑌 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (𝐶 ≤ (𝑆 ∨ 𝑃) ∧ 𝐶 ≤ (𝑇 ∨ 𝑄) ∧ 𝐶 ≤ (𝑈 ∨ 𝑅)))))
12		biid 260	. . . 4 ⊢ (((𝑑 ∈ 𝐴 ∧ 𝑐 ∈ 𝐴) ∧ ¬ 𝑑 ≤ 𝑍 ∧ (𝑐 ≠ 𝑑 ∧ ¬ 𝑐 ≤ 𝑍 ∧ 𝐶 ≤ (𝑑 ∨ 𝑐))) ↔ ((𝑑 ∈ 𝐴 ∧ 𝑐 ∈ 𝐴) ∧ ¬ 𝑑 ≤ 𝑍 ∧ (𝑐 ≠ 𝑑 ∧ ¬ 𝑐 ≤ 𝑍 ∧ 𝐶 ≤ (𝑑 ∨ 𝑐))))
13		dalem54.m	. . . 4 ⊢ ∧ = (meet‘𝐾)
14		dalem54.o	. . . 4 ⊢ 𝑂 = (LPlanes‘𝐾)
15		dalem54.z	. . . 4 ⊢ 𝑍 = ((𝑆 ∨ 𝑇) ∨ 𝑈)
16		dalem54.y	. . . 4 ⊢ 𝑌 = ((𝑃 ∨ 𝑄) ∨ 𝑅)
17		eqid 2728	. . . 4 ⊢ ((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) = ((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃))
18		eqid 2728	. . . 4 ⊢ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄)) = ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))
19		eqid 2728	. . . 4 ⊢ ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅)) = ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅))
20		eqid 2728	. . . 4 ⊢ (((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∨ ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅))) ∧ 𝑍) = (((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∨ ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅))) ∧ 𝑍)
21	11, 2, 3, 4, 12, 13, 14, 15, 16, 17, 18, 19, 20	dalem55 39232	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝐶 ∈ (Base‘𝐾)) ∧ (𝑆 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴)) ∧ (𝑍 ∈ 𝑂 ∧ 𝑌 ∈ 𝑂) ∧ ((¬ 𝐶 ≤ (𝑆 ∨ 𝑇) ∧ ¬ 𝐶 ≤ (𝑇 ∨ 𝑈) ∧ ¬ 𝐶 ≤ (𝑈 ∨ 𝑆)) ∧ (¬ 𝐶 ≤ (𝑃 ∨ 𝑄) ∧ ¬ 𝐶 ≤ (𝑄 ∨ 𝑅) ∧ ¬ 𝐶 ≤ (𝑅 ∨ 𝑃)) ∧ (𝐶 ≤ (𝑆 ∨ 𝑃) ∧ 𝐶 ≤ (𝑇 ∨ 𝑄) ∧ 𝐶 ≤ (𝑈 ∨ 𝑅)))) ∧ 𝑍 = 𝑌 ∧ ((𝑑 ∈ 𝐴 ∧ 𝑐 ∈ 𝐴) ∧ ¬ 𝑑 ≤ 𝑍 ∧ (𝑐 ≠ 𝑑 ∧ ¬ 𝑐 ≤ 𝑍 ∧ 𝐶 ≤ (𝑑 ∨ 𝑐)))) → ((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∧ (𝑆 ∨ 𝑇)) = ((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∧ (((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∨ ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅))) ∧ 𝑍)))
22	6, 8, 10, 21	syl3anc 1368	. 2 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∧ (𝑆 ∨ 𝑇)) = ((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∧ (((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∨ ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅))) ∧ 𝑍)))
23		dalem54.g	. . . . 5 ⊢ 𝐺 = ((𝑐 ∨ 𝑃) ∧ (𝑑 ∨ 𝑆))
24	1	dalemkelat 39129	. . . . . . 7 ⊢ (𝜑 → 𝐾 ∈ Lat)
25	24	3ad2ant1 1130	. . . . . 6 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝐾 ∈ Lat)
26	1	dalemkehl 39128	. . . . . . . 8 ⊢ (𝜑 → 𝐾 ∈ HL)
27	26	3ad2ant1 1130	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝐾 ∈ HL)
28	9	dalemccea 39188	. . . . . . . 8 ⊢ (𝜓 → 𝑐 ∈ 𝐴)
29	28	3ad2ant3 1132	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑐 ∈ 𝐴)
30	1	dalempea 39131	. . . . . . . 8 ⊢ (𝜑 → 𝑃 ∈ 𝐴)
31	30	3ad2ant1 1130	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑃 ∈ 𝐴)
32		eqid 2728	. . . . . . . 8 ⊢ (Base‘𝐾) = (Base‘𝐾)
33	32, 3, 4	hlatjcl 38871	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑐 ∈ 𝐴 ∧ 𝑃 ∈ 𝐴) → (𝑐 ∨ 𝑃) ∈ (Base‘𝐾))
34	27, 29, 31, 33	syl3anc 1368	. . . . . 6 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → (𝑐 ∨ 𝑃) ∈ (Base‘𝐾))
35	9	dalemddea 39189	. . . . . . . 8 ⊢ (𝜓 → 𝑑 ∈ 𝐴)
36	35	3ad2ant3 1132	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑑 ∈ 𝐴)
37	1	dalemsea 39134	. . . . . . . 8 ⊢ (𝜑 → 𝑆 ∈ 𝐴)
38	37	3ad2ant1 1130	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑆 ∈ 𝐴)
39	32, 3, 4	hlatjcl 38871	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑑 ∈ 𝐴 ∧ 𝑆 ∈ 𝐴) → (𝑑 ∨ 𝑆) ∈ (Base‘𝐾))
40	27, 36, 38, 39	syl3anc 1368	. . . . . 6 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → (𝑑 ∨ 𝑆) ∈ (Base‘𝐾))
41	32, 13	latmcom 18462	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (𝑐 ∨ 𝑃) ∈ (Base‘𝐾) ∧ (𝑑 ∨ 𝑆) ∈ (Base‘𝐾)) → ((𝑐 ∨ 𝑃) ∧ (𝑑 ∨ 𝑆)) = ((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)))
42	25, 34, 40, 41	syl3anc 1368	. . . . 5 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((𝑐 ∨ 𝑃) ∧ (𝑑 ∨ 𝑆)) = ((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)))
43	23, 42	eqtrid 2780	. . . 4 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝐺 = ((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)))
44		dalem54.h	. . . . 5 ⊢ 𝐻 = ((𝑐 ∨ 𝑄) ∧ (𝑑 ∨ 𝑇))
45	1	dalemqea 39132	. . . . . . . 8 ⊢ (𝜑 → 𝑄 ∈ 𝐴)
46	45	3ad2ant1 1130	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑄 ∈ 𝐴)
47	32, 3, 4	hlatjcl 38871	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑐 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) → (𝑐 ∨ 𝑄) ∈ (Base‘𝐾))
48	27, 29, 46, 47	syl3anc 1368	. . . . . 6 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → (𝑐 ∨ 𝑄) ∈ (Base‘𝐾))
49	1	dalemtea 39135	. . . . . . . 8 ⊢ (𝜑 → 𝑇 ∈ 𝐴)
50	49	3ad2ant1 1130	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑇 ∈ 𝐴)
51	32, 3, 4	hlatjcl 38871	. . . . . . 7 ⊢ ((𝐾 ∈ HL ∧ 𝑑 ∈ 𝐴 ∧ 𝑇 ∈ 𝐴) → (𝑑 ∨ 𝑇) ∈ (Base‘𝐾))
52	27, 36, 50, 51	syl3anc 1368	. . . . . 6 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → (𝑑 ∨ 𝑇) ∈ (Base‘𝐾))
53	32, 13	latmcom 18462	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (𝑐 ∨ 𝑄) ∈ (Base‘𝐾) ∧ (𝑑 ∨ 𝑇) ∈ (Base‘𝐾)) → ((𝑐 ∨ 𝑄) ∧ (𝑑 ∨ 𝑇)) = ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄)))
54	25, 48, 52, 53	syl3anc 1368	. . . . 5 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((𝑐 ∨ 𝑄) ∧ (𝑑 ∨ 𝑇)) = ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄)))
55	44, 54	eqtrid 2780	. . . 4 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝐻 = ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄)))
56	43, 55	oveq12d 7444	. . 3 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → (𝐺 ∨ 𝐻) = (((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))))
57	56	oveq1d 7441	. 2 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((𝐺 ∨ 𝐻) ∧ (𝑆 ∨ 𝑇)) = ((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∧ (𝑆 ∨ 𝑇)))
58		dalem54.b1	. . . 4 ⊢ 𝐵 = (((𝐺 ∨ 𝐻) ∨ 𝐼) ∧ 𝑌)
59		dalem54.i	. . . . . . 7 ⊢ 𝐼 = ((𝑐 ∨ 𝑅) ∧ (𝑑 ∨ 𝑈))
60	1	dalemrea 39133	. . . . . . . . . 10 ⊢ (𝜑 → 𝑅 ∈ 𝐴)
61	60	3ad2ant1 1130	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑅 ∈ 𝐴)
62	32, 3, 4	hlatjcl 38871	. . . . . . . . 9 ⊢ ((𝐾 ∈ HL ∧ 𝑐 ∈ 𝐴 ∧ 𝑅 ∈ 𝐴) → (𝑐 ∨ 𝑅) ∈ (Base‘𝐾))
63	27, 29, 61, 62	syl3anc 1368	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → (𝑐 ∨ 𝑅) ∈ (Base‘𝐾))
64	1	dalemuea 39136	. . . . . . . . . 10 ⊢ (𝜑 → 𝑈 ∈ 𝐴)
65	64	3ad2ant1 1130	. . . . . . . . 9 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝑈 ∈ 𝐴)
66	32, 3, 4	hlatjcl 38871	. . . . . . . . 9 ⊢ ((𝐾 ∈ HL ∧ 𝑑 ∈ 𝐴 ∧ 𝑈 ∈ 𝐴) → (𝑑 ∨ 𝑈) ∈ (Base‘𝐾))
67	27, 36, 65, 66	syl3anc 1368	. . . . . . . 8 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → (𝑑 ∨ 𝑈) ∈ (Base‘𝐾))
68	32, 13	latmcom 18462	. . . . . . . 8 ⊢ ((𝐾 ∈ Lat ∧ (𝑐 ∨ 𝑅) ∈ (Base‘𝐾) ∧ (𝑑 ∨ 𝑈) ∈ (Base‘𝐾)) → ((𝑐 ∨ 𝑅) ∧ (𝑑 ∨ 𝑈)) = ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅)))
69	25, 63, 67, 68	syl3anc 1368	. . . . . . 7 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((𝑐 ∨ 𝑅) ∧ (𝑑 ∨ 𝑈)) = ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅)))
70	59, 69	eqtrid 2780	. . . . . 6 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝐼 = ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅)))
71	56, 70	oveq12d 7444	. . . . 5 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((𝐺 ∨ 𝐻) ∨ 𝐼) = ((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∨ ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅))))
72	71, 7	oveq12d 7444	. . . 4 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → (((𝐺 ∨ 𝐻) ∨ 𝐼) ∧ 𝑌) = (((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∨ ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅))) ∧ 𝑍))
73	58, 72	eqtrid 2780	. . 3 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → 𝐵 = (((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∨ ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅))) ∧ 𝑍))
74	56, 73	oveq12d 7444	. 2 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((𝐺 ∨ 𝐻) ∧ 𝐵) = ((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∧ (((((𝑑 ∨ 𝑆) ∧ (𝑐 ∨ 𝑃)) ∨ ((𝑑 ∨ 𝑇) ∧ (𝑐 ∨ 𝑄))) ∨ ((𝑑 ∨ 𝑈) ∧ (𝑐 ∨ 𝑅))) ∧ 𝑍)))
75	22, 57, 74	3eqtr4d 2778	1 ⊢ ((𝜑 ∧ 𝑌 = 𝑍 ∧ 𝜓) → ((𝐺 ∨ 𝐻) ∧ (𝑆 ∨ 𝑇)) = ((𝐺 ∨ 𝐻) ∧ 𝐵))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 205 ∧ wa 394 ∧ w3a 1084 = wceq 1533 ∈ wcel 2098 ≠ wne 2937 class class class wbr 5152 ‘cfv 6553 (class class class)co 7426 Basecbs 17187 lecple 17247 joincjn 18310 meetcmee 18311 Latclat 18430 Atomscatm 38767 HLchlt 38854 LPlanesclpl 38997

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 2166 ax-ext 2699 ax-rep 5289 ax-sep 5303 ax-nul 5310 ax-pow 5369 ax-pr 5433 ax-un 7746

This theorem depends on definitions: df-bi 206 df-an 395 df-or 846 df-3or 1085 df-3an 1086 df-tru 1536 df-fal 1546 df-ex 1774 df-nf 1778 df-sb 2060 df-mo 2529 df-eu 2558 df-clab 2706 df-cleq 2720 df-clel 2806 df-nfc 2881 df-ne 2938 df-ral 3059 df-rex 3068 df-rmo 3374 df-reu 3375 df-rab 3431 df-v 3475 df-sbc 3779 df-csb 3895 df-dif 3952 df-un 3954 df-in 3956 df-ss 3966 df-nul 4327 df-if 4533 df-pw 4608 df-sn 4633 df-pr 4635 df-op 4639 df-uni 4913 df-iun 5002 df-br 5153 df-opab 5215 df-mpt 5236 df-id 5580 df-xp 5688 df-rel 5689 df-cnv 5690 df-co 5691 df-dm 5692 df-rn 5693 df-res 5694 df-ima 5695 df-iota 6505 df-fun 6555 df-fn 6556 df-f 6557 df-f1 6558 df-fo 6559 df-f1o 6560 df-fv 6561 df-riota 7382 df-ov 7429 df-oprab 7430 df-proset 18294 df-poset 18312 df-plt 18329 df-lub 18345 df-glb 18346 df-join 18347 df-meet 18348 df-p0 18424 df-lat 18431 df-clat 18498 df-oposet 38680 df-ol 38682 df-oml 38683 df-covers 38770 df-ats 38771 df-atl 38802 df-cvlat 38826 df-hlat 38855 df-llines 39003 df-lplanes 39004 df-lvols 39005

This theorem is referenced by: dalem57 39234

W3C validator