Step | Hyp | Ref
| Expression |
1 | | eqid 2798 |
. . . . 5
⊢
(Base‘𝑅) =
(Base‘𝑅) |
2 | | eqid 2798 |
. . . . 5
⊢
(0g‘𝑅) = (0g‘𝑅) |
3 | | ringcmn 19327 |
. . . . . . 7
⊢ (𝑅 ∈ Ring → 𝑅 ∈ CMnd) |
4 | 3 | 3ad2ant1 1130 |
. . . . . 6
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → 𝑅 ∈ CMnd) |
5 | 4 | adantr 484 |
. . . . 5
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → 𝑅 ∈ CMnd) |
6 | | ovex 7168 |
. . . . . . . 8
⊢
(ℕ0 ↑m 𝐼) ∈ V |
7 | 6 | rabex 5199 |
. . . . . . 7
⊢ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∈
V |
8 | 7 | rabex 5199 |
. . . . . 6
⊢ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ∈ V |
9 | 8 | a1i 11 |
. . . . 5
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ∈ V) |
10 | | simpll1 1209 |
. . . . . . 7
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝑅 ∈ Ring) |
11 | | psropprmul.y |
. . . . . . . . . 10
⊢ 𝑌 = (𝐼 mPwSer 𝑅) |
12 | | eqid 2798 |
. . . . . . . . . 10
⊢ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} = {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin} |
13 | | psropprmul.b |
. . . . . . . . . 10
⊢ 𝐵 = (Base‘𝑌) |
14 | | simp3 1135 |
. . . . . . . . . 10
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → 𝐺 ∈ 𝐵) |
15 | 11, 1, 12, 13, 14 | psrelbas 20617 |
. . . . . . . . 9
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → 𝐺:{𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}⟶(Base‘𝑅)) |
16 | 15 | adantr 484 |
. . . . . . . 8
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → 𝐺:{𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}⟶(Base‘𝑅)) |
17 | | elrabi 3623 |
. . . . . . . 8
⊢ (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} → 𝑒 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}) |
18 | | ffvelrn 6826 |
. . . . . . . 8
⊢ ((𝐺:{𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}⟶(Base‘𝑅)
∧ 𝑒 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝐺‘𝑒) ∈ (Base‘𝑅)) |
19 | 16, 17, 18 | syl2an 598 |
. . . . . . 7
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → (𝐺‘𝑒) ∈ (Base‘𝑅)) |
20 | | simp2 1134 |
. . . . . . . . . 10
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → 𝐹 ∈ 𝐵) |
21 | 11, 1, 12, 13, 20 | psrelbas 20617 |
. . . . . . . . 9
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → 𝐹:{𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}⟶(Base‘𝑅)) |
22 | 21 | ad2antrr 725 |
. . . . . . . 8
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝐹:{𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}⟶(Base‘𝑅)) |
23 | | ssrab2 4007 |
. . . . . . . . 9
⊢ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ⊆ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin} |
24 | | reldmpsr 20599 |
. . . . . . . . . . . . 13
⊢ Rel dom
mPwSer |
25 | 11, 13, 24 | strov2rcl 16538 |
. . . . . . . . . . . 12
⊢ (𝐺 ∈ 𝐵 → 𝐼 ∈ V) |
26 | 25 | 3ad2ant3 1132 |
. . . . . . . . . . 11
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → 𝐼 ∈ V) |
27 | 26 | ad2antrr 725 |
. . . . . . . . . 10
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝐼 ∈ V) |
28 | | simplr 768 |
. . . . . . . . . 10
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}) |
29 | | simpr 488 |
. . . . . . . . . 10
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) |
30 | | eqid 2798 |
. . . . . . . . . . 11
⊢ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} = {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} |
31 | 12, 30 | psrbagconcl 20611 |
. . . . . . . . . 10
⊢ ((𝐼 ∈ V ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → (𝑏 ∘f − 𝑒) ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) |
32 | 27, 28, 29, 31 | syl3anc 1368 |
. . . . . . . . 9
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → (𝑏 ∘f − 𝑒) ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) |
33 | 23, 32 | sseldi 3913 |
. . . . . . . 8
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → (𝑏 ∘f − 𝑒) ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}) |
34 | 22, 33 | ffvelrnd 6829 |
. . . . . . 7
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → (𝐹‘(𝑏 ∘f − 𝑒)) ∈ (Base‘𝑅)) |
35 | | eqid 2798 |
. . . . . . . 8
⊢
(.r‘𝑅) = (.r‘𝑅) |
36 | 1, 35 | ringcl 19307 |
. . . . . . 7
⊢ ((𝑅 ∈ Ring ∧ (𝐺‘𝑒) ∈ (Base‘𝑅) ∧ (𝐹‘(𝑏 ∘f − 𝑒)) ∈ (Base‘𝑅)) → ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒))) ∈ (Base‘𝑅)) |
37 | 10, 19, 34, 36 | syl3anc 1368 |
. . . . . 6
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒))) ∈ (Base‘𝑅)) |
38 | 37 | fmpttd 6856 |
. . . . 5
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))):{𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}⟶(Base‘𝑅)) |
39 | | mptexg 6961 |
. . . . . . 7
⊢ ({𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ∈ V → (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) ∈ V) |
40 | 8, 39 | mp1i 13 |
. . . . . 6
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) ∈ V) |
41 | | funmpt 6362 |
. . . . . . 7
⊢ Fun
(𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) |
42 | 41 | a1i 11 |
. . . . . 6
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → Fun
(𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒))))) |
43 | | fvexd 6660 |
. . . . . 6
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) →
(0g‘𝑅)
∈ V) |
44 | 12 | psrbaglefi 20610 |
. . . . . . 7
⊢ ((𝐼 ∈ V ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ∈ Fin) |
45 | 26, 44 | sylan 583 |
. . . . . 6
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ∈ Fin) |
46 | | suppssdm 7826 |
. . . . . . . 8
⊢ ((𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) supp
(0g‘𝑅))
⊆ dom (𝑒 ∈
{𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) |
47 | | eqid 2798 |
. . . . . . . . 9
⊢ (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) = (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) |
48 | 47 | dmmptss 6062 |
. . . . . . . 8
⊢ dom
(𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) ⊆ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} |
49 | 46, 48 | sstri 3924 |
. . . . . . 7
⊢ ((𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) supp
(0g‘𝑅))
⊆ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} |
50 | 49 | a1i 11 |
. . . . . 6
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → ((𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) supp
(0g‘𝑅))
⊆ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) |
51 | | suppssfifsupp 8832 |
. . . . . 6
⊢ ((((𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) ∈ V ∧ Fun (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) ∧
(0g‘𝑅)
∈ V) ∧ ({𝑑 ∈
{𝑎 ∈
(ℕ0 ↑m 𝐼) ∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ∈ Fin ∧ ((𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) supp
(0g‘𝑅))
⊆ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏})) → (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) finSupp
(0g‘𝑅)) |
52 | 40, 42, 43, 45, 50, 51 | syl32anc 1375 |
. . . . 5
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) finSupp
(0g‘𝑅)) |
53 | 12, 30 | psrbagconf1o 20612 |
. . . . . 6
⊢ ((𝐼 ∈ V ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ (𝑏 ∘f − 𝑐)):{𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}–1-1-onto→{𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) |
54 | 26, 53 | sylan 583 |
. . . . 5
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ (𝑏 ∘f − 𝑐)):{𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}–1-1-onto→{𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) |
55 | 1, 2, 5, 9, 38, 52, 54 | gsumf1o 19029 |
. . . 4
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑅 Σg
(𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒))))) = (𝑅 Σg ((𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) ∘ (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ (𝑏 ∘f − 𝑐))))) |
56 | 26 | ad2antrr 725 |
. . . . . . . 8
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝐼 ∈ V) |
57 | | simplr 768 |
. . . . . . . 8
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}) |
58 | | simpr 488 |
. . . . . . . 8
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) |
59 | 12, 30 | psrbagconcl 20611 |
. . . . . . . 8
⊢ ((𝐼 ∈ V ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → (𝑏 ∘f − 𝑐) ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) |
60 | 56, 57, 58, 59 | syl3anc 1368 |
. . . . . . 7
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → (𝑏 ∘f − 𝑐) ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) |
61 | | eqidd 2799 |
. . . . . . 7
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ (𝑏 ∘f − 𝑐)) = (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ (𝑏 ∘f − 𝑐))) |
62 | | eqidd 2799 |
. . . . . . 7
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) = (𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒))))) |
63 | | fveq2 6645 |
. . . . . . . 8
⊢ (𝑒 = (𝑏 ∘f − 𝑐) → (𝐺‘𝑒) = (𝐺‘(𝑏 ∘f − 𝑐))) |
64 | | oveq2 7143 |
. . . . . . . . 9
⊢ (𝑒 = (𝑏 ∘f − 𝑐) → (𝑏 ∘f − 𝑒) = (𝑏 ∘f − (𝑏 ∘f −
𝑐))) |
65 | 64 | fveq2d 6649 |
. . . . . . . 8
⊢ (𝑒 = (𝑏 ∘f − 𝑐) → (𝐹‘(𝑏 ∘f − 𝑒)) = (𝐹‘(𝑏 ∘f − (𝑏 ∘f −
𝑐)))) |
66 | 63, 65 | oveq12d 7153 |
. . . . . . 7
⊢ (𝑒 = (𝑏 ∘f − 𝑐) → ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒))) = ((𝐺‘(𝑏 ∘f − 𝑐))(.r‘𝑅)(𝐹‘(𝑏 ∘f − (𝑏 ∘f −
𝑐))))) |
67 | 60, 61, 62, 66 | fmptco 6868 |
. . . . . 6
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → ((𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) ∘ (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ (𝑏 ∘f − 𝑐))) = (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘(𝑏 ∘f − 𝑐))(.r‘𝑅)(𝐹‘(𝑏 ∘f − (𝑏 ∘f −
𝑐)))))) |
68 | 12 | psrbagf 20603 |
. . . . . . . . . . . . 13
⊢ ((𝐼 ∈ V ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → 𝑏:𝐼⟶ℕ0) |
69 | 26, 68 | sylan 583 |
. . . . . . . . . . . 12
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → 𝑏:𝐼⟶ℕ0) |
70 | 69 | adantr 484 |
. . . . . . . . . . 11
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝑏:𝐼⟶ℕ0) |
71 | 26 | adantr 484 |
. . . . . . . . . . . 12
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → 𝐼 ∈ V) |
72 | | elrabi 3623 |
. . . . . . . . . . . 12
⊢ (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} → 𝑐 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈
Fin}) |
73 | 12 | psrbagf 20603 |
. . . . . . . . . . . 12
⊢ ((𝐼 ∈ V ∧ 𝑐 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → 𝑐:𝐼⟶ℕ0) |
74 | 71, 72, 73 | syl2an 598 |
. . . . . . . . . . 11
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → 𝑐:𝐼⟶ℕ0) |
75 | | nn0cn 11895 |
. . . . . . . . . . . . 13
⊢ (𝑒 ∈ ℕ0
→ 𝑒 ∈
ℂ) |
76 | | nn0cn 11895 |
. . . . . . . . . . . . 13
⊢ (𝑓 ∈ ℕ0
→ 𝑓 ∈
ℂ) |
77 | | nncan 10904 |
. . . . . . . . . . . . 13
⊢ ((𝑒 ∈ ℂ ∧ 𝑓 ∈ ℂ) → (𝑒 − (𝑒 − 𝑓)) = 𝑓) |
78 | 75, 76, 77 | syl2an 598 |
. . . . . . . . . . . 12
⊢ ((𝑒 ∈ ℕ0
∧ 𝑓 ∈
ℕ0) → (𝑒 − (𝑒 − 𝑓)) = 𝑓) |
79 | 78 | adantl 485 |
. . . . . . . . . . 11
⊢
(((((𝑅 ∈ Ring
∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) ∧ (𝑒 ∈ ℕ0 ∧ 𝑓 ∈ ℕ0))
→ (𝑒 − (𝑒 − 𝑓)) = 𝑓) |
80 | 56, 70, 74, 79 | caonncan 7427 |
. . . . . . . . . 10
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → (𝑏 ∘f − (𝑏 ∘f −
𝑐)) = 𝑐) |
81 | 80 | fveq2d 6649 |
. . . . . . . . 9
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → (𝐹‘(𝑏 ∘f − (𝑏 ∘f −
𝑐))) = (𝐹‘𝑐)) |
82 | 81 | oveq2d 7151 |
. . . . . . . 8
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → ((𝐺‘(𝑏 ∘f − 𝑐))(.r‘𝑅)(𝐹‘(𝑏 ∘f − (𝑏 ∘f −
𝑐)))) = ((𝐺‘(𝑏 ∘f − 𝑐))(.r‘𝑅)(𝐹‘𝑐))) |
83 | | psropprmul.s |
. . . . . . . . 9
⊢ 𝑆 =
(oppr‘𝑅) |
84 | | eqid 2798 |
. . . . . . . . 9
⊢
(.r‘𝑆) = (.r‘𝑆) |
85 | 1, 35, 83, 84 | opprmul 19372 |
. . . . . . . 8
⊢ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐))) = ((𝐺‘(𝑏 ∘f − 𝑐))(.r‘𝑅)(𝐹‘𝑐)) |
86 | 82, 85 | eqtr4di 2851 |
. . . . . . 7
⊢ ((((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) ∧ 𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏}) → ((𝐺‘(𝑏 ∘f − 𝑐))(.r‘𝑅)(𝐹‘(𝑏 ∘f − (𝑏 ∘f −
𝑐)))) = ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐)))) |
87 | 86 | mpteq2dva 5125 |
. . . . . 6
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘(𝑏 ∘f − 𝑐))(.r‘𝑅)(𝐹‘(𝑏 ∘f − (𝑏 ∘f −
𝑐))))) = (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐))))) |
88 | 67, 87 | eqtrd 2833 |
. . . . 5
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → ((𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) ∘ (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ (𝑏 ∘f − 𝑐))) = (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐))))) |
89 | 88 | oveq2d 7151 |
. . . 4
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑅 Σg
((𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))) ∘ (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ (𝑏 ∘f − 𝑐)))) = (𝑅 Σg (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐)))))) |
90 | 8 | mptex 6963 |
. . . . . . . 8
⊢ (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐)))) ∈ V |
91 | 90 | a1i 11 |
. . . . . . 7
⊢ (𝑅 ∈ Ring → (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐)))) ∈ V) |
92 | | id 22 |
. . . . . . 7
⊢ (𝑅 ∈ Ring → 𝑅 ∈ Ring) |
93 | 83 | fvexi 6659 |
. . . . . . . 8
⊢ 𝑆 ∈ V |
94 | 93 | a1i 11 |
. . . . . . 7
⊢ (𝑅 ∈ Ring → 𝑆 ∈ V) |
95 | 83, 1 | opprbas 19375 |
. . . . . . . 8
⊢
(Base‘𝑅) =
(Base‘𝑆) |
96 | 95 | a1i 11 |
. . . . . . 7
⊢ (𝑅 ∈ Ring →
(Base‘𝑅) =
(Base‘𝑆)) |
97 | | eqid 2798 |
. . . . . . . . 9
⊢
(+g‘𝑅) = (+g‘𝑅) |
98 | 83, 97 | oppradd 19376 |
. . . . . . . 8
⊢
(+g‘𝑅) = (+g‘𝑆) |
99 | 98 | a1i 11 |
. . . . . . 7
⊢ (𝑅 ∈ Ring →
(+g‘𝑅) =
(+g‘𝑆)) |
100 | 91, 92, 94, 96, 99 | gsumpropd 17880 |
. . . . . 6
⊢ (𝑅 ∈ Ring → (𝑅 Σg
(𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐))))) = (𝑆 Σg (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐)))))) |
101 | 100 | 3ad2ant1 1130 |
. . . . 5
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → (𝑅 Σg (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐))))) = (𝑆 Σg (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐)))))) |
102 | 101 | adantr 484 |
. . . 4
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑅 Σg
(𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐))))) = (𝑆 Σg (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐)))))) |
103 | 55, 89, 102 | 3eqtrd 2837 |
. . 3
⊢ (((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) ∧ 𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin}) → (𝑅 Σg
(𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒))))) = (𝑆 Σg (𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐)))))) |
104 | 103 | mpteq2dva 5125 |
. 2
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → (𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ↦ (𝑅 Σg
(𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒)))))) = (𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ↦ (𝑆 Σg
(𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐))))))) |
105 | | psropprmul.t |
. . 3
⊢ · =
(.r‘𝑌) |
106 | 11, 13, 35, 105, 12, 14, 20 | psrmulfval 20623 |
. 2
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → (𝐺 · 𝐹) = (𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ↦ (𝑅 Σg
(𝑒 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐺‘𝑒)(.r‘𝑅)(𝐹‘(𝑏 ∘f − 𝑒))))))) |
107 | | psropprmul.z |
. . 3
⊢ 𝑍 = (𝐼 mPwSer 𝑆) |
108 | | eqid 2798 |
. . 3
⊢
(Base‘𝑍) =
(Base‘𝑍) |
109 | | psropprmul.u |
. . 3
⊢ ∙ =
(.r‘𝑍) |
110 | 95 | a1i 11 |
. . . . . 6
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → (Base‘𝑅) = (Base‘𝑆)) |
111 | 110 | psrbaspropd 20864 |
. . . . 5
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → (Base‘(𝐼 mPwSer 𝑅)) = (Base‘(𝐼 mPwSer 𝑆))) |
112 | 11 | fveq2i 6648 |
. . . . . 6
⊢
(Base‘𝑌) =
(Base‘(𝐼 mPwSer 𝑅)) |
113 | 13, 112 | eqtri 2821 |
. . . . 5
⊢ 𝐵 = (Base‘(𝐼 mPwSer 𝑅)) |
114 | 107 | fveq2i 6648 |
. . . . 5
⊢
(Base‘𝑍) =
(Base‘(𝐼 mPwSer 𝑆)) |
115 | 111, 113,
114 | 3eqtr4g 2858 |
. . . 4
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → 𝐵 = (Base‘𝑍)) |
116 | 20, 115 | eleqtrd 2892 |
. . 3
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → 𝐹 ∈ (Base‘𝑍)) |
117 | 14, 115 | eleqtrd 2892 |
. . 3
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → 𝐺 ∈ (Base‘𝑍)) |
118 | 107, 108,
84, 109, 12, 116, 117 | psrmulfval 20623 |
. 2
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → (𝐹 ∙ 𝐺) = (𝑏 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ↦ (𝑆 Σg
(𝑐 ∈ {𝑑 ∈ {𝑎 ∈ (ℕ0
↑m 𝐼)
∣ (◡𝑎 “ ℕ) ∈ Fin} ∣ 𝑑 ∘r ≤ 𝑏} ↦ ((𝐹‘𝑐)(.r‘𝑆)(𝐺‘(𝑏 ∘f − 𝑐))))))) |
119 | 104, 106,
118 | 3eqtr4rd 2844 |
1
⊢ ((𝑅 ∈ Ring ∧ 𝐹 ∈ 𝐵 ∧ 𝐺 ∈ 𝐵) → (𝐹 ∙ 𝐺) = (𝐺 · 𝐹)) |