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

Theorem cdlemg13a 37820
Description: TODO: FIX COMMENT. (Contributed by NM, 6-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
cdlemg13a ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝑃 (𝐹‘(𝐺𝑃))) = ((𝐺𝑃) (𝐹‘(𝐺𝑃))))

Proof of Theorem cdlemg13a
StepHypRef Expression
1 simp11l 1279 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → 𝐾 ∈ HL)
2 simp12l 1281 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → 𝑃𝐴)
3 simp11 1198 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
4 simp2r 1195 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → 𝐺𝑇)
5 cdlemg12.l . . . . . . 7 = (le‘𝐾)
6 cdlemg12.a . . . . . . 7 𝐴 = (Atoms‘𝐾)
7 cdlemg12.h . . . . . . 7 𝐻 = (LHyp‘𝐾)
8 cdlemg12.t . . . . . . 7 𝑇 = ((LTrn‘𝐾)‘𝑊)
95, 6, 7, 8ltrnat 37309 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇𝑃𝐴) → (𝐺𝑃) ∈ 𝐴)
103, 4, 2, 9syl3anc 1366 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝐺𝑃) ∈ 𝐴)
11 cdlemg12.j . . . . . 6 = (join‘𝐾)
125, 11, 6hlatlej1 36544 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴 ∧ (𝐺𝑃) ∈ 𝐴) → 𝑃 (𝑃 (𝐺𝑃)))
131, 2, 10, 12syl3anc 1366 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → 𝑃 (𝑃 (𝐺𝑃)))
14 simp32 1205 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝑅𝐹) = (𝑅𝐺))
15 simp2l 1194 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → 𝐹𝑇)
16 simp12 1199 . . . . . . . . 9 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
175, 6, 7, 8ltrnel 37308 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → ((𝐺𝑃) ∈ 𝐴 ∧ ¬ (𝐺𝑃) 𝑊))
183, 4, 16, 17syl3anc 1366 . . . . . . . 8 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → ((𝐺𝑃) ∈ 𝐴 ∧ ¬ (𝐺𝑃) 𝑊))
19 cdlemg12.m . . . . . . . . 9 = (meet‘𝐾)
20 cdlemg12b.r . . . . . . . . 9 𝑅 = ((trL‘𝐾)‘𝑊)
215, 11, 19, 6, 7, 8, 20trlval2 37332 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇 ∧ ((𝐺𝑃) ∈ 𝐴 ∧ ¬ (𝐺𝑃) 𝑊)) → (𝑅𝐹) = (((𝐺𝑃) (𝐹‘(𝐺𝑃))) 𝑊))
223, 15, 18, 21syl3anc 1366 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝑅𝐹) = (((𝐺𝑃) (𝐹‘(𝐺𝑃))) 𝑊))
235, 11, 19, 6, 7, 8, 20trlval2 37332 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐺𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → (𝑅𝐺) = ((𝑃 (𝐺𝑃)) 𝑊))
243, 4, 16, 23syl3anc 1366 . . . . . . 7 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝑅𝐺) = ((𝑃 (𝐺𝑃)) 𝑊))
2514, 22, 243eqtr3d 2863 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (((𝐺𝑃) (𝐹‘(𝐺𝑃))) 𝑊) = ((𝑃 (𝐺𝑃)) 𝑊))
2625oveq2d 7165 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → ((𝐺𝑃) (((𝐺𝑃) (𝐹‘(𝐺𝑃))) 𝑊)) = ((𝐺𝑃) ((𝑃 (𝐺𝑃)) 𝑊)))
275, 6, 7, 8ltrncoat 37313 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝐺𝑇) ∧ 𝑃𝐴) → (𝐹‘(𝐺𝑃)) ∈ 𝐴)
283, 15, 4, 2, 27syl121anc 1370 . . . . . 6 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝐹‘(𝐺𝑃)) ∈ 𝐴)
29 eqid 2820 . . . . . . 7 (((𝐺𝑃) (𝐹‘(𝐺𝑃))) 𝑊) = (((𝐺𝑃) (𝐹‘(𝐺𝑃))) 𝑊)
305, 11, 19, 6, 7, 29cdleme0cp 37383 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (((𝐺𝑃) ∈ 𝐴 ∧ ¬ (𝐺𝑃) 𝑊) ∧ (𝐹‘(𝐺𝑃)) ∈ 𝐴)) → ((𝐺𝑃) (((𝐺𝑃) (𝐹‘(𝐺𝑃))) 𝑊)) = ((𝐺𝑃) (𝐹‘(𝐺𝑃))))
313, 18, 28, 30syl12anc 834 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → ((𝐺𝑃) (((𝐺𝑃) (𝐹‘(𝐺𝑃))) 𝑊)) = ((𝐺𝑃) (𝐹‘(𝐺𝑃))))
32 eqid 2820 . . . . . . 7 ((𝑃 (𝐺𝑃)) 𝑊) = ((𝑃 (𝐺𝑃)) 𝑊)
335, 11, 19, 6, 7, 32cdleme0cq 37384 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ((𝐺𝑃) ∈ 𝐴 ∧ ¬ (𝐺𝑃) 𝑊))) → ((𝐺𝑃) ((𝑃 (𝐺𝑃)) 𝑊)) = (𝑃 (𝐺𝑃)))
343, 2, 18, 33syl12anc 834 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → ((𝐺𝑃) ((𝑃 (𝐺𝑃)) 𝑊)) = (𝑃 (𝐺𝑃)))
3526, 31, 343eqtr3rd 2864 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝑃 (𝐺𝑃)) = ((𝐺𝑃) (𝐹‘(𝐺𝑃))))
3613, 35breqtrd 5085 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → 𝑃 ((𝐺𝑃) (𝐹‘(𝐺𝑃))))
375, 11, 6hlatlej2 36545 . . . 4 ((𝐾 ∈ HL ∧ (𝐺𝑃) ∈ 𝐴 ∧ (𝐹‘(𝐺𝑃)) ∈ 𝐴) → (𝐹‘(𝐺𝑃)) ((𝐺𝑃) (𝐹‘(𝐺𝑃))))
381, 10, 28, 37syl3anc 1366 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝐹‘(𝐺𝑃)) ((𝐺𝑃) (𝐹‘(𝐺𝑃))))
391hllatd 36533 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → 𝐾 ∈ Lat)
40 eqid 2820 . . . . . 6 (Base‘𝐾) = (Base‘𝐾)
4140, 6atbase 36458 . . . . 5 (𝑃𝐴𝑃 ∈ (Base‘𝐾))
422, 41syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → 𝑃 ∈ (Base‘𝐾))
4340, 6atbase 36458 . . . . 5 ((𝐹‘(𝐺𝑃)) ∈ 𝐴 → (𝐹‘(𝐺𝑃)) ∈ (Base‘𝐾))
4428, 43syl 17 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝐹‘(𝐺𝑃)) ∈ (Base‘𝐾))
4540, 11, 6hlatjcl 36536 . . . . 5 ((𝐾 ∈ HL ∧ (𝐺𝑃) ∈ 𝐴 ∧ (𝐹‘(𝐺𝑃)) ∈ 𝐴) → ((𝐺𝑃) (𝐹‘(𝐺𝑃))) ∈ (Base‘𝐾))
461, 10, 28, 45syl3anc 1366 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → ((𝐺𝑃) (𝐹‘(𝐺𝑃))) ∈ (Base‘𝐾))
4740, 5, 11latjle12 17667 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 ∈ (Base‘𝐾) ∧ (𝐹‘(𝐺𝑃)) ∈ (Base‘𝐾) ∧ ((𝐺𝑃) (𝐹‘(𝐺𝑃))) ∈ (Base‘𝐾))) → ((𝑃 ((𝐺𝑃) (𝐹‘(𝐺𝑃))) ∧ (𝐹‘(𝐺𝑃)) ((𝐺𝑃) (𝐹‘(𝐺𝑃)))) ↔ (𝑃 (𝐹‘(𝐺𝑃))) ((𝐺𝑃) (𝐹‘(𝐺𝑃)))))
4839, 42, 44, 46, 47syl13anc 1367 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → ((𝑃 ((𝐺𝑃) (𝐹‘(𝐺𝑃))) ∧ (𝐹‘(𝐺𝑃)) ((𝐺𝑃) (𝐹‘(𝐺𝑃)))) ↔ (𝑃 (𝐹‘(𝐺𝑃))) ((𝐺𝑃) (𝐹‘(𝐺𝑃)))))
4936, 38, 48mpbi2and 710 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝑃 (𝐹‘(𝐺𝑃))) ((𝐺𝑃) (𝐹‘(𝐺𝑃))))
50 simp13 1200 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝑄𝐴 ∧ ¬ 𝑄 𝑊))
51 simp33 1206 . . . . 5 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))
525, 11, 19, 6, 7, 8cdlemg11a 37806 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇 ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝐹‘(𝐺𝑃)) ≠ 𝑃)
533, 16, 50, 15, 4, 51, 52syl123anc 1382 . . . 4 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝐹‘(𝐺𝑃)) ≠ 𝑃)
5453necomd 3070 . . 3 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → 𝑃 ≠ (𝐹‘(𝐺𝑃)))
555, 11, 6ps-1 36646 . . 3 ((𝐾 ∈ HL ∧ (𝑃𝐴 ∧ (𝐹‘(𝐺𝑃)) ∈ 𝐴𝑃 ≠ (𝐹‘(𝐺𝑃))) ∧ ((𝐺𝑃) ∈ 𝐴 ∧ (𝐹‘(𝐺𝑃)) ∈ 𝐴)) → ((𝑃 (𝐹‘(𝐺𝑃))) ((𝐺𝑃) (𝐹‘(𝐺𝑃))) ↔ (𝑃 (𝐹‘(𝐺𝑃))) = ((𝐺𝑃) (𝐹‘(𝐺𝑃)))))
561, 2, 28, 54, 10, 28, 55syl132anc 1383 . 2 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → ((𝑃 (𝐹‘(𝐺𝑃))) ((𝐺𝑃) (𝐹‘(𝐺𝑃))) ↔ (𝑃 (𝐹‘(𝐺𝑃))) = ((𝐺𝑃) (𝐹‘(𝐺𝑃)))))
5749, 56mpbid 234 1 ((((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑄𝐴 ∧ ¬ 𝑄 𝑊)) ∧ (𝐹𝑇𝐺𝑇) ∧ ((𝐹𝑃) ≠ 𝑃 ∧ (𝑅𝐹) = (𝑅𝐺) ∧ ((𝐹‘(𝐺𝑃)) (𝐹‘(𝐺𝑄))) ≠ (𝑃 𝑄))) → (𝑃 (𝐹‘(𝐺𝑃))) = ((𝐺𝑃) (𝐹‘(𝐺𝑃))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 208  wa 398  w3a 1082   = wceq 1536  wcel 2113  wne 3015   class class class wbr 5059  cfv 6348  (class class class)co 7149  Basecbs 16478  lecple 16567  joincjn 17549  meetcmee 17550  Latclat 17650  Atomscatm 36432  HLchlt 36519  LHypclh 37153  LTrncltrn 37270  trLctrl 37327
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1969  ax-7 2014  ax-8 2115  ax-9 2123  ax-10 2144  ax-11 2160  ax-12 2176  ax-ext 2792  ax-rep 5183  ax-sep 5196  ax-nul 5203  ax-pow 5259  ax-pr 5323  ax-un 7454  ax-riotaBAD 36122
This theorem depends on definitions:  df-bi 209  df-an 399  df-or 844  df-3or 1083  df-3an 1084  df-tru 1539  df-ex 1780  df-nf 1784  df-sb 2069  df-mo 2621  df-eu 2653  df-clab 2799  df-cleq 2813  df-clel 2892  df-nfc 2962  df-ne 3016  df-ral 3142  df-rex 3143  df-reu 3144  df-rmo 3145  df-rab 3146  df-v 3493  df-sbc 3769  df-csb 3877  df-dif 3932  df-un 3934  df-in 3936  df-ss 3945  df-nul 4285  df-if 4461  df-pw 4534  df-sn 4561  df-pr 4563  df-op 4567  df-uni 4832  df-iun 4914  df-iin 4915  df-br 5060  df-opab 5122  df-mpt 5140  df-id 5453  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-riota 7107  df-ov 7152  df-oprab 7153  df-mpo 7154  df-1st 7682  df-2nd 7683  df-undef 7932  df-map 8401  df-proset 17533  df-poset 17551  df-plt 17563  df-lub 17579  df-glb 17580  df-join 17581  df-meet 17582  df-p0 17644  df-p1 17645  df-lat 17651  df-clat 17713  df-oposet 36345  df-ol 36347  df-oml 36348  df-covers 36435  df-ats 36436  df-atl 36467  df-cvlat 36491  df-hlat 36520  df-llines 36667  df-lplanes 36668  df-lvols 36669  df-lines 36670  df-psubsp 36672  df-pmap 36673  df-padd 36965  df-lhyp 37157  df-laut 37158  df-ldil 37273  df-ltrn 37274  df-trl 37328
This theorem is referenced by:  cdlemg13  37821
  Copyright terms: Public domain W3C validator