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

Theorem cdlemk7u 38021
Description: Part of proof of Lemma K of [Crawley] p. 118. Line 5, p. 119 for the sigma1 case. (Contributed by NM, 3-Jul-2013.)
Hypotheses
Ref Expression
cdlemk1.b 𝐵 = (Base‘𝐾)
cdlemk1.l = (le‘𝐾)
cdlemk1.j = (join‘𝐾)
cdlemk1.m = (meet‘𝐾)
cdlemk1.a 𝐴 = (Atoms‘𝐾)
cdlemk1.h 𝐻 = (LHyp‘𝐾)
cdlemk1.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemk1.r 𝑅 = ((trL‘𝐾)‘𝑊)
cdlemk1.s 𝑆 = (𝑓𝑇 ↦ (𝑖𝑇 (𝑖𝑃) = ((𝑃 (𝑅𝑓)) ((𝑁𝑃) (𝑅‘(𝑓𝐹))))))
cdlemk1.o 𝑂 = (𝑆𝐷)
cdlemk1.u 𝑈 = (𝑒𝑇 ↦ (𝑗𝑇 (𝑗𝑃) = ((𝑃 (𝑅𝑒)) ((𝑂𝑃) (𝑅‘(𝑒𝐷))))))
cdlemk1.v 𝑉 = (((𝐺𝑃) (𝑋𝑃)) ((𝑅‘(𝐺𝐷)) (𝑅‘(𝑋𝐷))))
Assertion
Ref Expression
cdlemk7u ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑈𝐺)‘𝑃) (((𝑈𝑋)‘𝑃) 𝑉))
Distinct variable groups:   𝑓,𝑖,   ,𝑖   ,𝑓,𝑖   𝐴,𝑖   𝐷,𝑓,𝑖   𝑓,𝐹,𝑖   𝑖,𝐻   𝑖,𝐾   𝑓,𝑁,𝑖   𝑃,𝑓,𝑖   𝑅,𝑓,𝑖   𝑇,𝑓,𝑖   𝑓,𝑊,𝑖   ,𝑒   ,𝑒   𝐷,𝑒,𝑗   𝑒,𝐺,𝑗   𝑒,𝑂   𝑃,𝑒   𝑅,𝑒   𝑇,𝑒   𝑒,𝑊   ,𝑗   ,𝑗   ,𝑗   𝐴,𝑗   𝐷,𝑗   𝑗,𝐹   𝑗,𝐻   𝑗,𝐾   𝑗,𝑁   𝑗,𝑂   𝑃,𝑗   𝑅,𝑗   𝑇,𝑗   𝑗,𝑊   𝑒,𝐹   𝑒,𝑋,𝑗
Allowed substitution hints:   𝐴(𝑒,𝑓)   𝐵(𝑒,𝑓,𝑖,𝑗)   𝑆(𝑒,𝑓,𝑖,𝑗)   𝑈(𝑒,𝑓,𝑖,𝑗)   𝐺(𝑓,𝑖)   𝐻(𝑒,𝑓)   𝐾(𝑒,𝑓)   (𝑒,𝑓)   𝑁(𝑒)   𝑂(𝑓,𝑖)   𝑉(𝑒,𝑓,𝑖,𝑗)   𝑋(𝑓,𝑖)

