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

Theorem cdlemk55a 41714
Description: Lemma for cdlemk55 41716. (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
cdlemk55a ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐺𝐼) / 𝑔𝑋 = (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋))
Distinct variable groups:   ,𝑔   ,𝑔   𝐵,𝑔   𝑃,𝑔   𝑅,𝑔   𝑇,𝑔   𝑔,𝑍   𝑔,𝑏,𝐺,𝑧   ,𝑏,𝑧   ,𝑏   𝑧,𝑔,   ,𝑏,𝑧   𝐴,𝑏,𝑔,𝑧   𝐵,𝑏,𝑧   𝐹,𝑏,𝑔,𝑧   𝑧,𝐺   𝐻,𝑏,𝑔,𝑧   𝐾,𝑏,𝑔,𝑧   𝑁,𝑏,𝑔,𝑧   𝑃,𝑏,𝑧   𝑅,𝑏,𝑧   𝑇,𝑏,𝑧   𝑊,𝑏,𝑔,𝑧   𝑧,𝑌   𝐺,𝑏   𝐼,𝑏,𝑔,𝑧   𝑗,𝑏,𝑔,𝑧
Allowed substitution hints:   𝐴(𝑗)   𝐵(𝑗)   𝑃(𝑗)   𝑅(𝑗)   𝑇(𝑗)   𝐹(𝑗)   𝐺(𝑗)   𝐻(𝑗)   𝐼(𝑗)   (𝑗)   𝐾(𝑗)   (𝑗)   (𝑗)   𝑁(𝑗)   𝑊(𝑗)   𝑋(𝑧,𝑔,𝑗,𝑏)   𝑌(𝑔,𝑗,𝑏)   𝑍(𝑧,𝑗,𝑏)

