cdlemh1 - Mathbox for Norm Megill

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

Theorem cdlemh1 41278

Description: Part of proof of Lemma H of [Crawley] p. 118. (Contributed by NM, 17-Jun-2013.)

**Hypotheses**
Ref	Expression
cdlemh.b	⊢ 𝐵 = (Base‘𝐾)
cdlemh.l	⊢ ≤ = (le‘𝐾)
cdlemh.j	⊢ ∨ = (join‘𝐾)
cdlemh.m	⊢ ∧ = (meet‘𝐾)
cdlemh.a	⊢ 𝐴 = (Atoms‘𝐾)
cdlemh.h	⊢ 𝐻 = (LHyp‘𝐾)
cdlemh.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemh.r	⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
cdlemh.s	⊢ 𝑆 = ((𝑃 ∨ (𝑅‘𝐺)) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))

**Assertion**
Ref	Expression
cdlemh1	⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑆 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))

**Proof of Theorem cdlemh1**
Step	Hyp	Ref	Expression
1		cdlemh.s	. . 3 ⊢ 𝑆 = ((𝑃 ∨ (𝑅‘𝐺)) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
2	1	oveq1i 7371	. 2 ⊢ (𝑆 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (((𝑃 ∨ (𝑅‘𝐺)) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))
3		simp11l 1286	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → 𝐾 ∈ HL)
4		simp11 1205	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
5		simp13 1207	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → 𝐺 ∈ 𝑇)
6		simp12 1206	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → 𝐹 ∈ 𝑇)
7		simp3r 1204	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑅‘𝐹) ≠ (𝑅‘𝐺))
8	7	necomd 2988	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑅‘𝐺) ≠ (𝑅‘𝐹))
9		cdlemh.a	. . . . . 6 ⊢ 𝐴 = (Atoms‘𝐾)
10		cdlemh.h	. . . . . 6 ⊢ 𝐻 = (LHyp‘𝐾)
11		cdlemh.t	. . . . . 6 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
12		cdlemh.r	. . . . . 6 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
13	9, 10, 11, 12	trlcocnvat 41187	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐺 ∈ 𝑇 ∧ 𝐹 ∈ 𝑇) ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐹)) → (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐴)
14	4, 5, 6, 8, 13	syl121anc 1378	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐴)
15	3	hllatd 39827	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → 𝐾 ∈ Lat)
16		simp2l 1201	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → 𝑃 ∈ 𝐴)
17		cdlemh.b	. . . . . . 7 ⊢ 𝐵 = (Base‘𝐾)
18	17, 9	atbase 39752	. . . . . 6 ⊢ (𝑃 ∈ 𝐴 → 𝑃 ∈ 𝐵)
19	16, 18	syl 17	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → 𝑃 ∈ 𝐵)
20	17, 10, 11, 12	trlcl 40627	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇) → (𝑅‘𝐺) ∈ 𝐵)
21	4, 5, 20	syl2anc 585	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑅‘𝐺) ∈ 𝐵)
22		cdlemh.j	. . . . . 6 ⊢ ∨ = (join‘𝐾)
23	17, 22	latjcl 18399	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐵 ∧ (𝑅‘𝐺) ∈ 𝐵) → (𝑃 ∨ (𝑅‘𝐺)) ∈ 𝐵)
24	15, 19, 21, 23	syl3anc 1374	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑃 ∨ (𝑅‘𝐺)) ∈ 𝐵)
25		simp2r 1202	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → 𝑄 ∈ 𝐴)
26	17, 22, 9	hlatjcl 39830	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑄 ∈ 𝐴 ∧ (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐴) → (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∈ 𝐵)
27	3, 25, 14, 26	syl3anc 1374	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∈ 𝐵)
28		cdlemh.l	. . . . . 6 ⊢ ≤ = (le‘𝐾)
29	28, 22, 9	hlatlej2 39839	. . . . 5 ⊢ ((𝐾 ∈ HL ∧ 𝑄 ∈ 𝐴 ∧ (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐴) → (𝑅‘(𝐺 ∘ ^◡𝐹)) ≤ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
30	3, 25, 14, 29	syl3anc 1374	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑅‘(𝐺 ∘ ^◡𝐹)) ≤ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
31		cdlemh.m	. . . . 5 ⊢ ∧ = (meet‘𝐾)
32	17, 28, 22, 31, 9	atmod4i1 40329	. . . 4 ⊢ ((𝐾 ∈ HL ∧ ((𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐴 ∧ (𝑃 ∨ (𝑅‘𝐺)) ∈ 𝐵 ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∈ 𝐵) ∧ (𝑅‘(𝐺 ∘ ^◡𝐹)) ≤ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) → (((𝑃 ∨ (𝑅‘𝐺)) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (((𝑃 ∨ (𝑅‘𝐺)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
33	3, 14, 24, 27, 30, 32	syl131anc 1386	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (((𝑃 ∨ (𝑅‘𝐺)) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (((𝑃 ∨ (𝑅‘𝐺)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
34	10, 11	ltrncnv 40609	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → ^◡𝐹 ∈ 𝑇)
35	4, 6, 34	syl2anc 585	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → ^◡𝐹 ∈ 𝑇)
36	22, 10, 11, 12	trljco2 41204	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇 ∧ ^◡𝐹 ∈ 𝑇) → ((𝑅‘𝐺) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = ((𝑅‘^◡𝐹) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
37	4, 5, 35, 36	syl3anc 1374	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → ((𝑅‘𝐺) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = ((𝑅‘^◡𝐹) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
38	10, 11, 12	trlcnv 40628	. . . . . . . . 9 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (𝑅‘^◡𝐹) = (𝑅‘𝐹))
39	4, 6, 38	syl2anc 585	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑅‘^◡𝐹) = (𝑅‘𝐹))
40	39	oveq1d 7376	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → ((𝑅‘^◡𝐹) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = ((𝑅‘𝐹) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
41	37, 40	eqtrd 2772	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → ((𝑅‘𝐺) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = ((𝑅‘𝐹) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
42	41	oveq2d 7377	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑃 ∨ ((𝑅‘𝐺) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) = (𝑃 ∨ ((𝑅‘𝐹) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
43	10, 11	ltrnco 41182	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇 ∧ ^◡𝐹 ∈ 𝑇) → (𝐺 ∘ ^◡𝐹) ∈ 𝑇)
44	4, 5, 35, 43	syl3anc 1374	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝐺 ∘ ^◡𝐹) ∈ 𝑇)
45	17, 10, 11, 12	trlcl 40627	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐺 ∘ ^◡𝐹) ∈ 𝑇) → (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐵)
46	4, 44, 45	syl2anc 585	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐵)
47	17, 22	latjass 18443	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∈ 𝐵 ∧ (𝑅‘𝐺) ∈ 𝐵 ∧ (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐵)) → ((𝑃 ∨ (𝑅‘𝐺)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (𝑃 ∨ ((𝑅‘𝐺) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
48	15, 19, 21, 46, 47	syl13anc 1375	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → ((𝑃 ∨ (𝑅‘𝐺)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (𝑃 ∨ ((𝑅‘𝐺) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
49	17, 10, 11, 12	trlcl 40627	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇) → (𝑅‘𝐹) ∈ 𝐵)
50	4, 6, 49	syl2anc 585	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑅‘𝐹) ∈ 𝐵)
51	17, 22	latjass 18443	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∈ 𝐵 ∧ (𝑅‘𝐹) ∈ 𝐵 ∧ (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐵)) → ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (𝑃 ∨ ((𝑅‘𝐹) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
52	15, 19, 50, 46, 51	syl13anc 1375	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (𝑃 ∨ ((𝑅‘𝐹) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
53	42, 48, 52	3eqtr4d 2782	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → ((𝑃 ∨ (𝑅‘𝐺)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
54	53	oveq1d 7376	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (((𝑃 ∨ (𝑅‘𝐺)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) = (((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
55		simp3l 1203	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → 𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)))
56	17, 9	atbase 39752	. . . . . . 7 ⊢ (𝑄 ∈ 𝐴 → 𝑄 ∈ 𝐵)
57	25, 56	syl 17	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → 𝑄 ∈ 𝐵)
58	17, 22	latjcl 18399	. . . . . . 7 ⊢ ((𝐾 ∈ Lat ∧ 𝑃 ∈ 𝐵 ∧ (𝑅‘𝐹) ∈ 𝐵) → (𝑃 ∨ (𝑅‘𝐹)) ∈ 𝐵)
59	15, 19, 50, 58	syl3anc 1374	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑃 ∨ (𝑅‘𝐹)) ∈ 𝐵)
60	17, 28, 22	latjlej1 18413	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (𝑄 ∈ 𝐵 ∧ (𝑃 ∨ (𝑅‘𝐹)) ∈ 𝐵 ∧ (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐵)) → (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) → (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ≤ ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
61	15, 57, 59, 46, 60	syl13anc 1375	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) → (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ≤ ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
62	55, 61	mpd 15	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ≤ ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
63	17, 22	latjcl 18399	. . . . . 6 ⊢ ((𝐾 ∈ Lat ∧ (𝑃 ∨ (𝑅‘𝐹)) ∈ 𝐵 ∧ (𝑅‘(𝐺 ∘ ^◡𝐹)) ∈ 𝐵) → ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∈ 𝐵)
64	15, 59, 46, 63	syl3anc 1374	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∈ 𝐵)
65	17, 28, 31	latleeqm2 18428	. . . . 5 ⊢ ((𝐾 ∈ Lat ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∈ 𝐵 ∧ ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∈ 𝐵) → ((𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ≤ ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ↔ (((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) = (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
66	15, 27, 64, 65	syl3anc 1374	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → ((𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ≤ ((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ↔ (((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) = (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))))
67	62, 66	mpbid 232	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (((𝑃 ∨ (𝑅‘𝐹)) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) = (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
68	33, 54, 67	3eqtrd 2776	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (((𝑃 ∨ (𝑅‘𝐺)) ∧ (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹)))) ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))
69	2, 68	eqtrid 2784	1 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐹 ∈ 𝑇 ∧ 𝐺 ∈ 𝑇) ∧ (𝑃 ∈ 𝐴 ∧ 𝑄 ∈ 𝐴) ∧ (𝑄 ≤ (𝑃 ∨ (𝑅‘𝐹)) ∧ (𝑅‘𝐹) ≠ (𝑅‘𝐺))) → (𝑆 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))) = (𝑄 ∨ (𝑅‘(𝐺 ∘ ^◡𝐹))))

Colors of variables: wff setvar class

Syntax hints: → wi 4 ↔ wb 206 ∧ wa 395 ∧ w3a 1087 = wceq 1542 ∈ wcel 2114 ≠ wne 2933 class class class wbr 5086 ^◡ccnv 5624 ∘ ccom 5629 ‘cfv 6493 (class class class)co 7361 Basecbs 17173 lecple 17221 joincjn 18271 meetcmee 18272 Latclat 18391 Atomscatm 39726 HLchlt 39813 LHypclh 40447 LTrncltrn 40564 trLctrl 40621

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1912 ax-6 1969 ax-7 2010 ax-8 2116 ax-9 2124 ax-10 2147 ax-11 2163 ax-12 2185 ax-ext 2709 ax-rep 5213 ax-sep 5232 ax-nul 5242 ax-pow 5303 ax-pr 5371 ax-un 7683 ax-riotaBAD 39416

This theorem depends on definitions: df-bi 207 df-an 396 df-or 849 df-3or 1088 df-3an 1089 df-tru 1545 df-fal 1555 df-ex 1782 df-nf 1786 df-sb 2069 df-mo 2540 df-eu 2570 df-clab 2716 df-cleq 2729 df-clel 2812 df-nfc 2886 df-ne 2934 df-ral 3053 df-rex 3063 df-rmo 3343 df-reu 3344 df-rab 3391 df-v 3432 df-sbc 3730 df-csb 3839 df-dif 3893 df-un 3895 df-in 3897 df-ss 3907 df-nul 4275 df-if 4468 df-pw 4544 df-sn 4569 df-pr 4571 df-op 4575 df-uni 4852 df-iun 4936 df-iin 4937 df-br 5087 df-opab 5149 df-mpt 5168 df-id 5520 df-xp 5631 df-rel 5632 df-cnv 5633 df-co 5634 df-dm 5635 df-rn 5636 df-res 5637 df-ima 5638 df-iota 6449 df-fun 6495 df-fn 6496 df-f 6497 df-f1 6498 df-fo 6499 df-f1o 6500 df-fv 6501 df-riota 7318 df-ov 7364 df-oprab 7365 df-mpo 7366 df-1st 7936 df-2nd 7937 df-undef 8217 df-map 8769 df-proset 18254 df-poset 18273 df-plt 18288 df-lub 18304 df-glb 18305 df-join 18306 df-meet 18307 df-p0 18383 df-p1 18384 df-lat 18392 df-clat 18459 df-oposet 39639 df-ol 39641 df-oml 39642 df-covers 39729 df-ats 39730 df-atl 39761 df-cvlat 39785 df-hlat 39814 df-llines 39961 df-lplanes 39962 df-lvols 39963 df-lines 39964 df-psubsp 39966 df-pmap 39967 df-padd 40259 df-lhyp 40451 df-laut 40452 df-ldil 40567 df-ltrn 40568 df-trl 40622

This theorem is referenced by: cdlemh 41280

W3C validator