cdlemk53 - Mathbox for Norm Megill

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

Theorem cdlemk53 39766

Description: Part of proof of Lemma K of [Crawley] p. 118. Line 7, 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
cdlemk53	⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → ⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 = (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋))

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

**Proof of Theorem cdlemk53**
Step	Hyp	Ref	Expression
1		simp1l 1198	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
2		simp211 1312	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → 𝐹 ∈ 𝑇)
3		simp212 1313	. . . . . . . 8 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → 𝐹 ≠ ( I ↾ 𝐵))
4	2, 3	jca 513	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → (𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵)))
5		simp22 1208	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → 𝐺 ∈ 𝑇)
6		simp213 1314	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → 𝑁 ∈ 𝑇)
7		simp23 1209	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
8		simp1r 1199	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → (𝑅‘𝐹) = (𝑅‘𝑁))
9		cdlemk5.b	. . . . . . . 8 ⊢ 𝐵 = (Base‘𝐾)
10		cdlemk5.l	. . . . . . . 8 ⊢ ≤ = (le‘𝐾)
11		cdlemk5.j	. . . . . . . 8 ⊢ ∨ = (join‘𝐾)
12		cdlemk5.m	. . . . . . . 8 ⊢ ∧ = (meet‘𝐾)
13		cdlemk5.a	. . . . . . . 8 ⊢ 𝐴 = (Atoms‘𝐾)
14		cdlemk5.h	. . . . . . . 8 ⊢ 𝐻 = (LHyp‘𝐾)
15		cdlemk5.t	. . . . . . . 8 ⊢ 𝑇 = ((LTrn‘𝐾)‘𝑊)
16		cdlemk5.r	. . . . . . . 8 ⊢ 𝑅 = ((trL‘𝐾)‘𝑊)
17		cdlemk5.z	. . . . . . . 8 ⊢ 𝑍 = ((𝑃 ∨ (𝑅‘𝑏)) ∧ ((𝑁‘𝑃) ∨ (𝑅‘(𝑏 ∘ ^◡𝐹))))
18		cdlemk5.y	. . . . . . . 8 ⊢ 𝑌 = ((𝑃 ∨ (𝑅‘𝑔)) ∧ (𝑍 ∨ (𝑅‘(𝑔 ∘ ^◡𝑏))))
19		cdlemk5.x	. . . . . . . 8 ⊢ 𝑋 = (℩𝑧 ∈ 𝑇 ∀𝑏 ∈ 𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝑏) ≠ (𝑅‘𝐹) ∧ (𝑅‘𝑏) ≠ (𝑅‘𝑔)) → (𝑧‘𝑃) = 𝑌))
20	9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19	cdlemk35s-id 39747	. . . . . . 7 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵)) ∧ 𝐺 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ (𝑅‘𝐹) = (𝑅‘𝑁))) → ⦋𝐺 / 𝑔⦌𝑋 ∈ 𝑇)
21	1, 4, 5, 6, 7, 8, 20	syl132anc 1389	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → ⦋𝐺 / 𝑔⦌𝑋 ∈ 𝑇)
22	9, 14, 15	ltrn1o 38933	. . . . . 6 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ ⦋𝐺 / 𝑔⦌𝑋 ∈ 𝑇) → ⦋𝐺 / 𝑔⦌𝑋:𝐵–1-1-onto→𝐵)
23	1, 21, 22	syl2anc 585	. . . . 5 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → ⦋𝐺 / 𝑔⦌𝑋:𝐵–1-1-onto→𝐵)
24		f1of 6830	. . . . 5 ⊢ (⦋𝐺 / 𝑔⦌𝑋:𝐵–1-1-onto→𝐵 → ⦋𝐺 / 𝑔⦌𝑋:𝐵⟶𝐵)
25		fcoi1 6762	. . . . 5 ⊢ (⦋𝐺 / 𝑔⦌𝑋:𝐵⟶𝐵 → (⦋𝐺 / 𝑔⦌𝑋 ∘ ( I ↾ 𝐵)) = ⦋𝐺 / 𝑔⦌𝑋)
26	23, 24, 25	3syl 18	. . . 4 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → (⦋𝐺 / 𝑔⦌𝑋 ∘ ( I ↾ 𝐵)) = ⦋𝐺 / 𝑔⦌𝑋)
27	26	adantr 482	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → (⦋𝐺 / 𝑔⦌𝑋 ∘ ( I ↾ 𝐵)) = ⦋𝐺 / 𝑔⦌𝑋)
28		simpl1l 1225	. . . . 5 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → (𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻))
29	2, 6, 8	3jca 1129	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)))
30	29	adantr 482	. . . . 5 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)))
31		simpl23 1254	. . . . 5 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊))
32		simpr 486	. . . . 5 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → 𝐼 = ( I ↾ 𝐵))
33	9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19	cdlemkid 39745	. . . . 5 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝐹 ∈ 𝑇 ∧ 𝑁 ∈ 𝑇 ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊) ∧ 𝐼 = ( I ↾ 𝐵))) → ⦋𝐼 / 𝑔⦌𝑋 = ( I ↾ 𝐵))
34	28, 30, 31, 32, 33	syl112anc 1375	. . . 4 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → ⦋𝐼 / 𝑔⦌𝑋 = ( I ↾ 𝐵))
35	34	coeq2d 5860	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋) = (⦋𝐺 / 𝑔⦌𝑋 ∘ ( I ↾ 𝐵)))
36	32	coeq2d 5860	. . . . 5 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → (𝐺 ∘ 𝐼) = (𝐺 ∘ ( I ↾ 𝐵)))
37	9, 14, 15	ltrn1o 38933	. . . . . . . 8 ⊢ (((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ 𝐺 ∈ 𝑇) → 𝐺:𝐵–1-1-onto→𝐵)
38	1, 5, 37	syl2anc 585	. . . . . . 7 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → 𝐺:𝐵–1-1-onto→𝐵)
39		f1of 6830	. . . . . . 7 ⊢ (𝐺:𝐵–1-1-onto→𝐵 → 𝐺:𝐵⟶𝐵)
40		fcoi1 6762	. . . . . . 7 ⊢ (𝐺:𝐵⟶𝐵 → (𝐺 ∘ ( I ↾ 𝐵)) = 𝐺)
41	38, 39, 40	3syl 18	. . . . . 6 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → (𝐺 ∘ ( I ↾ 𝐵)) = 𝐺)
42	41	adantr 482	. . . . 5 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → (𝐺 ∘ ( I ↾ 𝐵)) = 𝐺)
43	36, 42	eqtrd 2773	. . . 4 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → (𝐺 ∘ 𝐼) = 𝐺)
44	43	csbeq1d 3896	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → ⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 = ⦋𝐺 / 𝑔⦌𝑋)
45	27, 35, 44	3eqtr4rd 2784	. 2 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 = ( I ↾ 𝐵)) → ⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 = (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋))
46		simpl1 1192	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 ≠ ( I ↾ 𝐵)) → ((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)))
47		simpl2 1193	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 ≠ ( I ↾ 𝐵)) → ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)))
48		simpl3l 1229	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 ≠ ( I ↾ 𝐵)) → 𝐼 ∈ 𝑇)
49		simpr 486	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 ≠ ( I ↾ 𝐵)) → 𝐼 ≠ ( I ↾ 𝐵))
50		simpl3r 1230	. . 3 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 ≠ ( I ↾ 𝐵)) → (𝑅‘𝐺) ≠ (𝑅‘𝐼))
51	9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19	cdlemk53b 39765	. . 3 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ 𝐼 ≠ ( I ↾ 𝐵) ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → ⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 = (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋))
52	46, 47, 48, 49, 50, 51	syl113anc 1383	. 2 ⊢ (((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) ∧ 𝐼 ≠ ( I ↾ 𝐵)) → ⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 = (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋))
53	45, 52	pm2.61dane 3030	1 ⊢ ((((𝐾 ∈ HL ∧ 𝑊 ∈ 𝐻) ∧ (𝑅‘𝐹) = (𝑅‘𝑁)) ∧ ((𝐹 ∈ 𝑇 ∧ 𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁 ∈ 𝑇) ∧ 𝐺 ∈ 𝑇 ∧ (𝑃 ∈ 𝐴 ∧ ¬ 𝑃 ≤ 𝑊)) ∧ (𝐼 ∈ 𝑇 ∧ (𝑅‘𝐺) ≠ (𝑅‘𝐼))) → ⦋(𝐺 ∘ 𝐼) / 𝑔⦌𝑋 = (⦋𝐺 / 𝑔⦌𝑋 ∘ ⦋𝐼 / 𝑔⦌𝑋))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 397 ∧ w3a 1088 = wceq 1542 ∈ wcel 2107 ≠ wne 2941 ∀wral 3062 ⦋csb 3892 class class class wbr 5147 I cid 5572 ^◡ccnv 5674 ↾ cres 5677 ∘ ccom 5679 ⟶wf 6536 –1-1-onto→wf1o 6539 ‘cfv 6540 ℩crio 7359 (class class class)co 7404 Basecbs 17140 lecple 17200 joincjn 18260 meetcmee 18261 Atomscatm 38071 HLchlt 38158 LHypclh 38793 LTrncltrn 38910 trLctrl 38967

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1798 ax-4 1812 ax-5 1914 ax-6 1972 ax-7 2012 ax-8 2109 ax-9 2117 ax-10 2138 ax-11 2155 ax-12 2172 ax-ext 2704 ax-rep 5284 ax-sep 5298 ax-nul 5305 ax-pow 5362 ax-pr 5426 ax-un 7720 ax-riotaBAD 37761

