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

Theorem cdlemk33N 36691
Description: Part of proof of Lemma K of [Crawley] p. 118. TODO: fix comment. Part of attempt to simplify hypotheses. TODO: not needed, is embodied in cdlemk34 36692. (Contributed by NM, 18-Jul-2013.) (New usage is discouraged.)
Hypotheses
Ref Expression
cdlemk3.b 𝐵 = (Base‘𝐾)
cdlemk3.l = (le‘𝐾)
cdlemk3.j = (join‘𝐾)
cdlemk3.m = (meet‘𝐾)
cdlemk3.a 𝐴 = (Atoms‘𝐾)
cdlemk3.h 𝐻 = (LHyp‘𝐾)
cdlemk3.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemk3.r 𝑅 = ((trL‘𝐾)‘𝑊)
cdlemk3.s 𝑆 = (𝑓𝑇 ↦ (𝑖𝑇 (𝑖𝑃) = ((𝑃 (𝑅𝑓)) ((𝑁𝑃) (𝑅‘(𝑓𝐹))))))
cdlemk3.u1 𝑌 = (𝑑𝑇, 𝑒𝑇 ↦ (𝑗𝑇 (𝑗𝑃) = ((𝑃 (𝑅𝑒)) (((𝑆𝑑)‘𝑃) (𝑅‘(𝑒𝑑))))))
cdlemk3.x 𝑋 = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → 𝑧 = (𝑏𝑌𝐺)))
Assertion
Ref Expression
cdlemk33N (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → 𝑋 = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
Distinct variable groups:   𝑒,𝑑,𝑓,𝑖,   ,𝑖   ,𝑑,𝑒,𝑓,𝑖   𝐴,𝑖   𝑗,𝑑,𝑒,𝑓,𝑖,𝐹   𝐺,𝑑,𝑒,𝑗   𝑖,𝐻   𝑖,𝐾   𝑓,𝑁,𝑖   𝑃,𝑑,𝑒,𝑓,𝑖   𝑅,𝑑,𝑒,𝑓,𝑖   𝑇,𝑑,𝑒,𝑓,𝑖   𝑊,𝑑,𝑒,𝑓,𝑖,𝑏   ,𝑗   ,𝑗   ,𝑗   𝐴,𝑗   𝑗,𝐹   𝑗,𝐻   𝑗,𝐾   𝑗,𝑁   𝑃,𝑗   𝑅,𝑗   𝑏,𝑑,𝑆,𝑒,𝑗   𝑇,𝑗   𝑗,𝑊   𝐹,𝑑,𝑒   ,𝑒   𝑓,𝐺,𝑖   ,𝑏   𝐴,𝑏,𝑧   𝐵,𝑏,𝑧   𝐹,𝑏,𝑧   𝐺,𝑏,𝑧   𝐻,𝑏   𝐾,𝑏   𝑁,𝑏   𝑃,𝑏   𝑅,𝑏,𝑧   𝑇,𝑏,𝑧   𝑊,𝑏,𝑧   𝑌,𝑏,𝑧   𝑧,𝑑,𝑒,𝑓,𝑖,𝑗   𝑧,   𝑧,𝐴   𝑧,𝐻   𝑧,𝐾   𝑧,𝑁   𝑧,𝑃
Allowed substitution hints:   𝐴(𝑒,𝑓,𝑑)   𝐵(𝑒,𝑓,𝑖,𝑗,𝑑)   𝑆(𝑧,𝑓,𝑖)   𝐻(𝑒,𝑓,𝑑)   (𝑧,𝑏)   𝐾(𝑒,𝑓,𝑑)   (𝑓,𝑑)   (𝑧,𝑏)   𝑁(𝑒,𝑑)   𝑋(𝑧,𝑒,𝑓,𝑖,𝑗,𝑏,𝑑)   𝑌(𝑒,𝑓,𝑖,𝑗,𝑑)

Proof of Theorem cdlemk33N
StepHypRef Expression
1 cdlemk3.x . 2 𝑋 = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → 𝑧 = (𝑏𝑌𝐺)))
2 fveq1 6410 . . . . . . . . 9 (𝑧 = (𝑏𝑌𝐺) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))
3 simpl11 1322 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝐾 ∈ HL)
4 simpl12 1324 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝑊𝐻)
53, 4jca 503 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
6 simpl31 1334 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝑧𝑇)
7 simp11 1253 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐾 ∈ HL)
8 simp12 1254 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝑊𝐻)
97, 8jca 503 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
10 simp13 1255 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑅𝐹) = (𝑅𝑁))
11 simp22l 1384 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐺𝑇)
129, 10, 113jca 1151 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝐺𝑇))
1312adantr 468 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝐺𝑇))
14 simp211 1403 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐹𝑇)
15 simp32 1260 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝑏𝑇)
16 simp213 1405 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝑁𝑇)
1714, 15, 163jca 1151 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝐹𝑇𝑏𝑇𝑁𝑇))
1817adantr 468 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝐹𝑇𝑏𝑇𝑁𝑇))
19 simp332 1419 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑅𝑏) ≠ (𝑅𝐹))
20 simp333 1420 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑅𝑏) ≠ (𝑅𝐺))
2119, 20jca 503 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → ((𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))
22 simp212 1404 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐹 ≠ ( I ↾ 𝐵))
23 simp22r 1385 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐺 ≠ ( I ↾ 𝐵))
24 simp331 1418 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝑏 ≠ ( I ↾ 𝐵))
2522, 23, 243jca 1151 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝑏 ≠ ( I ↾ 𝐵)))
26 simp23 1258 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
2721, 25, 263jca 1151 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (((𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝑏 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)))
2827adantr 468 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (((𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝑏 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)))
29 cdlemk3.b . . . . . . . . . . . . 13 𝐵 = (Base‘𝐾)
30 cdlemk3.l . . . . . . . . . . . . 13 = (le‘𝐾)
31 cdlemk3.j . . . . . . . . . . . . 13 = (join‘𝐾)
32 cdlemk3.m . . . . . . . . . . . . 13 = (meet‘𝐾)
33 cdlemk3.a . . . . . . . . . . . . 13 𝐴 = (Atoms‘𝐾)
34 cdlemk3.h . . . . . . . . . . . . 13 𝐻 = (LHyp‘𝐾)
35 cdlemk3.t . . . . . . . . . . . . 13 𝑇 = ((LTrn‘𝐾)‘𝑊)
36 cdlemk3.r . . . . . . . . . . . . 13 𝑅 = ((trL‘𝐾)‘𝑊)
37 cdlemk3.s . . . . . . . . . . . . 13 𝑆 = (𝑓𝑇 ↦ (𝑖𝑇 (𝑖𝑃) = ((𝑃 (𝑅𝑓)) ((𝑁𝑃) (𝑅‘(𝑓𝐹))))))
38 cdlemk3.u1 . . . . . . . . . . . . 13 𝑌 = (𝑑𝑇, 𝑒𝑇 ↦ (𝑗𝑇 (𝑗𝑃) = ((𝑃 (𝑅𝑒)) (((𝑆𝑑)‘𝑃) (𝑅‘(𝑒𝑑))))))
3929, 30, 31, 32, 33, 34, 35, 36, 37, 38cdlemkuel-3 36680 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝐺𝑇) ∧ (𝐹𝑇𝑏𝑇𝑁𝑇) ∧ (((𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝑏 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → (𝑏𝑌𝐺) ∈ 𝑇)
4013, 18, 28, 39syl3anc 1483 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝑏𝑌𝐺) ∈ 𝑇)
41 simpl23 1332 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
42 simpr 473 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))
4330, 33, 34, 35cdlemd 35989 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑧𝑇 ∧ (𝑏𝑌𝐺) ∈ 𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝑧 = (𝑏𝑌𝐺))
445, 6, 40, 41, 42, 43syl311anc 1496 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝑧 = (𝑏𝑌𝐺))
4544ex 399 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → ((𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃) → 𝑧 = (𝑏𝑌𝐺)))
462, 45impbid2 217 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑧 = (𝑏𝑌𝐺) ↔ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)))
47463expia 1143 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → ((𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺))) → (𝑧 = (𝑏𝑌𝐺) ↔ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
48473expd 1455 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → (𝑧𝑇 → (𝑏𝑇 → ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧 = (𝑏𝑌𝐺) ↔ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))))
4948imp31 406 . . . . 5 (((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) ∧ 𝑧𝑇) ∧ 𝑏𝑇) → ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧 = (𝑏𝑌𝐺) ↔ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
5049pm5.74d 264 . . . 4 (((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) ∧ 𝑧𝑇) ∧ 𝑏𝑇) → (((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → 𝑧 = (𝑏𝑌𝐺)) ↔ ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
5150ralbidva 3180 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) ∧ 𝑧𝑇) → (∀𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → 𝑧 = (𝑏𝑌𝐺)) ↔ ∀𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
5251riotabidva 6854 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → 𝑧 = (𝑏𝑌𝐺))) = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
531, 52syl5eq 2859 1 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → 𝑋 = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 197  wa 384  w3a 1100   = wceq 1637  wcel 2157  wne 2985  wral 3103   class class class wbr 4851  cmpt 4930   I cid 5225  ccnv 5317  cres 5320  ccom 5322  cfv 6104  crio 6837  (class class class)co 6877  cmpt2 6879  Basecbs 16071  lecple 16163  joincjn 17152  meetcmee 17153  Atomscatm 35045  HLchlt 35132  LHypclh 35766  LTrncltrn 35883  trLctrl 35940
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1877  ax-4 1894  ax-5 2001  ax-6 2069  ax-7 2105  ax-8 2159  ax-9 2166  ax-10 2186  ax-11 2202  ax-12 2215  ax-13 2422  ax-ext 2791  ax-rep 4971  ax-sep 4982  ax-nul 4990  ax-pow 5042  ax-pr 5103  ax-un 7182  ax-riotaBAD 34734
This theorem depends on definitions:  df-bi 198  df-an 385  df-or 866  df-3or 1101  df-3an 1102  df-tru 1641  df-ex 1860  df-nf 1864  df-sb 2062  df-mo 2635  df-eu 2638  df-clab 2800  df-cleq 2806  df-clel 2809  df-nfc 2944  df-ne 2986  df-nel 3089  df-ral 3108  df-rex 3109  df-reu 3110  df-rmo 3111  df-rab 3112  df-v 3400  df-sbc 3641  df-csb 3736  df-dif 3779  df-un 3781  df-in 3783  df-ss 3790  df-nul 4124  df-if 4287  df-pw 4360  df-sn 4378  df-pr 4380  df-op 4384  df-uni 4638  df-iun 4721  df-iin 4722  df-br 4852  df-opab 4914  df-mpt 4931  df-id 5226  df-xp 5324  df-rel 5325  df-cnv 5326  df-co 5327  df-dm 5328  df-rn 5329  df-res 5330  df-ima 5331  df-iota 6067  df-fun 6106  df-fn 6107  df-f 6108  df-f1 6109  df-fo 6110  df-f1o 6111  df-fv 6112  df-riota 6838  df-ov 6880  df-oprab 6881  df-mpt2 6882  df-1st 7401  df-2nd 7402  df-undef 7637  df-map 8097  df-proset 17136  df-poset 17154  df-plt 17166  df-lub 17182  df-glb 17183  df-join 17184  df-meet 17185  df-p0 17247  df-p1 17248  df-lat 17254  df-clat 17316  df-oposet 34958  df-ol 34960  df-oml 34961  df-covers 35048  df-ats 35049  df-atl 35080  df-cvlat 35104  df-hlat 35133  df-llines 35280  df-lplanes 35281  df-lvols 35282  df-lines 35283  df-psubsp 35285  df-pmap 35286  df-padd 35578  df-lhyp 35770  df-laut 35771  df-ldil 35886  df-ltrn 35887  df-trl 35941
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator