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

Theorem cdlemg19a 36842
Description: Show two lines intersect at an atom. TODO: fix comment. (Contributed by NM, 15-May-2013.)
Hypotheses
Ref Expression
cdlemg12.l = (le‘𝐾)
cdlemg12.j = (join‘𝐾)
cdlemg12.m = (meet‘𝐾)
cdlemg12.a 𝐴 = (Atoms‘𝐾)
cdlemg12.h 𝐻 = (LHyp‘𝐾)
cdlemg12.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemg12b.r 𝑅 = ((trL‘𝐾)‘𝑊)
Assertion
Ref Expression
cdlemg19a ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) = ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊))
Distinct variable groups:   𝐴,𝑟   𝐺,𝑟   ,𝑟   ,𝑟   𝑃,𝑟   𝑄,𝑟   𝑊,𝑟   𝐹,𝑟
Allowed substitution hints:   𝑅(𝑟)   𝑇(𝑟)   𝐻(𝑟)   𝐾(𝑟)   (𝑟)

Proof of Theorem cdlemg19a
StepHypRef Expression
1 simp11l 1340 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐾 ∈ HL)
21hllatd 35523 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐾 ∈ Lat)
3 simp12l 1342 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑃𝐴)
4 simp11 1217 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
5 simp21 1220 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝐹𝑇𝐺𝑇))
6 cdlemg12.l . . . . . . 7 = (le‘𝐾)
7 cdlemg12.a . . . . . . 7 𝐴 = (Atoms‘𝐾)
8 cdlemg12.h . . . . . . 7 𝐻 = (LHyp‘𝐾)
9 cdlemg12.t . . . . . . 7 𝑇 = ((LTrn‘𝐾)‘𝑊)
106, 7, 8, 9ltrncoat 36303 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ 𝑃𝐴) → (𝐹‘(𝐺𝑃)) ∈ 𝐴)
114, 5, 3, 10syl3anc 1439 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝐹‘(𝐺𝑃)) ∈ 𝐴)
12 eqid 2778 . . . . . 6 (Base‘𝐾) = (Base‘𝐾)
13 cdlemg12.j . . . . . 6 = (join‘𝐾)
1412, 13, 7hlatjcl 35526 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴 ∧ (𝐹‘(𝐺𝑃)) ∈ 𝐴) → (𝑃 (𝐹‘(𝐺𝑃))) ∈ (Base‘𝐾))
151, 3, 11, 14syl3anc 1439 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑃 (𝐹‘(𝐺𝑃))) ∈ (Base‘𝐾))
16 simp13l 1344 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑄𝐴)
176, 7, 8, 9ltrncoat 36303 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ 𝑄𝐴) → (𝐹‘(𝐺𝑄)) ∈ 𝐴)
184, 5, 16, 17syl3anc 1439 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝐹‘(𝐺𝑄)) ∈ 𝐴)
1912, 13, 7hlatjcl 35526 . . . . 5 ((𝐾 ∈ HL ∧ 𝑄𝐴 ∧ (𝐹‘(𝐺𝑄)) ∈ 𝐴) → (𝑄 (𝐹‘(𝐺𝑄))) ∈ (Base‘𝐾))
201, 16, 18, 19syl3anc 1439 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑄 (𝐹‘(𝐺𝑄))) ∈ (Base‘𝐾))
21 cdlemg12.m . . . . 5 = (meet‘𝐾)
2212, 6, 21latmle1 17466 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 (𝐹‘(𝐺𝑃))) ∈ (Base‘𝐾) ∧ (𝑄 (𝐹‘(𝐺𝑄))) ∈ (Base‘𝐾)) → ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) (𝑃 (𝐹‘(𝐺𝑃))))
232, 15, 20, 22syl3anc 1439 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) (𝑃 (𝐹‘(𝐺𝑃))))
24 cdlemg12b.r . . . 4 𝑅 = ((trL‘𝐾)‘𝑊)
256, 13, 21, 7, 8, 9, 24cdlemg18 36841 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) 𝑊)
266, 13, 21, 7, 8, 9, 24cdlemg18d 36840 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ∈ 𝐴)
2712, 7atbase 35448 . . . . 5 (((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ∈ 𝐴 → ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ∈ (Base‘𝐾))
2826, 27syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ∈ (Base‘𝐾))
29 simp11r 1341 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑊𝐻)
3012, 8lhpbase 36157 . . . . 5 (𝑊𝐻𝑊 ∈ (Base‘𝐾))
3129, 30syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑊 ∈ (Base‘𝐾))
3212, 6, 21latlem12 17468 . . . 4 ((𝐾 ∈ Lat ∧ (((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ∈ (Base‘𝐾) ∧ (𝑃 (𝐹‘(𝐺𝑃))) ∈ (Base‘𝐾) ∧ 𝑊 ∈ (Base‘𝐾))) → ((((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) (𝑃 (𝐹‘(𝐺𝑃))) ∧ ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) 𝑊) ↔ ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊)))
332, 28, 15, 31, 32syl13anc 1440 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) (𝑃 (𝐹‘(𝐺𝑃))) ∧ ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) 𝑊) ↔ ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊)))
3423, 25, 33mpbi2and 702 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊))
35 hlatl 35519 . . . 4 (𝐾 ∈ HL → 𝐾 ∈ AtLat)
361, 35syl 17 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐾 ∈ AtLat)
37 simp12 1218 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
38 simp13 1219 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
39 simp21l 1346 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐹𝑇)
40 simp21r 1347 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝐺𝑇)
41 simp32 1224 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))
426, 13, 21, 7, 8, 9cdlemg11a 36796 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝐹‘(𝐺𝑃)) ≠ 𝑃)
434, 37, 38, 39, 40, 41, 42syl123anc 1455 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (𝐹‘(𝐺𝑃)) ≠ 𝑃)
4443necomd 3024 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → 𝑃 ≠ (𝐹‘(𝐺𝑃)))
456, 13, 21, 7, 8lhpat 36202 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ ((𝐹‘(𝐺𝑃)) ∈ 𝐴𝑃 ≠ (𝐹‘(𝐺𝑃)))) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) ∈ 𝐴)
464, 37, 11, 44, 45syl112anc 1442 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) ∈ 𝐴)
476, 7atcmp 35470 . . 3 ((𝐾 ∈ AtLat ∧ ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ∈ 𝐴 ∧ ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) ∈ 𝐴) → (((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) ↔ ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) = ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊)))
4836, 26, 46, 47syl3anc 1439 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → (((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊) ↔ ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) = ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊)))
4934, 48mpbid 224 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ ((𝐹𝑇𝐺𝑇) ∧ 𝑃𝑄 ∧ (𝐺𝑃) ≠ 𝑃) ∧ ((𝑅𝐺) (𝑃 𝑄) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄) ∧ ¬ ∃𝑟𝐴𝑟 𝑊 ∧ (𝑃 𝑟) = (𝑄 𝑟)))) → ((𝑃 (𝐹‘(𝐺𝑃))) (𝑄 (𝐹‘(𝐺𝑄)))) = ((𝑃 (𝐹‘(𝐺𝑃))) 𝑊))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 198  wa 386  w3a 1071   = wceq 1601  wcel 2107  wne 2969  wrex 3091   class class class wbr 4888  cfv 6137  (class class class)co 6924  Basecbs 16259  lecple 16349  joincjn 17334  meetcmee 17335  Latclat 17435  Atomscatm 35422  AtLatcal 35423  HLchlt 35509  LHypclh 36143  LTrncltrn 36260  trLctrl 36317
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1839  ax-4 1853  ax-5 1953  ax-6 2021  ax-7 2055  ax-8 2109  ax-9 2116  ax-10 2135  ax-11 2150  ax-12 2163  ax-13 2334  ax-ext 2754  ax-rep 5008  ax-sep 5019  ax-nul 5027  ax-pow 5079  ax-pr 5140  ax-un 7228  ax-riotaBAD 35112
This theorem depends on definitions:  df-bi 199  df-an 387  df-or 837  df-3or 1072  df-3an 1073  df-tru 1605  df-ex 1824  df-nf 1828  df-sb 2012  df-mo 2551  df-eu 2587  df-clab 2764  df-cleq 2770  df-clel 2774  df-nfc 2921  df-ne 2970  df-nel 3076  df-ral 3095  df-rex 3096  df-reu 3097  df-rmo 3098  df-rab 3099  df-v 3400  df-sbc 3653  df-csb 3752  df-dif 3795  df-un 3797  df-in 3799  df-ss 3806  df-nul 4142  df-if 4308  df-pw 4381  df-sn 4399  df-pr 4401  df-op 4405  df-uni 4674  df-iun 4757  df-iin 4758  df-br 4889  df-opab 4951  df-mpt 4968  df-id 5263  df-xp 5363  df-rel 5364  df-cnv 5365  df-co 5366  df-dm 5367  df-rn 5368  df-res 5369  df-ima 5370  df-iota 6101  df-fun 6139  df-fn 6140  df-f 6141  df-f1 6142  df-fo 6143  df-f1o 6144  df-fv 6145  df-riota 6885  df-ov 6927  df-oprab 6928  df-mpt2 6929  df-1st 7447  df-2nd 7448  df-undef 7683  df-map 8144  df-proset 17318  df-poset 17336  df-plt 17348  df-lub 17364  df-glb 17365  df-join 17366  df-meet 17367  df-p0 17429  df-p1 17430  df-lat 17436  df-clat 17498  df-oposet 35335  df-ol 35337  df-oml 35338  df-covers 35425  df-ats 35426  df-atl 35457  df-cvlat 35481  df-hlat 35510  df-llines 35657  df-lplanes 35658  df-lvols 35659  df-lines 35660  df-psubsp 35662  df-pmap 35663  df-padd 35955  df-lhyp 36147  df-laut 36148  df-ldil 36263  df-ltrn 36264  df-trl 36318
This theorem is referenced by:  cdlemg19  36843
  Copyright terms: Public domain W3C validator