Proof of Theorem cdlemk55a
StepHypRef Expression
1 simp1l 1216 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simp211 1330 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝐹𝑇)
3 simp212 1331 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝐹 ≠ ( I ↾ 𝐵))
42, 3jca 520 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)))
5 simp32 1229 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝑗𝑇)
6 simp213 1332 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝑁𝑇)
7 simp23 1227 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
8 simp1r 1217 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝑅𝐹) = (𝑅𝑁))
97, 8jca 520 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)))
10 cdlemk5.b . . . . . . . . 9 𝐵 = (Base‘𝐾)
11 cdlemk5.l . . . . . . . . 9 = (le‘𝐾)
12 cdlemk5.j . . . . . . . . 9 = (join‘𝐾)
13 cdlemk5.m . . . . . . . . 9 = (meet‘𝐾)
14 cdlemk5.a . . . . . . . . 9 𝐴 = (Atoms‘𝐾)
15 cdlemk5.h . . . . . . . . 9 𝐻 = (LHyp‘𝐾)
16 cdlemk5.t . . . . . . . . 9 𝑇 = ((LTrn‘𝐾)‘𝑊)
17 cdlemk5.r . . . . . . . . 9 𝑅 = ((trL‘𝐾)‘𝑊)
18 cdlemk5.z . . . . . . . . 9 𝑍 = ((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹))))
19 cdlemk5.y . . . . . . . . 9 𝑌 = ((𝑃 (𝑅𝑔)) (𝑍 (𝑅‘(𝑔𝑏))))
20 cdlemk5.x . . . . . . . . 9 𝑋 = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝑔)) → (𝑧𝑃) = 𝑌))
2110, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20cdlemk35s-id 41693 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ 𝑗𝑇𝑁𝑇) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁))) → 𝑗 / 𝑔𝑋𝑇)
221, 4, 5, 6, 9, 21syl131anc 1410 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝑗 / 𝑔𝑋𝑇)
2310, 15, 16ltrn1o 40879 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑗 / 𝑔𝑋𝑇) → 𝑗 / 𝑔𝑋:𝐵1-1-onto𝐵)
241, 22, 23syl2anc 595 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝑗 / 𝑔𝑋:𝐵1-1-onto𝐵)
25 f1ococnv2 6850 . . . . . 6 (𝑗 / 𝑔𝑋:𝐵1-1-onto𝐵 → (𝑗 / 𝑔𝑋𝑗 / 𝑔𝑋) = ( I ↾ 𝐵))
2624, 25syl 18 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝑗 / 𝑔𝑋𝑗 / 𝑔𝑋) = ( I ↾ 𝐵))
2726coeq2d 5850 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → ((𝐺𝐼) / 𝑔𝑋 ∘ (𝑗 / 𝑔𝑋𝑗 / 𝑔𝑋)) = ((𝐺𝐼) / 𝑔𝑋 ∘ ( I ↾ 𝐵)))
28 simp22 1226 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝐺𝑇)
29 simp31l 1315 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝐼𝑇)
3015, 16ltrnco 41474 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇𝐼𝑇) → (𝐺𝐼) ∈ 𝑇)
311, 28, 29, 30syl3anc 1398 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐺𝐼) ∈ 𝑇)
3210, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20cdlemk35s-id 41693 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ (𝐺𝐼) ∈ 𝑇𝑁𝑇) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁))) → (𝐺𝐼) / 𝑔𝑋𝑇)
331, 4, 31, 6, 9, 32syl131anc 1410 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐺𝐼) / 𝑔𝑋𝑇)
3410, 15, 16ltrn1o 40879 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐺𝐼) / 𝑔𝑋𝑇) → (𝐺𝐼) / 𝑔𝑋:𝐵1-1-onto𝐵)
351, 33, 34syl2anc 595 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐺𝐼) / 𝑔𝑋:𝐵1-1-onto𝐵)
36 f1of 6822 . . . . 5 ((𝐺𝐼) / 𝑔𝑋:𝐵1-1-onto𝐵(𝐺𝐼) / 𝑔𝑋:𝐵𝐵)
37 fcoi1 6754 . . . . 5 ((𝐺𝐼) / 𝑔𝑋:𝐵𝐵 → ((𝐺𝐼) / 𝑔𝑋 ∘ ( I ↾ 𝐵)) = (𝐺𝐼) / 𝑔𝑋)
3835, 36, 373syl 19 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → ((𝐺𝐼) / 𝑔𝑋 ∘ ( I ↾ 𝐵)) = (𝐺𝐼) / 𝑔𝑋)
3927, 38eqtr2d 2799 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐺𝐼) / 𝑔𝑋 = ((𝐺𝐼) / 𝑔𝑋 ∘ (𝑗 / 𝑔𝑋𝑗 / 𝑔𝑋)))
40 coass 6269 . . 3 (((𝐺𝐼) / 𝑔𝑋𝑗 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋) = ((𝐺𝐼) / 𝑔𝑋 ∘ (𝑗 / 𝑔𝑋𝑗 / 𝑔𝑋))
4139, 40eqtr4di 2816 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐺𝐼) / 𝑔𝑋 = (((𝐺𝐼) / 𝑔𝑋𝑗 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋))
4210, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20cdlemk54 41713 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → ((𝐺𝐼) / 𝑔𝑋𝑗 / 𝑔𝑋) = ((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋))
4342coeq1d 5849 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (((𝐺𝐼) / 𝑔𝑋𝑗 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋) = (((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋))
44 coass 6269 . . . 4 (((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋) = ((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ (𝑗 / 𝑔𝑋𝑗 / 𝑔𝑋))
4526coeq2d 5850 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → ((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ (𝑗 / 𝑔𝑋𝑗 / 𝑔𝑋)) = ((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ ( I ↾ 𝐵)))
4610, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20cdlemk35s-id 41693 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ 𝐺𝑇𝑁𝑇) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁))) → 𝐺 / 𝑔𝑋𝑇)
471, 4, 28, 6, 9, 46syl131anc 1410 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝐺 / 𝑔𝑋𝑇)
4810, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20cdlemk35s-id 41693 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵)) ∧ 𝐼𝑇𝑁𝑇) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁))) → 𝐼 / 𝑔𝑋𝑇)
491, 4, 29, 6, 9, 48syl131anc 1410 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → 𝐼 / 𝑔𝑋𝑇)
5015, 16ltrnco 41474 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺 / 𝑔𝑋𝑇𝐼 / 𝑔𝑋𝑇) → (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∈ 𝑇)
511, 47, 49, 50syl3anc 1398 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∈ 𝑇)
5210, 15, 16ltrn1o 40879 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∈ 𝑇) → (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋):𝐵1-1-onto𝐵)
531, 51, 52syl2anc 595 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋):𝐵1-1-onto𝐵)
54 f1of 6822 . . . . . 6 ((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋):𝐵1-1-onto𝐵 → (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋):𝐵𝐵)
55 fcoi1 6754 . . . . . 6 ((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋):𝐵𝐵 → ((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ ( I ↾ 𝐵)) = (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋))
5653, 54, 553syl 19 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → ((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ ( I ↾ 𝐵)) = (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋))
5745, 56eqtrd 2798 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → ((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ (𝑗 / 𝑔𝑋𝑗 / 𝑔𝑋)) = (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋))
5844, 57eqtrid 2810 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (((𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋) = (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋))
5943, 58eqtrd 2798 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (((𝐺𝐼) / 𝑔𝑋𝑗 / 𝑔𝑋) ∘ 𝑗 / 𝑔𝑋) = (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋))
6041, 59eqtrd 2798 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ ((𝐼𝑇 ∧ (𝑅𝐺) = (𝑅𝐼)) ∧ 𝑗𝑇 ∧ (𝑗 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑗) ≠ (𝑅𝐺) ∧ (𝑅𝑗) ≠ (𝑅‘(𝐺𝐼))))) → (𝐺𝐼) / 𝑔𝑋 = (𝐺 / 𝑔𝑋𝐼 / 𝑔𝑋))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 400  w3a 1103   = wceq 1570  wcel 2143  wne 2958  wral 3079  csb 3854   class class class wbr 5110   I cid 5557  ccnv 5662  cres 5665  ccom 5667  wf 6534  1-1-ontowf1o 6537  cfv 6538  crio 7368  (class class class)co 7412  Basecbs 17270  lecple 17318  joincjn 18368  meetcmee 18369  Atomscatm 40018  HLchlt 40105  LHypclh 40739  LTrncltrn 40856  trLctrl 40913
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1825  ax-4 1839  ax-5 1940  ax-6 1997  ax-7 2038  ax-8 2145  ax-9 2153  ax-10 2176  ax-11 2192  ax-12 2213  ax-ext 2735  ax-rep 5239  ax-sep 5258  ax-nul 5270  ax-pow 5338  ax-pr 5406  ax-un 7734  ax-riotaBAD 39708
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1810  df-nf 1814  df-sb 2097  df-mo 2567  df-eu 2597  df-clab 2742  df-cleq 2755  df-clel 2838  df-nfc 2912  df-ne 2959  df-ral 3080  df-rex 3090  df-rmo 3369  df-reu 3370  df-rab 3417  df-v 3457  df-sbc 3746  df-csb 3855  df-dif 3909  df-un 3911  df-in 3913  df-ss 3923  df-nul 4288  df-if 4489  df-pw 4565  df-sn 4591  df-pr 4593  df-op 4597  df-uni 4874  df-iun 4959  df-iin 4960  df-br 5111  df-opab 5175  df-mpt 5194  df-id 5558  df-xp 5669  df-rel 5670  df-cnv 5671  df-co 5672  df-dm 5673  df-rn 5674  df-res 5675  df-ima 5676  df-iota 6494  df-fun 6540  df-fn 6541  df-f 6542  df-f1 6543  df-fo 6544  df-f1o 6545  df-fv 6546  df-riota 7369  df-ov 7415  df-oprab 7416  df-mpo 7417  df-1st 7987  df-2nd 7988  df-undef 8270  df-map 8827  df-proset 18351  df-poset 18370  df-plt 18385  df-lub 18401  df-glb 18402  df-join 18403  df-meet 18404  df-p0 18480  df-p1 18481  df-lat 18489  df-clat 18556  df-oposet 39931  df-ol 39933  df-oml 39934  df-covers 40021  df-ats 40022  df-atl 40053  df-cvlat 40077  df-hlat 40106  df-llines 40253  df-lplanes 40254  df-lvols 40255  df-lines 40256  df-psubsp 40258  df-pmap 40259  df-padd 40551  df-lhyp 40743  df-laut 40744  df-ldil 40859  df-ltrn 40860  df-trl 40914
This theorem is referenced by:  cdlemk55b  41715
  Copyright terms: Public domain W3C validator