cdlemk54 - Mathbox for Norm Megill

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

Theorem cdlemk54 40463

Description: Part of proof of Lemma K of [Crawley] p. 118. Line 10, p. 120. 𝐺, 𝐼 stand for g, h. 𝑋 represents tau. (Contributed by NM, 26-Jul-2013.)

**Hypotheses**
Ref	Expression
cdlemk5.b	⊢ 𝐵 = (Base‘𝐾)
cdlemk5.l	⊢ ≤ = (le‘𝐾)
cdlemk5.j	⊢ ∨ = (join‘𝐾)
cdlemk5.m	⊢ ∧ = (meet‘𝐾)
cdlemk5.a	⊢ 𝐴 = (Atoms‘𝐾)
cdlemk5.h	⊢ 𝐻 = (LHyp‘𝐾)
cdlemk5.t	⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemk5.r	⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
cdlemk5.z	⊢ 𝑍 = ((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))))
cdlemk5.y	⊢ 𝑌 = ((𝑃 ∨ (𝑅‘𝑔)) ∧ (𝑍 ∨ (𝑅‘(𝑔 ∘ ^◡𝑏))))
cdlemk5.x	⊢ 𝑋 = (℩𝑧 ∈ 𝑇 ∀𝑏 ∈ 𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑏) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝑏) ≠ (𝑅‘𝑔)) → (𝑧‘𝑃) = 𝑌))

**Assertion**
Ref	Expression
cdlemk54	⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 ∘ ⦋𝑗 / 𝑔⦌𝑋) = ((⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋) ∘ ⦋𝑗 / 𝑔⦌𝑋))

Distinct variable groups: ∧ ,𝑔 ∨ ,𝑔 𝐵,𝑔 𝑃,𝑔 𝑅,𝑔 𝑇,𝑔 𝑔,𝑍 𝑔,𝑏,𝐺,𝑧 ∧ ,𝑏,𝑧 ≤ ,𝑏 𝑧,𝑔, ≤ ∨ ,𝑏,𝑧 𝐴,𝑏,𝑔,𝑧 𝐵,𝑏,𝑧 𝐹,𝑏,𝑔,𝑧 𝑧,𝐺 𝐻,𝑏,𝑔,𝑧 𝐾,𝑏,𝑔,𝑧 𝑁,𝑏,𝑔,𝑧 𝑃,𝑏,𝑧 𝑅,𝑏,𝑧 𝑇,𝑏,𝑧 𝑊,𝑏,𝑔,𝑧 𝑧,𝑌 𝐺,𝑏 𝐼,𝑏,𝑔,𝑧 𝑗,𝑏,𝑔,𝑧 Allowed substitution hints: 𝐴(𝑗) 𝐵(𝑗) 𝑃(𝑗) 𝑅(𝑗) 𝑇(𝑗) 𝐹(𝑗) 𝐺(𝑗) 𝐻(𝑗) 𝐼(𝑗) ∨ (𝑗) 𝐾(𝑗) ≤ (𝑗) ∧ (𝑗) 𝑁(𝑗) 𝑊(𝑗) 𝑋(𝑧,𝑔,𝑗,𝑏) 𝑌(𝑔,𝑗,𝑏) 𝑍(𝑧,𝑗,𝑏)

