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

Theorem cdlemkid1 40941
Description: Lemma for cdlemkid 40955. (Contributed by NM, 24-Jul-2013.)
Hypotheses
Ref Expression
cdlemk5.b 𝐵 = (Base‘𝐾)
cdlemk5.l = (le‘𝐾)
cdlemk5.j = (join‘𝐾)
cdlemk5.m = (meet‘𝐾)
cdlemk5.a 𝐴 = (Atoms‘𝐾)
cdlemk5.h 𝐻 = (LHyp‘𝐾)
cdlemk5.t 𝑇 = ((LTrn‘𝐾)‘𝑊)
cdlemk5.r 𝑅 = ((trL‘𝐾)‘𝑊)
cdlemk5.z 𝑍 = ((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹))))
Assertion
Ref Expression
cdlemkid1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑍 (𝑅𝑏)) = (𝑃 (𝑅𝑏)))

Proof of Theorem cdlemkid1
StepHypRef Expression
1 cdlemk5.z . . 3 𝑍 = ((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹))))
21oveq1i 7415 . 2 (𝑍 (𝑅𝑏)) = (((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹)))) (𝑅𝑏))
3 simp1l 1198 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝐾 ∈ HL)
4 simp1 1136 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
5 simp3rl 1247 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝑏𝑇)
6 simp3rr 1248 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝑏 ≠ ( I ↾ 𝐵))
7 cdlemk5.b . . . . . 6 𝐵 = (Base‘𝐾)
8 cdlemk5.a . . . . . 6 𝐴 = (Atoms‘𝐾)
9 cdlemk5.h . . . . . 6 𝐻 = (LHyp‘𝐾)
10 cdlemk5.t . . . . . 6 𝑇 = ((LTrn‘𝐾)‘𝑊)
11 cdlemk5.r . . . . . 6 𝑅 = ((trL‘𝐾)‘𝑊)
127, 8, 9, 10, 11trlnidat 40192 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)) → (𝑅𝑏) ∈ 𝐴)
134, 5, 6, 12syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝑏) ∈ 𝐴)
14 simp3ll 1245 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝑃𝐴)
15 cdlemk5.j . . . . . 6 = (join‘𝐾)
167, 15, 8hlatjcl 39385 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴 ∧ (𝑅𝑏) ∈ 𝐴) → (𝑃 (𝑅𝑏)) ∈ 𝐵)
173, 14, 13, 16syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑃 (𝑅𝑏)) ∈ 𝐵)
183hllatd 39382 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝐾 ∈ Lat)
19 simp22 1208 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝑁𝑇)
207, 8atbase 39307 . . . . . . 7 (𝑃𝐴𝑃𝐵)
2114, 20syl 17 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝑃𝐵)
227, 9, 10ltrncl 40144 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑁𝑇𝑃𝐵) → (𝑁𝑃) ∈ 𝐵)
234, 19, 21, 22syl3anc 1373 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑁𝑃) ∈ 𝐵)
24 simp21 1207 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝐹𝑇)
259, 10ltrncnv 40165 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → 𝐹𝑇)
264, 24, 25syl2anc 584 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝐹𝑇)
279, 10ltrnco 40738 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑏𝑇𝐹𝑇) → (𝑏𝐹) ∈ 𝑇)
284, 5, 26, 27syl3anc 1373 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑏𝐹) ∈ 𝑇)
297, 9, 10, 11trlcl 40183 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑏𝐹) ∈ 𝑇) → (𝑅‘(𝑏𝐹)) ∈ 𝐵)
304, 28, 29syl2anc 584 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘(𝑏𝐹)) ∈ 𝐵)
317, 15latjcl 18449 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑁𝑃) ∈ 𝐵 ∧ (𝑅‘(𝑏𝐹)) ∈ 𝐵) → ((𝑁𝑃) (𝑅‘(𝑏𝐹))) ∈ 𝐵)
3218, 23, 30, 31syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑁𝑃) (𝑅‘(𝑏𝐹))) ∈ 𝐵)
33 cdlemk5.l . . . . . 6 = (le‘𝐾)
3433, 15, 8hlatlej2 39394 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴 ∧ (𝑅𝑏) ∈ 𝐴) → (𝑅𝑏) (𝑃 (𝑅𝑏)))
353, 14, 13, 34syl3anc 1373 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝑏) (𝑃 (𝑅𝑏)))
36 cdlemk5.m . . . . 5 = (meet‘𝐾)
377, 33, 15, 36, 8atmod2i1 39880 . . . 4 ((𝐾 ∈ HL ∧ ((𝑅𝑏) ∈ 𝐴 ∧ (𝑃 (𝑅𝑏)) ∈ 𝐵 ∧ ((𝑁𝑃) (𝑅‘(𝑏𝐹))) ∈ 𝐵) ∧ (𝑅𝑏) (𝑃 (𝑅𝑏))) → (((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹)))) (𝑅𝑏)) = ((𝑃 (𝑅𝑏)) (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏))))
383, 13, 17, 32, 35, 37syl131anc 1385 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹)))) (𝑅𝑏)) = ((𝑃 (𝑅𝑏)) (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏))))
397, 8atbase 39307 . . . . . . . 8 ((𝑅𝑏) ∈ 𝐴 → (𝑅𝑏) ∈ 𝐵)
4013, 39syl 17 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝑏) ∈ 𝐵)
417, 9, 10, 11trlcl 40183 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑁𝑇) → (𝑅𝑁) ∈ 𝐵)
424, 19, 41syl2anc 584 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝑁) ∈ 𝐵)
437, 15latj32 18495 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑃𝐵 ∧ (𝑅𝑏) ∈ 𝐵 ∧ (𝑅𝑁) ∈ 𝐵)) → ((𝑃 (𝑅𝑏)) (𝑅𝑁)) = ((𝑃 (𝑅𝑁)) (𝑅𝑏)))
4418, 21, 40, 42, 43syl13anc 1374 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) (𝑅𝑁)) = ((𝑃 (𝑅𝑁)) (𝑅𝑏)))
45 simp3l 1202 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
4633, 15, 8, 9, 10, 11trljat3 40187 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → (𝑃 (𝑅𝑁)) = ((𝑁𝑃) (𝑅𝑁)))
474, 19, 45, 46syl3anc 1373 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑃 (𝑅𝑁)) = ((𝑁𝑃) (𝑅𝑁)))
4847oveq1d 7420 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑁)) (𝑅𝑏)) = (((𝑁𝑃) (𝑅𝑁)) (𝑅𝑏)))
497, 15latjass 18493 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((𝑁𝑃) ∈ 𝐵 ∧ (𝑅𝑁) ∈ 𝐵 ∧ (𝑅𝑏) ∈ 𝐵)) → (((𝑁𝑃) (𝑅𝑁)) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))))
5018, 23, 42, 40, 49syl13anc 1374 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑁𝑃) (𝑅𝑁)) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))))
5144, 48, 503eqtrd 2774 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) (𝑅𝑁)) = ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))))
527, 15latjass 18493 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((𝑁𝑃) ∈ 𝐵 ∧ (𝑅‘(𝑏𝐹)) ∈ 𝐵 ∧ (𝑅𝑏) ∈ 𝐵)) → (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅‘(𝑏𝐹)) (𝑅𝑏))))
5318, 23, 30, 40, 52syl13anc 1374 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅‘(𝑏𝐹)) (𝑅𝑏))))
547, 15latjcom 18457 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (𝑅𝑁) ∈ 𝐵 ∧ (𝑅𝑏) ∈ 𝐵) → ((𝑅𝑁) (𝑅𝑏)) = ((𝑅𝑏) (𝑅𝑁)))
5518, 42, 40, 54syl3anc 1373 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑁) (𝑅𝑏)) = ((𝑅𝑏) (𝑅𝑁)))
569, 10, 11trlcnv 40184 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → (𝑅𝐹) = (𝑅𝐹))
574, 24, 56syl2anc 584 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝐹) = (𝑅𝐹))
58 simp23 1209 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝐹) = (𝑅𝑁))
5957, 58eqtrd 2770 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝐹) = (𝑅𝑁))
6059oveq2d 7421 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑏) (𝑅𝐹)) = ((𝑅𝑏) (𝑅𝑁)))
6155, 60eqtr4d 2773 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑁) (𝑅𝑏)) = ((𝑅𝑏) (𝑅𝐹)))
6215, 9, 10, 11trljco 40759 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑏𝑇𝐹𝑇) → ((𝑅𝑏) (𝑅‘(𝑏𝐹))) = ((𝑅𝑏) (𝑅𝐹)))
634, 5, 26, 62syl3anc 1373 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑏) (𝑅‘(𝑏𝐹))) = ((𝑅𝑏) (𝑅𝐹)))
647, 15latjcom 18457 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝑅𝑏) ∈ 𝐵 ∧ (𝑅‘(𝑏𝐹)) ∈ 𝐵) → ((𝑅𝑏) (𝑅‘(𝑏𝐹))) = ((𝑅‘(𝑏𝐹)) (𝑅𝑏)))
6518, 40, 30, 64syl3anc 1373 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑏) (𝑅‘(𝑏𝐹))) = ((𝑅‘(𝑏𝐹)) (𝑅𝑏)))
6661, 63, 653eqtr2d 2776 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑁) (𝑅𝑏)) = ((𝑅‘(𝑏𝐹)) (𝑅𝑏)))
6766oveq2d 7421 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))) = ((𝑁𝑃) ((𝑅‘(𝑏𝐹)) (𝑅𝑏))))
6853, 67eqtr4d 2773 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))))
6951, 68eqtr4d 2773 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) (𝑅𝑁)) = (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏)))
7069oveq2d 7421 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) ((𝑃 (𝑅𝑏)) (𝑅𝑁))) = ((𝑃 (𝑅𝑏)) (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏))))
717, 15, 36latabs2 18486 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 (𝑅𝑏)) ∈ 𝐵 ∧ (𝑅𝑁) ∈ 𝐵) → ((𝑃 (𝑅𝑏)) ((𝑃 (𝑅𝑏)) (𝑅𝑁))) = (𝑃 (𝑅𝑏)))
7218, 17, 42, 71syl3anc 1373 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) ((𝑃 (𝑅𝑏)) (𝑅𝑁))) = (𝑃 (𝑅𝑏)))
7338, 70, 723eqtr2d 2776 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹)))) (𝑅𝑏)) = (𝑃 (𝑅𝑏)))
742, 73eqtrid 2782 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑍 (𝑅𝑏)) = (𝑃 (𝑅𝑏)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1086   = wceq 1540  wcel 2108  wne 2932   class class class wbr 5119   I cid 5547  ccnv 5653  cres 5656  ccom 5658  cfv 6531  (class class class)co 7405  Basecbs 17228  lecple 17278  joincjn 18323  meetcmee 18324  Latclat 18441  Atomscatm 39281  HLchlt 39368  LHypclh 40003  LTrncltrn 40120  trLctrl 40177
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 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2157  ax-12 2177  ax-ext 2707  ax-rep 5249  ax-sep 5266  ax-nul 5276  ax-pow 5335  ax-pr 5402  ax-un 7729  ax-riotaBAD 38971
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2065  df-mo 2539  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2809  df-nfc 2885  df-ne 2933  df-ral 3052  df-rex 3061  df-rmo 3359  df-reu 3360  df-rab 3416  df-v 3461  df-sbc 3766  df-csb 3875  df-dif 3929  df-un 3931  df-in 3933  df-ss 3943  df-nul 4309  df-if 4501  df-pw 4577  df-sn 4602  df-pr 4604  df-op 4608  df-uni 4884  df-iun 4969  df-iin 4970  df-br 5120  df-opab 5182  df-mpt 5202  df-id 5548  df-xp 5660  df-rel 5661  df-cnv 5662  df-co 5663  df-dm 5664  df-rn 5665  df-res 5666  df-ima 5667  df-iota 6484  df-fun 6533  df-fn 6534  df-f 6535  df-f1 6536  df-fo 6537  df-f1o 6538  df-fv 6539  df-riota 7362  df-ov 7408  df-oprab 7409  df-mpo 7410  df-1st 7988  df-2nd 7989  df-undef 8272  df-map 8842  df-proset 18306  df-poset 18325  df-plt 18340  df-lub 18356  df-glb 18357  df-join 18358  df-meet 18359  df-p0 18435  df-p1 18436  df-lat 18442  df-clat 18509  df-oposet 39194  df-ol 39196  df-oml 39197  df-covers 39284  df-ats 39285  df-atl 39316  df-cvlat 39340  df-hlat 39369  df-llines 39517  df-lplanes 39518  df-lvols 39519  df-lines 39520  df-psubsp 39522  df-pmap 39523  df-padd 39815  df-lhyp 40007  df-laut 40008  df-ldil 40123  df-ltrn 40124  df-trl 40178
This theorem is referenced by:  cdlemkid2  40943
  Copyright terms: Public domain W3C validator