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

Theorem cdlemk33N 36719
 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 36720. (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 6332 . . . . . . . . 9 (𝑧 = (𝑏𝑌𝐺) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))
3 simpl11 1314 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝐾 ∈ HL)
4 simpl12 1316 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝑊𝐻)
53, 4jca 501 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝐾 ∈ HL ∧ 𝑊𝐻))
6 simpl31 1326 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝑧𝑇)
7 simp11 1245 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐾 ∈ HL)
8 simp12 1246 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝑊𝐻)
97, 8jca 501 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
10 simp13 1247 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑅𝐹) = (𝑅𝑁))
11 simp22l 1376 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐺𝑇)
129, 10, 113jca 1122 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝐺𝑇))
1312adantr 466 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝐺𝑇))
14 simp211 1395 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐹𝑇)
15 simp32 1252 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝑏𝑇)
16 simp213 1397 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝑁𝑇)
1714, 15, 163jca 1122 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝐹𝑇𝑏𝑇𝑁𝑇))
1817adantr 466 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝐹𝑇𝑏𝑇𝑁𝑇))
19 simp332 1411 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑅𝑏) ≠ (𝑅𝐹))
20 simp333 1412 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑅𝑏) ≠ (𝑅𝐺))
2119, 20jca 501 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → ((𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))
22 simp212 1396 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐹 ≠ ( I ↾ 𝐵))
23 simp22r 1377 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝐺 ≠ ( I ↾ 𝐵))
24 simp331 1410 . . . . . . . . . . . . . . 15 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → 𝑏 ≠ ( I ↾ 𝐵))
2522, 23, 243jca 1122 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝑏 ≠ ( I ↾ 𝐵)))
26 simp23 1250 . . . . . . . . . . . . . 14 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
2721, 25, 263jca 1122 . . . . . . . . . . . . 13 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (((𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝑏 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)))
2827adantr 466 . . . . . . . . . . . 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 36708 . . . . . . . . . . . 12 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝐺𝑇) ∧ (𝐹𝑇𝑏𝑇𝑁𝑇) ∧ (((𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝑏 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → (𝑏𝑌𝐺) ∈ 𝑇)
4013, 18, 28, 39syl3anc 1476 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝑏𝑌𝐺) ∈ 𝑇)
41 simpl23 1324 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
42 simpr 471 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))
4330, 33, 34, 35cdlemd 36017 . . . . . . . . . . 11 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑧𝑇 ∧ (𝑏𝑌𝐺) ∈ 𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝑧 = (𝑏𝑌𝐺))
445, 6, 40, 41, 42, 43syl311anc 1490 . . . . . . . . . 10 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) ∧ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)) → 𝑧 = (𝑏𝑌𝐺))
4544ex 397 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → ((𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃) → 𝑧 = (𝑏𝑌𝐺)))
462, 45impbid2 216 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) ∧ (𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)))) → (𝑧 = (𝑏𝑌𝐺) ↔ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃)))
47463expia 1114 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → ((𝑧𝑇𝑏𝑇 ∧ (𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺))) → (𝑧 = (𝑏𝑌𝐺) ↔ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
48473expd 1446 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → (𝑧𝑇 → (𝑏𝑇 → ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧 = (𝑏𝑌𝐺) ↔ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))))
4948imp31 404 . . . . 5 (((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) ∧ 𝑧𝑇) ∧ 𝑏𝑇) → ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧 = (𝑏𝑌𝐺) ↔ (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
5049pm5.74d 262 . . . 4 (((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) ∧ 𝑧𝑇) ∧ 𝑏𝑇) → (((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → 𝑧 = (𝑏𝑌𝐺)) ↔ ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
5150ralbidva 3134 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) ∧ 𝑧𝑇) → (∀𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → 𝑧 = (𝑏𝑌𝐺)) ↔ ∀𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
5251riotabidva 6773 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → 𝑧 = (𝑏𝑌𝐺))) = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
531, 52syl5eq 2817 1 (((𝐾 ∈ HL ∧ 𝑊𝐻 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹𝑇𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑁𝑇) ∧ (𝐺𝑇𝐺 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → 𝑋 = (𝑧𝑇𝑏𝑇 ((𝑏 ≠ ( I ↾ 𝐵) ∧ (𝑅𝑏) ≠ (𝑅𝐹) ∧ (𝑅𝑏) ≠ (𝑅𝐺)) → (𝑧𝑃) = ((𝑏𝑌𝐺)‘𝑃))))
 Colors of variables: wff setvar class Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 196   ∧ wa 382   ∧ w3a 1071   = wceq 1631   ∈ wcel 2145   ≠ wne 2943  ∀wral 3061   class class class wbr 4787   ↦ cmpt 4864   I cid 5157  ◡ccnv 5249   ↾ cres 5252   ∘ ccom 5254  ‘cfv 6030  ℩crio 6756  (class class class)co 6796   ↦ cmpt2 6798  Basecbs 16064  lecple 16156  joincjn 17152  meetcmee 17153  Atomscatm 35072  HLchlt 35159  LHypclh 35793  LTrncltrn 35910  trLctrl 35968 This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-rep 4905  ax-sep 4916  ax-nul 4924  ax-pow 4975  ax-pr 5035  ax-un 7100  ax-riotaBAD 34761 This theorem depends on definitions:  df-bi 197  df-an 383  df-or 837  df-3or 1072  df-3an 1073  df-tru 1634  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ne 2944  df-nel 3047  df-ral 3066  df-rex 3067  df-reu 3068  df-rmo 3069  df-rab 3070  df-v 3353  df-sbc 3588  df-csb 3683  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-nul 4064  df-if 4227  df-pw 4300  df-sn 4318  df-pr 4320  df-op 4324  df-uni 4576  df-iun 4657  df-iin 4658  df-br 4788  df-opab 4848  df-mpt 4865  df-id 5158  df-xp 5256  df-rel 5257  df-cnv 5258  df-co 5259  df-dm 5260  df-rn 5261  df-res 5262  df-ima 5263  df-iota 5993  df-fun 6032  df-fn 6033  df-f 6034  df-f1 6035  df-fo 6036  df-f1o 6037  df-fv 6038  df-riota 6757  df-ov 6799  df-oprab 6800  df-mpt2 6801  df-1st 7319  df-2nd 7320  df-undef 7555  df-map 8015  df-preset 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 34985  df-ol 34987  df-oml 34988  df-covers 35075  df-ats 35076  df-atl 35107  df-cvlat 35131  df-hlat 35160  df-llines 35307  df-lplanes 35308  df-lvols 35309  df-lines 35310  df-psubsp 35312  df-pmap 35313  df-padd 35605  df-lhyp 35797  df-laut 35798  df-ldil 35913  df-ltrn 35914  df-trl 35969 This theorem is referenced by: (None)
 Copyright terms: Public domain W3C validator