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 41385
Description: Lemma for cdlemkid 41399. (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 7371 . 2 (𝑍 (𝑅𝑏)) = (((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹)))) (𝑅𝑏))
3 simp1l 1199 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝐾 ∈ HL)
4 simp1 1137 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝐾 ∈ HL ∧ 𝑊𝐻))
5 simp3rl 1248 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝑏𝑇)
6 simp3rr 1249 . . . . 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 40636 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)) → (𝑅𝑏) ∈ 𝐴)
134, 5, 6, 12syl3anc 1374 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝑏) ∈ 𝐴)
14 simp3ll 1246 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝑃𝐴)
15 cdlemk5.j . . . . . 6 = (join‘𝐾)
167, 15, 8hlatjcl 39830 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴 ∧ (𝑅𝑏) ∈ 𝐴) → (𝑃 (𝑅𝑏)) ∈ 𝐵)
173, 14, 13, 16syl3anc 1374 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑃 (𝑅𝑏)) ∈ 𝐵)
183hllatd 39827 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝐾 ∈ Lat)
19 simp22 1209 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝑁𝑇)
207, 8atbase 39752 . . . . . . 7 (𝑃𝐴𝑃𝐵)
2114, 20syl 17 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝑃𝐵)
227, 9, 10ltrncl 40588 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑁𝑇𝑃𝐵) → (𝑁𝑃) ∈ 𝐵)
234, 19, 21, 22syl3anc 1374 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑁𝑃) ∈ 𝐵)
24 simp21 1208 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝐹𝑇)
259, 10ltrncnv 40609 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → 𝐹𝑇)
264, 24, 25syl2anc 585 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → 𝐹𝑇)
279, 10ltrnco 41182 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑏𝑇𝐹𝑇) → (𝑏𝐹) ∈ 𝑇)
284, 5, 26, 27syl3anc 1374 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑏𝐹) ∈ 𝑇)
297, 9, 10, 11trlcl 40627 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝑏𝐹) ∈ 𝑇) → (𝑅‘(𝑏𝐹)) ∈ 𝐵)
304, 28, 29syl2anc 585 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅‘(𝑏𝐹)) ∈ 𝐵)
317, 15latjcl 18399 . . . . 5 ((𝐾 ∈ Lat ∧ (𝑁𝑃) ∈ 𝐵 ∧ (𝑅‘(𝑏𝐹)) ∈ 𝐵) → ((𝑁𝑃) (𝑅‘(𝑏𝐹))) ∈ 𝐵)
3218, 23, 30, 31syl3anc 1374 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑁𝑃) (𝑅‘(𝑏𝐹))) ∈ 𝐵)
33 cdlemk5.l . . . . . 6 = (le‘𝐾)
3433, 15, 8hlatlej2 39839 . . . . 5 ((𝐾 ∈ HL ∧ 𝑃𝐴 ∧ (𝑅𝑏) ∈ 𝐴) → (𝑅𝑏) (𝑃 (𝑅𝑏)))
353, 14, 13, 34syl3anc 1374 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝑏) (𝑃 (𝑅𝑏)))
36 cdlemk5.m . . . . 5 = (meet‘𝐾)
377, 33, 15, 36, 8atmod2i1 40324 . . . 4 ((𝐾 ∈ HL ∧ ((𝑅𝑏) ∈ 𝐴 ∧ (𝑃 (𝑅𝑏)) ∈ 𝐵 ∧ ((𝑁𝑃) (𝑅‘(𝑏𝐹))) ∈ 𝐵) ∧ (𝑅𝑏) (𝑃 (𝑅𝑏))) → (((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹)))) (𝑅𝑏)) = ((𝑃 (𝑅𝑏)) (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏))))
383, 13, 17, 32, 35, 37syl131anc 1386 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹)))) (𝑅𝑏)) = ((𝑃 (𝑅𝑏)) (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏))))
397, 8atbase 39752 . . . . . . . 8 ((𝑅𝑏) ∈ 𝐴 → (𝑅𝑏) ∈ 𝐵)
4013, 39syl 17 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝑏) ∈ 𝐵)
417, 9, 10, 11trlcl 40627 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑁𝑇) → (𝑅𝑁) ∈ 𝐵)
424, 19, 41syl2anc 585 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝑁) ∈ 𝐵)
437, 15latj32 18445 . . . . . . 7 ((𝐾 ∈ Lat ∧ (𝑃𝐵 ∧ (𝑅𝑏) ∈ 𝐵 ∧ (𝑅𝑁) ∈ 𝐵)) → ((𝑃 (𝑅𝑏)) (𝑅𝑁)) = ((𝑃 (𝑅𝑁)) (𝑅𝑏)))
4418, 21, 40, 42, 43syl13anc 1375 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) (𝑅𝑁)) = ((𝑃 (𝑅𝑁)) (𝑅𝑏)))
45 simp3l 1203 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑃𝐴 ∧ ¬ 𝑃 𝑊))
4633, 15, 8, 9, 10, 11trljat3 40631 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑁𝑇 ∧ (𝑃𝐴 ∧ ¬ 𝑃 𝑊)) → (𝑃 (𝑅𝑁)) = ((𝑁𝑃) (𝑅𝑁)))
474, 19, 45, 46syl3anc 1374 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑃 (𝑅𝑁)) = ((𝑁𝑃) (𝑅𝑁)))
4847oveq1d 7376 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑁)) (𝑅𝑏)) = (((𝑁𝑃) (𝑅𝑁)) (𝑅𝑏)))
497, 15latjass 18443 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((𝑁𝑃) ∈ 𝐵 ∧ (𝑅𝑁) ∈ 𝐵 ∧ (𝑅𝑏) ∈ 𝐵)) → (((𝑁𝑃) (𝑅𝑁)) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))))
5018, 23, 42, 40, 49syl13anc 1375 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑁𝑃) (𝑅𝑁)) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))))
5144, 48, 503eqtrd 2776 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) (𝑅𝑁)) = ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))))
527, 15latjass 18443 . . . . . . 7 ((𝐾 ∈ Lat ∧ ((𝑁𝑃) ∈ 𝐵 ∧ (𝑅‘(𝑏𝐹)) ∈ 𝐵 ∧ (𝑅𝑏) ∈ 𝐵)) → (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅‘(𝑏𝐹)) (𝑅𝑏))))
5318, 23, 30, 40, 52syl13anc 1375 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅‘(𝑏𝐹)) (𝑅𝑏))))
547, 15latjcom 18407 . . . . . . . . . 10 ((𝐾 ∈ Lat ∧ (𝑅𝑁) ∈ 𝐵 ∧ (𝑅𝑏) ∈ 𝐵) → ((𝑅𝑁) (𝑅𝑏)) = ((𝑅𝑏) (𝑅𝑁)))
5518, 42, 40, 54syl3anc 1374 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑁) (𝑅𝑏)) = ((𝑅𝑏) (𝑅𝑁)))
569, 10, 11trlcnv 40628 . . . . . . . . . . . 12 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝐹𝑇) → (𝑅𝐹) = (𝑅𝐹))
574, 24, 56syl2anc 585 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝐹) = (𝑅𝐹))
58 simp23 1210 . . . . . . . . . . 11 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝐹) = (𝑅𝑁))
5957, 58eqtrd 2772 . . . . . . . . . 10 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑅𝐹) = (𝑅𝑁))
6059oveq2d 7377 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑏) (𝑅𝐹)) = ((𝑅𝑏) (𝑅𝑁)))
6155, 60eqtr4d 2775 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑁) (𝑅𝑏)) = ((𝑅𝑏) (𝑅𝐹)))
6215, 9, 10, 11trljco 41203 . . . . . . . . 9 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ 𝑏𝑇𝐹𝑇) → ((𝑅𝑏) (𝑅‘(𝑏𝐹))) = ((𝑅𝑏) (𝑅𝐹)))
634, 5, 26, 62syl3anc 1374 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑏) (𝑅‘(𝑏𝐹))) = ((𝑅𝑏) (𝑅𝐹)))
647, 15latjcom 18407 . . . . . . . . 9 ((𝐾 ∈ Lat ∧ (𝑅𝑏) ∈ 𝐵 ∧ (𝑅‘(𝑏𝐹)) ∈ 𝐵) → ((𝑅𝑏) (𝑅‘(𝑏𝐹))) = ((𝑅‘(𝑏𝐹)) (𝑅𝑏)))
6518, 40, 30, 64syl3anc 1374 . . . . . . . 8 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑏) (𝑅‘(𝑏𝐹))) = ((𝑅‘(𝑏𝐹)) (𝑅𝑏)))
6661, 63, 653eqtr2d 2778 . . . . . . 7 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑅𝑁) (𝑅𝑏)) = ((𝑅‘(𝑏𝐹)) (𝑅𝑏)))
6766oveq2d 7377 . . . . . 6 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))) = ((𝑁𝑃) ((𝑅‘(𝑏𝐹)) (𝑅𝑏))))
6853, 67eqtr4d 2775 . . . . 5 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏)) = ((𝑁𝑃) ((𝑅𝑁) (𝑅𝑏))))
6951, 68eqtr4d 2775 . . . 4 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) (𝑅𝑁)) = (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏)))
7069oveq2d 7377 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) ((𝑃 (𝑅𝑏)) (𝑅𝑁))) = ((𝑃 (𝑅𝑏)) (((𝑁𝑃) (𝑅‘(𝑏𝐹))) (𝑅𝑏))))
717, 15, 36latabs2 18436 . . . 4 ((𝐾 ∈ Lat ∧ (𝑃 (𝑅𝑏)) ∈ 𝐵 ∧ (𝑅𝑁) ∈ 𝐵) → ((𝑃 (𝑅𝑏)) ((𝑃 (𝑅𝑏)) (𝑅𝑁))) = (𝑃 (𝑅𝑏)))
7218, 17, 42, 71syl3anc 1374 . . 3 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → ((𝑃 (𝑅𝑏)) ((𝑃 (𝑅𝑏)) (𝑅𝑁))) = (𝑃 (𝑅𝑏)))
7338, 70, 723eqtr2d 2778 . 2 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (((𝑃 (𝑅𝑏)) ((𝑁𝑃) (𝑅‘(𝑏𝐹)))) (𝑅𝑏)) = (𝑃 (𝑅𝑏)))
742, 73eqtrid 2784 1 (((𝐾 ∈ HL ∧ 𝑊𝐻) ∧ (𝐹𝑇𝑁𝑇 ∧ (𝑅𝐹) = (𝑅𝑁)) ∧ ((𝑃𝐴 ∧ ¬ 𝑃 𝑊) ∧ (𝑏𝑇𝑏 ≠ ( I ↾ 𝐵)))) → (𝑍 (𝑅𝑏)) = (𝑃 (𝑅𝑏)))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wa 395  w3a 1087   = wceq 1542  wcel 2114  wne 2933   class class class wbr 5086   I cid 5519  ccnv 5624  cres 5627  ccom 5629  cfv 6493  (class class class)co 7361  Basecbs 17173  lecple 17221  joincjn 18271  meetcmee 18272  Latclat 18391  Atomscatm 39726  HLchlt 39813  LHypclh 40447  LTrncltrn 40564  trLctrl 40621
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 2185  ax-ext 2709  ax-rep 5213  ax-sep 5232  ax-nul 5242  ax-pow 5303  ax-pr 5371  ax-un 7683  ax-riotaBAD 39416
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 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-op 4575  df-uni 4852  df-iun 4936  df-iin 4937  df-br 5087  df-opab 5149  df-mpt 5168  df-id 5520  df-xp 5631  df-rel 5632  df-cnv 5633  df-co 5634  df-dm 5635  df-rn 5636  df-res 5637  df-ima 5638  df-iota 6449  df-fun 6495  df-fn 6496  df-f 6497  df-f1 6498  df-fo 6499  df-f1o 6500  df-fv 6501  df-riota 7318  df-ov 7364  df-oprab 7365  df-mpo 7366  df-1st 7936  df-2nd 7937  df-undef 8217  df-map 8769  df-proset 18254  df-poset 18273  df-plt 18288  df-lub 18304  df-glb 18305  df-join 18306  df-meet 18307  df-p0 18383  df-p1 18384  df-lat 18392  df-clat 18459  df-oposet 39639  df-ol 39641  df-oml 39642  df-covers 39729  df-ats 39730  df-atl 39761  df-cvlat 39785  df-hlat 39814  df-llines 39961  df-lplanes 39962  df-lvols 39963  df-lines 39964  df-psubsp 39966  df-pmap 39967  df-padd 40259  df-lhyp 40451  df-laut 40452  df-ldil 40567  df-ltrn 40568  df-trl 40622
This theorem is referenced by:  cdlemkid2  41387
  Copyright terms: Public domain W3C validator