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

Theorem cdlemk21N 41168
Description: Part of proof of Lemma K of [Crawley] p. 118. Lines 26-27, p. 119 for i=0 and j=1. (Contributed by NM, 5-Jul-2013.) (New usage is discouraged.)
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 𝑈 = (𝑒𝑇 ↦ (𝑗𝑇 (𝑗𝑃) = ((𝑃 (𝑅𝑒)) ((𝑂𝑃) (𝑅‘(𝑒𝐷))))))
Assertion
Ref Expression
cdlemk21N ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → ((𝑆𝐺)‘𝑃) = ((𝑈𝐺)‘𝑃))
Distinct variable groups:   𝑓,𝑖,   ,𝑖   ,𝑓,𝑖   𝐴,𝑖   𝐷,𝑓,𝑖   𝑓,𝐹,𝑖   𝑖,𝐻   𝑖,𝐾   𝑓,𝑁,𝑖   𝑃,𝑓,𝑖   𝑅,𝑓,𝑖   𝑇,𝑓,𝑖   𝑓,𝑊,𝑖   ,𝑒   ,𝑒   𝐷,𝑒,𝑗   𝑒,𝐺,𝑗   𝑒,𝑂   𝑃,𝑒   𝑅,𝑒   𝑇,𝑒   𝑒,𝑊   ,𝑗   ,𝑗   ,𝑗   𝐴,𝑗   𝐷,𝑗   𝑗,𝐹   𝑗,𝐻   𝑗,𝐾   𝑗,𝑁   𝑗,𝑂   𝑃,𝑗   𝑅,𝑗   𝑇,𝑗   𝑗,𝑊   𝑒,𝐹   𝑖,𝐺,𝑓
Allowed substitution hints:   𝐴(𝑒,𝑓)   𝐵(𝑒,𝑓,𝑖,𝑗)   𝑆(𝑒,𝑓,𝑖,𝑗)   𝑈(𝑒,𝑓,𝑖,𝑗)   𝐻(𝑒,𝑓)   𝐾(𝑒,𝑓)   (𝑒,𝑓)   𝑁(𝑒)   𝑂(𝑓,𝑖)