This theorem depends on definitions: df-bi 206 df-an 398 df-or 847 df-3or 1089 df-3an 1090 df-tru 1545 df-fal 1555 df-ex 1783 df-nf 1787 df-sb 2069 df-mo 2535 df-eu 2564 df-clab 2711 df-cleq 2725 df-clel 2811 df-nfc 2886 df-ne 2942 df-ral 3063 df-rex 3072 df-rmo 3377 df-reu 3378 df-rab 3434 df-v 3477 df-sbc 3777 df-csb 3893 df-dif 3950 df-un 3952 df-in 3954 df-ss 3964 df-nul 4322 df-if 4528 df-pw 4603 df-sn 4628 df-pr 4630 df-op 4634 df-uni 4908 df-iun 4998 df-iin 4999 df-br 5148 df-opab 5210 df-mpt 5231 df-id 5573 df-xp 5681 df-rel 5682 df-cnv 5683 df-co 5684 df-dm 5685 df-rn 5686 df-res 5687 df-ima 5688 df-iota 6492 df-fun 6542 df-fn 6543 df-f 6544 df-f1 6545 df-fo 6546 df-f1o 6547 df-fv 6548 df-riota 7360 df-ov 7407 df-oprab 7408 df-mpo 7409 df-1st 7970 df-2nd 7971 df-undef 8253 df-map 8818 df-proset 18244 df-poset 18262 df-plt 18279 df-lub 18295 df-glb 18296 df-join 18297 df-meet 18298 df-p0 18374 df-p1 18375 df-lat 18381 df-clat 18448 df-oposet 37984 df-ol 37986 df-oml 37987 df-covers 38074 df-ats 38075 df-atl 38106 df-cvlat 38130 df-hlat 38159 df-llines 38307 df-lplanes 38308 df-lvols 38309 df-lines 38310 df-psubsp 38312 df-pmap 38313 df-padd 38605 df-lhyp 38797 df-laut 38798 df-ldil 38913 df-ltrn 38914 df-trl 38968

This theorem is referenced by: cdlemk54 39767 cdlemk55 39770

W3C validator