**Proof of Theorem cdlemk54**
Step	Hyp	Ref	Expression
1		coass 6274	. . 3 ⊢ ((𝐺 ∘ 𝐼) ∘ 𝑗) = (𝐺 ∘ (𝐼 ∘ 𝑗))
2		csbeq1 3897	. . 3 ⊢ (((𝐺 ∘ 𝐼) ∘ 𝑗) = (𝐺 ∘ (𝐼 ∘ 𝑗)) → ⦋((𝐺 ∘ 𝐼) ∘ 𝑗) / 𝑔⦌𝑋 = ⦋(𝐺 ∘ (𝐼 ∘ 𝑗)) / 𝑔⦌𝑋)
3	1, 2	ax-mp 5	. 2 ⊢ ⦋((𝐺 ∘ 𝐼) ∘ 𝑗) / 𝑔⦌𝑋 = ⦋(𝐺 ∘ (𝐼 ∘ 𝑗)) / 𝑔⦌𝑋
4		simp1 1133	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)))
5		simp21 1203	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇))
6		simp1l 1194	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
7		simp22 1204	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → 𝐺 ∈ 𝑇)
8		simp31l 1293	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → 𝐼 ∈ 𝑇)
9		cdlemk5.h	. . . . 5 ⊢ 𝐻 = (LHyp‘𝐾)
10		cdlemk5.t	. . . . 5 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
11	9, 10	ltrnco 40224	. . . 4 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇 ∧ 𝐼 ∈ 𝑇) → (𝐺 ∘ 𝐼) ∈ 𝑇)
12	6, 7, 8, 11	syl3anc 1368	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝐺 ∘ 𝐼) ∈ 𝑇)
13		simp23 1205	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
14		simp32 1207	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → 𝑗 ∈ 𝑇)
15		simp333 1325	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼)))
16	15	necomd 2993	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝑅‘(𝐺 ∘ 𝐼)) ≠ (𝑅‘𝑗))
17		cdlemk5.b	. . . 4 ⊢ 𝐵 = (Base‘𝐾)
18		cdlemk5.l	. . . 4 ⊢ ≤ = (le‘𝐾)
19		cdlemk5.j	. . . 4 ⊢ ∨ = (join‘𝐾)
20		cdlemk5.m	. . . 4 ⊢ ∧ = (meet‘𝐾)
21		cdlemk5.a	. . . 4 ⊢ 𝐴 = (Atoms‘𝐾)
22		cdlemk5.r	. . . 4 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
23		cdlemk5.z	. . . 4 ⊢ 𝑍 = ((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))))
24		cdlemk5.y	. . . 4 ⊢ 𝑌 = ((𝑃 ∨ (𝑅‘𝑔)) ∧ (𝑍 ∨ (𝑅‘(𝑔 ∘ ^◡𝑏))))
25		cdlemk5.x	. . . 4 ⊢ 𝑋 = (℩𝑧 ∈ 𝑇 ∀𝑏 ∈ 𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑏) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝑏) ≠ (𝑅‘𝑔)) → (𝑧‘𝑃) = 𝑌))
26	17, 18, 19, 20, 21, 9, 10, 22, 23, 24, 25	cdlemk53 40462	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ (𝐺 ∘ 𝐼) ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝑗 ∈ 𝑇 ∧ (𝑅‘(𝐺 ∘ 𝐼)) ≠ (𝑅‘𝑗))) → ⦋((𝐺 ∘ 𝐼) ∘ 𝑗) / 𝑔⦌𝑋 = (⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 ∘ ⦋𝑗 / 𝑔⦌𝑋))
27	4, 5, 12, 13, 14, 16, 26	syl132anc 1385	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → ⦋((𝐺 ∘ 𝐼) ∘ 𝑗) / 𝑔⦌𝑋 = (⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 ∘ ⦋𝑗 / 𝑔⦌𝑋))
28		simp2 1134	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)))
29	9, 10	ltrnco 40224	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐼 ∈ 𝑇 ∧ 𝑗 ∈ 𝑇) → (𝐼 ∘ 𝑗) ∈ 𝑇)
30	6, 8, 14, 29	syl3anc 1368	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝐼 ∘ 𝑗) ∈ 𝑇)
31		simp31r 1294	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝑅‘𝐺) = (𝑅‘𝐼))
32		simp332 1324	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝑅‘𝑗) ≠ (𝑅‘𝐺))
33	32, 31	neeqtrd 3007	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝑅‘𝑗) ≠ (𝑅‘𝐼))
34	33	necomd 2993	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝑅‘𝐼) ≠ (𝑅‘𝑗))
35		simp331 1323	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → 𝑗 ≠ ( I ↾ 𝐵))
36	17, 9, 10, 22	trlcone 40233	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐼 ∈ 𝑇 ∧ 𝑗 ∈ 𝑇) ∧ ((𝑅‘𝐼) ≠ (𝑅‘𝑗) ∧ 𝑗 ≠ ( I ↾ 𝐵))) → (𝑅‘𝐼) ≠ (𝑅‘(𝐼 ∘ 𝑗)))
37	6, 8, 14, 34, 35, 36	syl122anc 1376	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝑅‘𝐼) ≠ (𝑅‘(𝐼 ∘ 𝑗)))
38	31, 37	eqnetrd 3005	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (𝑅‘𝐺) ≠ (𝑅‘(𝐼 ∘ 𝑗)))
39	17, 18, 19, 20, 21, 9, 10, 22, 23, 24, 25	cdlemk53 40462	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∘ 𝑗) ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘(𝐼 ∘ 𝑗)))) → ⦋(𝐺 ∘ (𝐼 ∘ 𝑗)) / 𝑔⦌𝑋 = (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋(𝐼 ∘ 𝑗) / 𝑔⦌𝑋))
40	4, 28, 30, 38, 39	syl112anc 1371	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → ⦋(𝐺 ∘ (𝐼 ∘ 𝑗)) / 𝑔⦌𝑋 = (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋(𝐼 ∘ 𝑗) / 𝑔⦌𝑋))
41	17, 18, 19, 20, 21, 9, 10, 22, 23, 24, 25	cdlemk53 40462	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐼 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝑗 ∈ 𝑇 ∧ (𝑅‘𝐼) ≠ (𝑅‘𝑗))) → ⦋(𝐼 ∘ 𝑗) / 𝑔⦌𝑋 = (⦋𝐼 / 𝑔⦌𝑋 ∘ ⦋𝑗 / 𝑔⦌𝑋))
42	4, 5, 8, 13, 14, 34, 41	syl132anc 1385	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → ⦋(𝐼 ∘ 𝑗) / 𝑔⦌𝑋 = (⦋𝐼 / 𝑔⦌𝑋 ∘ ⦋𝑗 / 𝑔⦌𝑋))
43	42	coeq2d 5869	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋(𝐼 ∘ 𝑗) / 𝑔⦌𝑋) = (⦋𝐺 / 𝑔⦌𝑋 ∘ (⦋𝐼 / 𝑔⦌𝑋 ∘ ⦋𝑗 / 𝑔⦌𝑋)))
44		coass 6274	. . . 4 ⊢ ((⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋) ∘ ⦋𝑗 / 𝑔⦌𝑋) = (⦋𝐺 / 𝑔⦌𝑋 ∘ (⦋𝐼 / 𝑔⦌𝑋 ∘ ⦋𝑗 / 𝑔⦌𝑋))
45	43, 44	eqtr4di 2786	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋(𝐼 ∘ 𝑗) / 𝑔⦌𝑋) = ((⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋) ∘ ⦋𝑗 / 𝑔⦌𝑋))
46	40, 45	eqtrd 2768	. 2 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → ⦋(𝐺 ∘ (𝐼 ∘ 𝑗)) / 𝑔⦌𝑋 = ((⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋) ∘ ⦋𝑗 / 𝑔⦌𝑋))
47	3, 27, 46	3eqtr3a 2792	1 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ ((𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) = (𝑅‘𝐼)) ∧ 𝑗 ∈ 𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑗) ≠ (𝑅‘𝐺) ∧ (𝑅‘𝑗) ≠ (𝑅‘(𝐺 ∘ 𝐼))))) → (⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 ∘ ⦋𝑗 / 𝑔⦌𝑋) = ((⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋) ∘ ⦋𝑗 / 𝑔⦌𝑋))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 394 ∧ w3a 1084 = wceq 1533 ∈ wcel 2098 ≠ wne 2937 ∀wral 3058 ⦋csb 3894 class class class wbr 5152 I cid 5579 ^◡ccnv 5681 ↾ cres 5684 ∘ ccom 5686 ‘cfv 6553 ℩crio 7381 (class class class)co 7426 Basecbs 17187 lecple 17247 joincjn 18310 meetcmee 18311 Atomscatm 38767 HLchlt 38854 LHypclh 39489 LTrncltrn 39606 trLctrl 39663

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 ax-riotaBAD 38457

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-iin 5003 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-mpo 7431 df-1st 7999 df-2nd 8000 df-undef 8285 df-map 8853 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-p1 18425 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 df-lines 39006 df-psubsp 39008 df-pmap 39009 df-padd 39301 df-lhyp 39493 df-laut 39494 df-ldil 39609 df-ltrn 39610 df-trl 39664

This theorem is referenced by: cdlemk55a 40464

W3C validator