Proof of Theorem cdlemk21N
StepHypRef Expression
1 simp11 1205 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
2 simp21r 1293 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → 𝐺𝑇)
3 simp22 1209 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
4 cdlemk1.l . . . . 5 = (le‘𝐾)
5 cdlemk1.j . . . . 5 = (join‘𝐾)
6 cdlemk1.a . . . . 5 𝐴 = (Atoms‘𝐾)
7 cdlemk1.h . . . . 5 𝐻 = (LHyp‘𝐾)
8 cdlemk1.t . . . . 5 𝑇 = ((LTrn‘𝐾)‘𝑊)
9 cdlemk1.r . . . . 5 𝑅 = ((trL‘𝐾)‘𝑊)
104, 5, 6, 7, 8, 9trljat1 40461 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → (𝑃 (𝑅𝐺)) = (𝑃 (𝐺𝑃)))
111, 2, 3, 10syl3anc 1374 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑃 (𝑅𝐺)) = (𝑃 (𝐺𝑃)))
12 cdlemk1.o . . . . . 6 𝑂 = (𝑆𝐷)
1312fveq1i 6834 . . . . 5 (𝑂𝑃) = ((𝑆𝐷)‘𝑃)
1413a1i 11 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑂𝑃) = ((𝑆𝐷)‘𝑃))
15 simp13 1207 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → 𝐷𝑇)
167, 8, 9trlcocnv 41015 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇𝐷𝑇) → (𝑅‘(𝐺𝐷)) = (𝑅‘(𝐷𝐺)))
171, 2, 15, 16syl3anc 1374 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑅‘(𝐺𝐷)) = (𝑅‘(𝐷𝐺)))
1814, 17oveq12d 7376 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → ((𝑂𝑃) (𝑅‘(𝐺𝐷))) = (((𝑆𝐷)‘𝑃) (𝑅‘(𝐷𝐺))))
1911, 18oveq12d 7376 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → ((𝑃 (𝑅𝐺)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))) = ((𝑃 (𝐺𝑃)) (((𝑆𝐷)‘𝑃) (𝑅‘(𝐷𝐺)))))
20 simp23 1210 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑅𝐹) = (𝑅𝑁))
21 simp12 1206 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → 𝐹𝑇)
22 simp21l 1292 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → 𝑁𝑇)
23 simp3r1 1283 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑅𝐷) ≠ (𝑅𝐹))
24 simp3r2 1284 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑅𝐺) ≠ (𝑅𝐷))
2524necomd 2986 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑅𝐷) ≠ (𝑅𝐺))
2623, 25jca 511 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝐺)))
27 simp3l1 1280 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → 𝐹 ≠ ( I ↾ 𝐵))
28 simp3l3 1282 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → 𝐺 ≠ ( I ↾ 𝐵))
29 simp3l2 1281 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → 𝐷 ≠ ( I ↾ 𝐵))
3027, 28, 293jca 1129 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)))
31 cdlemk1.b . . . 4 𝐵 = (Base‘𝐾)
32 cdlemk1.m . . . 4 = (meet‘𝐾)
33 cdlemk1.s . . . 4 𝑆 = (𝑓𝑇 ↦ (𝑖𝑇 (𝑖𝑃) = ((𝑃 (𝑅𝑓)) ((𝑁𝑃) (𝑅‘(𝑓𝐹))))))
34 cdlemk1.u . . . 4 𝑈 = (𝑒𝑇 ↦ (𝑗𝑇 (𝑗𝑃) = ((𝑃 (𝑅𝑒)) ((𝑂𝑃) (𝑅‘(𝑒𝐷))))))
3531, 4, 5, 32, 6, 7, 8, 9, 33, 12, 34cdlemkuv2 41162 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑅𝐹) = (𝑅𝑁) ∧ 𝐺𝑇) ∧ (𝐹𝑇𝐷𝑇𝑁𝑇) ∧ (((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝐺)) ∧ (𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊))) → ((𝑈𝐺)‘𝑃) = ((𝑃 (𝑅𝐺)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))))
361, 20, 2, 21, 15, 22, 26, 30, 3, 35syl333anc 1405 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → ((𝑈𝐺)‘𝑃) = ((𝑃 (𝑅𝐺)) ((𝑂𝑃) (𝑅‘(𝐺𝐷)))))
3722, 15jca 511 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑁𝑇𝐷𝑇))
38 simp3r3 1285 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → (𝑅𝐺) ≠ (𝑅𝐹))
3938, 23jca 511 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → ((𝑅𝐺) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝐹)))
4031, 4, 5, 6, 7, 8, 9, 32, 33cdlemk12 41145 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐺𝑇) ∧ ((𝑁𝑇𝐷𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐺) ≠ (𝑅𝐹) ∧ (𝑅𝐷) ≠ (𝑅𝐹)) ∧ (𝑅𝐺) ≠ (𝑅𝐷))) → ((𝑆𝐺)‘𝑃) = ((𝑃 (𝐺𝑃)) (((𝑆𝐷)‘𝑃) (𝑅‘(𝐷𝐺)))))
411, 21, 2, 37, 3, 20, 30, 39, 24, 40syl333anc 1405 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → ((𝑆𝐺)‘𝑃) = ((𝑃 (𝐺𝑃)) (((𝑆𝐷)‘𝑃) (𝑅‘(𝐷𝐺)))))
4219, 36, 413eqtr4rd 2781 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇𝐷𝑇) ∧ ((𝑁𝑇𝐺𝑇) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝐹 ≠ ( I ↾ 𝐵) ∧ 𝐷 ≠ ( I ↾ 𝐵) ∧ 𝐺 ≠ ( I ↾ 𝐵)) ∧ ((𝑅𝐷) ≠ (𝑅𝐹) ∧ (𝑅𝐺) ≠ (𝑅𝐷) ∧ (𝑅𝐺) ≠ (𝑅𝐹)))) → ((𝑆𝐺)‘𝑃) = ((𝑈𝐺)‘𝑃))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1087   = wceq 1542  wcel 2114  wne 2931   class class class wbr 5097  cmpt 5178   I cid 5517  ccnv 5622  cres 5625  ccom 5627  cfv 6491  crio 7314  (class class class)co 7358  Basecbs 17138  lecple 17186  joincjn 18236  meetcmee 18237  Atomscatm 39558  HLchlt 39645  LHypclh 40279  LTrncltrn 40396  trLctrl 40453
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2183  ax-ext 2707  ax-rep 5223  ax-sep 5240  ax-nul 5250  ax-pow 5309  ax-pr 5376  ax-un 7680  ax-riotaBAD 39248
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2932  df-ral 3051  df-rex 3060  df-rmo 3349  df-reu 3350  df-rab 3399  df-v 3441  df-sbc 3740  df-csb 3849  df-dif 3903  df-un 3905  df-in 3907  df-ss 3917  df-nul 4285  df-if 4479  df-pw 4555  df-sn 4580  df-pr 4582  df-op 4586  df-uni 4863  df-iun 4947  df-iin 4948  df-br 5098  df-opab 5160  df-mpt 5179  df-id 5518  df-xp 5629  df-rel 5630  df-cnv 5631  df-co 5632  df-dm 5633  df-rn 5634  df-res 5635  df-ima 5636  df-iota 6447  df-fun 6493  df-fn 6494  df-f 6495  df-f1 6496  df-fo 6497  df-f1o 6498  df-fv 6499  df-riota 7315  df-ov 7361  df-oprab 7362  df-mpo 7363  df-1st 7933  df-2nd 7934  df-undef 8215  df-map 8767  df-proset 18219  df-poset 18238  df-plt 18253  df-lub 18269  df-glb 18270  df-join 18271  df-meet 18272  df-p0 18348  df-p1 18349  df-lat 18357  df-clat 18424  df-oposet 39471  df-ol 39473  df-oml 39474  df-covers 39561  df-ats 39562  df-atl 39593  df-cvlat 39617  df-hlat 39646  df-llines 39793  df-lplanes 39794  df-lvols 39795  df-lines 39796  df-psubsp 39798  df-pmap 39799  df-padd 40091  df-lhyp 40283  df-laut 40284  df-ldil 40399  df-ltrn 40400  df-trl 40454
This theorem is referenced by:  cdlemk21-2N  41186
  Copyright terms: Public domain W3C validator