Proof of Theorem cdlemk7u
StepHypRef Expression
1 simp31 1205 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)))
2 simp33 1207 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))
31, 2jca 514 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷))))
4 cdlemk1.b . . . 4 𝐵 = (Base‘𝐾)
5 cdlemk1.l . . . 4 = (le‘𝐾)
6 cdlemk1.j . . . 4 = (join‘𝐾)
7 cdlemk1.m . . . 4 = (meet‘𝐾)
8 cdlemk1.a . . . 4 𝐴 = (Atoms‘𝐾)
9 cdlemk1.h . . . 4 𝐻 = (LHyp‘𝐾)
10 cdlemk1.t . . . 4 𝑇 = ((LTrn‘𝐾)‘𝑊)
11 cdlemk1.r . . . 4 𝑅 = ((trL‘𝐾)‘𝑊)
12 cdlemk1.s . . . 4 𝑆 = (𝑓𝑇 ↦ (𝑖𝑇 (𝑖𝑃) = ((𝑃 (𝑅𝑓)) ((𝑁𝑃) (𝑅‘(𝑓𝐹))))))
13 cdlemk1.o . . . 4 𝑂 = (𝑆𝐷)
144, 5, 6, 7, 8, 9, 10, 11, 12, 13cdlemk6u 38013 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑃 (𝐺𝑃)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))) ((((𝐺𝑃) (𝑋𝑃)) ((𝑅‘(𝐺𝐷)) (𝑅‘(𝑋𝐷)))) (((𝑋𝑃) 𝑃) ((𝑅‘(𝑋𝐷)) (𝑂𝑃)))))
153, 14syld3an3 1405 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑃 (𝐺𝑃)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))) ((((𝐺𝑃) (𝑋𝑃)) ((𝑅‘(𝐺𝐷)) (𝑅‘(𝑋𝐷)))) (((𝑋𝑃) 𝑃) ((𝑅‘(𝑋𝐷)) (𝑂𝑃)))))
16 simp11l 1280 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝐾 ∈ HL)
17 simp11r 1281 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝑊𝐻)
1816, 17jca 514 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
19 simp23 1204 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑅𝐹) = (𝑅𝑁))
20 simp212 1308 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝐺𝑇)
21 simp12 1200 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝐹𝑇)
22 simp13 1201 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝐷𝑇)
23 simp211 1307 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝑁𝑇)
2421, 22, 233jca 1124 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝐹𝑇𝐷𝑇𝑁𝑇))
25 simp331 1322 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑅𝐷) ≠ (𝑅𝐹))
26 simp332 1323 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑅𝐺) ≠ (𝑅𝐷))
2726necomd 3071 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑅𝐷) ≠ (𝑅𝐺))
2825, 27jca 514 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝐺)))
29 simp311 1316 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝐹 ≠ ( I ↾ 𝐵))
30 simp313 1318 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝐺 ≠ ( I ↾ 𝐵))
31 simp312 1317 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝐷 ≠ ( I ↾ 𝐵))
3229, 30, 313jca 1124 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)))
33 simp22 1203 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
34 cdlemk1.u . . . . 5 𝑈 = (𝑒𝑇 ↦ (𝑗𝑇 (𝑗𝑃) = ((𝑃 (𝑅𝑒)) ((𝑂𝑃) (𝑅‘(𝑒𝐷))))))
354, 5, 6, 7, 8, 9, 10, 11, 12, 13, 34cdlemkuv2 38018 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝐺𝑇) ∧ (𝐹𝑇𝐷𝑇𝑁𝑇) ∧ (((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝐺)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → ((𝑈𝐺)‘𝑃) = ((𝑃 (𝑅𝐺)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))))
3618, 19, 20, 24, 28, 32, 33, 35syl313anc 1390 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑈𝐺)‘𝑃) = ((𝑃 (𝑅𝐺)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))))
375, 6, 8, 9, 10, 11trljat1 37317 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → (𝑃 (𝑅𝐺)) = (𝑃 (𝐺𝑃)))
3818, 20, 33, 37syl3anc 1367 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑃 (𝑅𝐺)) = (𝑃 (𝐺𝑃)))
3938oveq1d 7171 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑃 (𝑅𝐺)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))) = ((𝑃 (𝐺𝑃)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))))
4036, 39eqtrd 2856 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑈𝐺)‘𝑃) = ((𝑃 (𝐺𝑃)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))))
4116hllatd 36515 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝐾 ∈ Lat)
42 simp213 1309 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝑋𝑇)
43 simp333 1324 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑅𝑋) ≠ (𝑅𝐷))
4443necomd 3071 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑅𝐷) ≠ (𝑅𝑋))
4525, 44jca 514 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝑋)))
46 simp32 1206 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝑋 ≠ ( I ↾ 𝐵))
4729, 46, 313jca 1124 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)))
484, 5, 6, 7, 8, 9, 10, 11, 12, 13, 34cdlemkuat 38017 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝑋𝑇) ∧ (𝐹𝑇𝐷𝑇𝑁𝑇) ∧ (((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝑋)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → ((𝑈𝑋)‘𝑃) ∈ 𝐴)
4918, 19, 42, 24, 45, 47, 33, 48syl313anc 1390 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑈𝑋)‘𝑃) ∈ 𝐴)
504, 8atbase 36440 . . . . 5 (((𝑈𝑋)‘𝑃) ∈ 𝐴 → ((𝑈𝑋)‘𝑃) ∈ 𝐵)
5149, 50syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑈𝑋)‘𝑃) ∈ 𝐵)
52 simp22l 1288 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝑃𝐴)
53 cdlemk1.v . . . . . 6 𝑉 = (((𝐺𝑃) (𝑋𝑃)) ((𝑅‘(𝐺𝐷)) (𝑅‘(𝑋𝐷))))
544, 5, 6, 8, 9, 10, 11, 7, 53cdlemkvcl 37993 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐷𝑇𝐺𝑇𝑋𝑇) ∧ 𝑃𝐴) → 𝑉𝐵)
5516, 17, 22, 20, 42, 52, 54syl231anc 1386 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝑉𝐵)
564, 6latjcom 17669 . . . 4 ((𝐾 ∈ Lat ∧ ((𝑈𝑋)‘𝑃) ∈ 𝐵𝑉𝐵) → (((𝑈𝑋)‘𝑃) 𝑉) = (𝑉 ((𝑈𝑋)‘𝑃)))
5741, 51, 55, 56syl3anc 1367 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (((𝑈𝑋)‘𝑃) 𝑉) = (𝑉 ((𝑈𝑋)‘𝑃)))
5853a1i 11 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → 𝑉 = (((𝐺𝑃) (𝑋𝑃)) ((𝑅‘(𝐺𝐷)) (𝑅‘(𝑋𝐷)))))
594, 5, 6, 7, 8, 9, 10, 11, 12, 13, 34cdlemkuv2 38018 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝑋𝑇) ∧ (𝐹𝑇𝐷𝑇𝑁𝑇) ∧ (((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝑋)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → ((𝑈𝑋)‘𝑃) = ((𝑃 (𝑅𝑋)) ((𝑂𝑃) (𝑅‘(𝑋𝐷)))))
6018, 19, 42, 24, 45, 47, 33, 59syl313anc 1390 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑈𝑋)‘𝑃) = ((𝑃 (𝑅𝑋)) ((𝑂𝑃) (𝑅‘(𝑋𝐷)))))
615, 6, 8, 9, 10, 11trljat1 37317 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → (𝑃 (𝑅𝑋)) = (𝑃 (𝑋𝑃)))
6218, 42, 33, 61syl3anc 1367 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑃 (𝑅𝑋)) = (𝑃 (𝑋𝑃)))
635, 8, 9, 10ltrnat 37291 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑋𝑇𝑃𝐴) → (𝑋𝑃) ∈ 𝐴)
6418, 42, 52, 63syl3anc 1367 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑋𝑃) ∈ 𝐴)
656, 8hlatjcom 36519 . . . . . . . 8 ((𝐾 ∈ HL ∧ (𝑋𝑃) ∈ 𝐴𝑃𝐴) → ((𝑋𝑃) 𝑃) = (𝑃 (𝑋𝑃)))
6616, 64, 52, 65syl3anc 1367 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑋𝑃) 𝑃) = (𝑃 (𝑋𝑃)))
6762, 66eqtr4d 2859 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑃 (𝑅𝑋)) = ((𝑋𝑃) 𝑃))
68 simp1 1132 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇))
6923, 33, 193jca 1124 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)))
7029, 31, 253jca 1124 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹)))
714, 5, 6, 7, 8, 9, 10, 11, 12, 13cdlemkoatnle 38002 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → ((𝑂𝑃) ∈ 𝐴 ∧ ¬ (𝑂𝑃) 𝑊))
7271simpld 497 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ (𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ (𝑅𝐷) ≠ (𝑅𝐹))) → (𝑂𝑃) ∈ 𝐴)
7368, 69, 70, 72syl3anc 1367 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑂𝑃) ∈ 𝐴)
7442, 22jca 514 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑋𝑇𝐷𝑇))
758, 9, 10, 11trlcocnvat 37875 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑋𝑇𝐷𝑇) ∧ (𝑅𝑋) ≠ (𝑅𝐷)) → (𝑅‘(𝑋𝐷)) ∈ 𝐴)
7618, 74, 43, 75syl3anc 1367 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑅‘(𝑋𝐷)) ∈ 𝐴)
776, 8hlatjcom 36519 . . . . . . 7 ((𝐾 ∈ HL ∧ (𝑂𝑃) ∈ 𝐴 ∧ (𝑅‘(𝑋𝐷)) ∈ 𝐴) → ((𝑂𝑃) (𝑅‘(𝑋𝐷))) = ((𝑅‘(𝑋𝐷)) (𝑂𝑃)))
7816, 73, 76, 77syl3anc 1367 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑂𝑃) (𝑅‘(𝑋𝐷))) = ((𝑅‘(𝑋𝐷)) (𝑂𝑃)))
7967, 78oveq12d 7174 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑃 (𝑅𝑋)) ((𝑂𝑃) (𝑅‘(𝑋𝐷)))) = (((𝑋𝑃) 𝑃) ((𝑅‘(𝑋𝐷)) (𝑂𝑃))))
8060, 79eqtrd 2856 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑈𝑋)‘𝑃) = (((𝑋𝑃) 𝑃) ((𝑅‘(𝑋𝐷)) (𝑂𝑃))))
8158, 80oveq12d 7174 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (𝑉 ((𝑈𝑋)‘𝑃)) = ((((𝐺𝑃) (𝑋𝑃)) ((𝑅‘(𝐺𝐷)) (𝑅‘(𝑋𝐷)))) (((𝑋𝑃) 𝑃) ((𝑅‘(𝑋𝐷)) (𝑂𝑃)))))
8257, 81eqtrd 2856 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → (((𝑈𝑋)‘𝑃) 𝑉) = ((((𝐺𝑃) (𝑋𝑃)) ((𝑅‘(𝐺𝐷)) (𝑅‘(𝑋𝐷)))) (((𝑋𝑃) 𝑃) ((𝑅‘(𝑋𝐷)) (𝑂𝑃)))))
8315, 40, 823brtr4d 5098 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇𝑋𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ 𝑋 ≠ ( I ↾ 𝐵) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝑋) ≠ (𝑅𝐷)))) → ((𝑈𝐺)‘𝑃) (((𝑈𝑋)‘𝑃) 𝑉))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 398  w3a 1083   = wceq 1537  wcel 2114  wne 3016   class class class wbr 5066  cmpt 5146   I cid 5459  ccnv 5554  cres 5557  ccom 5559  cfv 6355  crio 7113  (class class class)co 7156  Basecbs 16483  lecple 16572  joincjn 17554  meetcmee 17555  Latclat 17655  Atomscatm 36414  HLchlt 36501  LHypclh 37135  LTrncltrn 37252  trLctrl 37309
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1796  ax-4 1810  ax-5 1911  ax-6 1970  ax-7 2015  ax-8 2116  ax-9 2124  ax-10 2145  ax-11 2161  ax-12 2177  ax-ext 2793  ax-rep 5190  ax-sep 5203  ax-nul 5210  ax-pow 5266  ax-pr 5330  ax-un 7461  ax-riotaBAD 36104
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1084  df-3an 1085  df-tru 1540  df-ex 1781  df-nf 1785  df-sb 2070  df-mo 2622  df-eu 2654  df-clab 2800  df-cleq 2814  df-clel 2893  df-nfc 2963  df-ne 3017  df-ral 3143  df-rex 3144  df-reu 3145  df-rmo 3146  df-rab 3147  df-v 3496  df-sbc 3773  df-csb 3884  df-dif 3939  df-un 3941  df-in 3943  df-ss 3952  df-nul 4292  df-if 4468  df-pw 4541  df-sn 4568  df-pr 4570  df-op 4574  df-uni 4839  df-iun 4921  df-iin 4922  df-br 5067  df-opab 5129  df-mpt 5147  df-id 5460  df-xp 5561  df-rel 5562  df-cnv 5563  df-co 5564  df-dm 5565  df-rn 5566  df-res 5567  df-ima 5568  df-iota 6314  df-fun 6357  df-fn 6358  df-f 6359  df-f1 6360  df-fo 6361  df-f1o 6362  df-fv 6363  df-riota 7114  df-ov 7159  df-oprab 7160  df-mpo 7161  df-1st 7689  df-2nd 7690  df-undef 7939  df-map 8408  df-proset 17538  df-poset 17556  df-plt 17568  df-lub 17584  df-glb 17585  df-join 17586  df-meet 17587  df-p0 17649  df-p1 17650  df-lat 17656  df-clat 17718  df-oposet 36327  df-ol 36329  df-oml 36330  df-covers 36417  df-ats 36418  df-atl 36449  df-cvlat 36473  df-hlat 36502  df-llines 36649  df-lplanes 36650  df-lvols 36651  df-lines 36652  df-psubsp 36654  df-pmap 36655  df-padd 36947  df-lhyp 37139  df-laut 37140  df-ldil 37255  df-ltrn 37256  df-trl 37310
This theorem is referenced by:  cdlemk11u  38022  cdlemk7u-2N  38039
  Copyright terms: Public domain W3C validator