MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  chfacfscmulgsum Structured version   Visualization version   GIF version

Theorem chfacfscmulgsum 20878
Description: Breaking up a sum of values of the "characteristic factor function" scaled by a polynomial. (Contributed by AV, 9-Nov-2019.)
Hypotheses
Ref Expression
chfacfisf.a 𝐴 = (𝑁 Mat 𝑅)
chfacfisf.b 𝐵 = (Base‘𝐴)
chfacfisf.p 𝑃 = (Poly1𝑅)
chfacfisf.y 𝑌 = (𝑁 Mat 𝑃)
chfacfisf.r × = (.r𝑌)
chfacfisf.s = (-g𝑌)
chfacfisf.0 0 = (0g𝑌)
chfacfisf.t 𝑇 = (𝑁 matToPolyMat 𝑅)
chfacfisf.g 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))))
chfacfscmulcl.x 𝑋 = (var1𝑅)
chfacfscmulcl.m · = ( ·𝑠𝑌)
chfacfscmulcl.e = (.g‘(mulGrp‘𝑃))
chfacfscmulgsum.p + = (+g𝑌)
Assertion
Ref Expression
chfacfscmulgsum (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ ℕ0 ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))) + ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
Distinct variable groups:   𝐵,𝑛   𝑛,𝑀   𝑛,𝑁   𝑅,𝑛   𝑛,𝑌   𝑛,𝑏   𝑛,𝑠,𝐵   0 ,𝑛   𝐵,𝑖,𝑠   𝑖,𝐺   𝑖,𝑀   𝑖,𝑁   𝑅,𝑖   𝑖,𝑋   𝑖,𝑌   ,𝑖   · ,𝑏,𝑖   𝑇,𝑛   ,𝑛   × ,𝑛   𝑖,𝑛
Allowed substitution hints:   𝐴(𝑖,𝑛,𝑠,𝑏)   𝐵(𝑏)   𝑃(𝑖,𝑛,𝑠,𝑏)   + (𝑖,𝑛,𝑠,𝑏)   𝑅(𝑠,𝑏)   𝑇(𝑖,𝑠,𝑏)   · (𝑛,𝑠)   × (𝑖,𝑠,𝑏)   (𝑛,𝑠,𝑏)   𝐺(𝑛,𝑠,𝑏)   𝑀(𝑠,𝑏)   (𝑖,𝑠,𝑏)   𝑁(𝑠,𝑏)   𝑋(𝑛,𝑠,𝑏)   𝑌(𝑠,𝑏)   0 (𝑖,𝑠,𝑏)

Proof of Theorem chfacfscmulgsum
StepHypRef Expression
1 eqid 2771 . . 3 (Base‘𝑌) = (Base‘𝑌)
2 chfacfisf.0 . . 3 0 = (0g𝑌)
3 chfacfscmulgsum.p . . 3 + = (+g𝑌)
4 crngring 18759 . . . . . . . 8 (𝑅 ∈ CRing → 𝑅 ∈ Ring)
54anim2i 603 . . . . . . 7 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
653adant3 1126 . . . . . 6 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
7 chfacfisf.p . . . . . . 7 𝑃 = (Poly1𝑅)
8 chfacfisf.y . . . . . . 7 𝑌 = (𝑁 Mat 𝑃)
97, 8pmatring 20711 . . . . . 6 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ Ring)
106, 9syl 17 . . . . 5 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ Ring)
11 ringcmn 18782 . . . . 5 (𝑌 ∈ Ring → 𝑌 ∈ CMnd)
1210, 11syl 17 . . . 4 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ CMnd)
1312adantr 466 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ CMnd)
14 nn0ex 11498 . . . 4 0 ∈ V
1514a1i 11 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ℕ0 ∈ V)
16 simpll 750 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵))
17 simplr 752 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))))
18 simpr 471 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → 𝑖 ∈ ℕ0)
1916, 17, 183jca 1122 . . . 4 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑖 ∈ ℕ0))
20 chfacfisf.a . . . . 5 𝐴 = (𝑁 Mat 𝑅)
21 chfacfisf.b . . . . 5 𝐵 = (Base‘𝐴)
22 chfacfisf.r . . . . 5 × = (.r𝑌)
23 chfacfisf.s . . . . 5 = (-g𝑌)
24 chfacfisf.t . . . . 5 𝑇 = (𝑁 matToPolyMat 𝑅)
25 chfacfisf.g . . . . 5 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))))
26 chfacfscmulcl.x . . . . 5 𝑋 = (var1𝑅)
27 chfacfscmulcl.m . . . . 5 · = ( ·𝑠𝑌)
28 chfacfscmulcl.e . . . . 5 = (.g‘(mulGrp‘𝑃))
2920, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28chfacfscmulcl 20875 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑖 ∈ ℕ0) → ((𝑖 𝑋) · (𝐺𝑖)) ∈ (Base‘𝑌))
3019, 29syl 17 . . 3 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → ((𝑖 𝑋) · (𝐺𝑖)) ∈ (Base‘𝑌))
3120, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28chfacfscmulfsupp 20877 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑖 ∈ ℕ0 ↦ ((𝑖 𝑋) · (𝐺𝑖))) finSupp 0 )
32 nn0disj 12656 . . . 4 ((0...(𝑠 + 1)) ∩ (ℤ‘((𝑠 + 1) + 1))) = ∅
3332a1i 11 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((0...(𝑠 + 1)) ∩ (ℤ‘((𝑠 + 1) + 1))) = ∅)
34 nnnn0 11499 . . . . . 6 (𝑠 ∈ ℕ → 𝑠 ∈ ℕ0)
35 peano2nn0 11533 . . . . . 6 (𝑠 ∈ ℕ0 → (𝑠 + 1) ∈ ℕ0)
3634, 35syl 17 . . . . 5 (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℕ0)
37 nn0split 12655 . . . . 5 ((𝑠 + 1) ∈ ℕ0 → ℕ0 = ((0...(𝑠 + 1)) ∪ (ℤ‘((𝑠 + 1) + 1))))
3836, 37syl 17 . . . 4 (𝑠 ∈ ℕ → ℕ0 = ((0...(𝑠 + 1)) ∪ (ℤ‘((𝑠 + 1) + 1))))
3938ad2antrl 707 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ℕ0 = ((0...(𝑠 + 1)) ∪ (ℤ‘((𝑠 + 1) + 1))))
401, 2, 3, 13, 15, 30, 31, 33, 39gsumsplit2 18529 . 2 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ ℕ0 ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖))))))
41 simpll 750 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ‘((𝑠 + 1) + 1))) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵))
42 simplr 752 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ‘((𝑠 + 1) + 1))) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))))
43 nncn 11228 . . . . . . . . . . . . 13 (𝑠 ∈ ℕ → 𝑠 ∈ ℂ)
44 add1p1 11483 . . . . . . . . . . . . 13 (𝑠 ∈ ℂ → ((𝑠 + 1) + 1) = (𝑠 + 2))
4543, 44syl 17 . . . . . . . . . . . 12 (𝑠 ∈ ℕ → ((𝑠 + 1) + 1) = (𝑠 + 2))
4645ad2antrl 707 . . . . . . . . . . 11 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑠 + 1) + 1) = (𝑠 + 2))
4746fveq2d 6334 . . . . . . . . . 10 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (ℤ‘((𝑠 + 1) + 1)) = (ℤ‘(𝑠 + 2)))
4847eleq2d 2836 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↔ 𝑖 ∈ (ℤ‘(𝑠 + 2))))
4948biimpa 462 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ‘((𝑠 + 1) + 1))) → 𝑖 ∈ (ℤ‘(𝑠 + 2)))
5020, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28chfacfscmul0 20876 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑖 ∈ (ℤ‘(𝑠 + 2))) → ((𝑖 𝑋) · (𝐺𝑖)) = 0 )
5141, 42, 49, 50syl3anc 1476 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ‘((𝑠 + 1) + 1))) → ((𝑖 𝑋) · (𝐺𝑖)) = 0 )
5251mpteq2dva 4878 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖))) = (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ 0 ))
5352oveq2d 6807 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ 0 )))
544, 9sylan2 580 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Ring)
55 ringmnd 18757 . . . . . . . . . 10 (𝑌 ∈ Ring → 𝑌 ∈ Mnd)
5654, 55syl 17 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Mnd)
57563adant3 1126 . . . . . . . 8 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ Mnd)
58 fvex 6340 . . . . . . . 8 (ℤ‘((𝑠 + 1) + 1)) ∈ V
5957, 58jctir 510 . . . . . . 7 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑌 ∈ Mnd ∧ (ℤ‘((𝑠 + 1) + 1)) ∈ V))
6059adantr 466 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 ∈ Mnd ∧ (ℤ‘((𝑠 + 1) + 1)) ∈ V))
612gsumz 17575 . . . . . 6 ((𝑌 ∈ Mnd ∧ (ℤ‘((𝑠 + 1) + 1)) ∈ V) → (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ 0 )) = 0 )
6260, 61syl 17 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ 0 )) = 0 )
6353, 62eqtrd 2805 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = 0 )
6463oveq2d 6807 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖))))) = ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + 0 ))
6557adantr 466 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ Mnd)
66 fzfid 12973 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (0...(𝑠 + 1)) ∈ Fin)
67 elfznn0 12633 . . . . . . . 8 (𝑖 ∈ (0...(𝑠 + 1)) → 𝑖 ∈ ℕ0)
6867, 19sylan2 580 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (0...(𝑠 + 1))) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑖 ∈ ℕ0))
6968, 29syl 17 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (0...(𝑠 + 1))) → ((𝑖 𝑋) · (𝐺𝑖)) ∈ (Base‘𝑌))
7069ralrimiva 3115 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ∀𝑖 ∈ (0...(𝑠 + 1))((𝑖 𝑋) · (𝐺𝑖)) ∈ (Base‘𝑌))
711, 13, 66, 70gsummptcl 18566 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) ∈ (Base‘𝑌))
721, 3, 2mndrid 17513 . . . 4 ((𝑌 ∈ Mnd ∧ (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) ∈ (Base‘𝑌)) → ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + 0 ) = (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))))
7365, 71, 72syl2anc 573 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + 0 ) = (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))))
7464, 73eqtrd 2805 . 2 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖))))) = (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))))
7534ad2antrl 707 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑠 ∈ ℕ0)
761, 3, 13, 75, 69gsummptfzsplit 18532 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (0...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 𝑋) · (𝐺𝑖))))))
77 elfznn0 12633 . . . . . . 7 (𝑖 ∈ (0...𝑠) → 𝑖 ∈ ℕ0)
7877, 30sylan2 580 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (0...𝑠)) → ((𝑖 𝑋) · (𝐺𝑖)) ∈ (Base‘𝑌))
791, 3, 13, 75, 78gsummptfzsplitl 18533 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ {0} ↦ ((𝑖 𝑋) · (𝐺𝑖))))))
80 0nn0 11507 . . . . . . . 8 0 ∈ ℕ0
8180a1i 11 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 0 ∈ ℕ0)
8220, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28chfacfscmulcl 20875 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 0 ∈ ℕ0) → ((0 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌))
8381, 82mpd3an3 1573 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((0 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌))
84 oveq1 6798 . . . . . . . . 9 (𝑖 = 0 → (𝑖 𝑋) = (0 𝑋))
85 fveq2 6330 . . . . . . . . 9 (𝑖 = 0 → (𝐺𝑖) = (𝐺‘0))
8684, 85oveq12d 6809 . . . . . . . 8 (𝑖 = 0 → ((𝑖 𝑋) · (𝐺𝑖)) = ((0 𝑋) · (𝐺‘0)))
871, 86gsumsn 18554 . . . . . . 7 ((𝑌 ∈ Mnd ∧ 0 ∈ ℕ0 ∧ ((0 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌)) → (𝑌 Σg (𝑖 ∈ {0} ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = ((0 𝑋) · (𝐺‘0)))
8865, 81, 83, 87syl3anc 1476 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ {0} ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = ((0 𝑋) · (𝐺‘0)))
8988oveq2d 6807 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ {0} ↦ ((𝑖 𝑋) · (𝐺𝑖))))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + ((0 𝑋) · (𝐺‘0))))
9079, 89eqtrd 2805 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + ((0 𝑋) · (𝐺‘0))))
91 ovexd 6823 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ V)
92 1nn0 11508 . . . . . . . 8 1 ∈ ℕ0
9392a1i 11 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 1 ∈ ℕ0)
9475, 93nn0addcld 11555 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ ℕ0)
9520, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28chfacfscmulcl 20875 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ (𝑠 + 1) ∈ ℕ0) → (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
9694, 95mpd3an3 1573 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
97 oveq1 6798 . . . . . . 7 (𝑖 = (𝑠 + 1) → (𝑖 𝑋) = ((𝑠 + 1) 𝑋))
98 fveq2 6330 . . . . . . 7 (𝑖 = (𝑠 + 1) → (𝐺𝑖) = (𝐺‘(𝑠 + 1)))
9997, 98oveq12d 6809 . . . . . 6 (𝑖 = (𝑠 + 1) → ((𝑖 𝑋) · (𝐺𝑖)) = (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))))
1001, 99gsumsn 18554 . . . . 5 ((𝑌 ∈ Mnd ∧ (𝑠 + 1) ∈ V ∧ (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (𝑌 Σg (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))))
10165, 91, 96, 100syl3anc 1476 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))))
10290, 101oveq12d 6809 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (0...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 𝑋) · (𝐺𝑖))))) = (((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + ((0 𝑋) · (𝐺‘0))) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1)))))
103 fzfid 12973 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (1...𝑠) ∈ Fin)
104 simpll 750 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵))
105 simplr 752 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))))
106 elfznn 12570 . . . . . . . . . 10 (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ)
107106nnnn0d 11551 . . . . . . . . 9 (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ0)
108107adantl 467 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → 𝑖 ∈ ℕ0)
109104, 105, 108, 29syl3anc 1476 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 𝑋) · (𝐺𝑖)) ∈ (Base‘𝑌))
110109ralrimiva 3115 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ∀𝑖 ∈ (1...𝑠)((𝑖 𝑋) · (𝐺𝑖)) ∈ (Base‘𝑌))
1111, 13, 103, 110gsummptcl 18566 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) ∈ (Base‘𝑌))
1121, 3mndass 17503 . . . . 5 ((𝑌 ∈ Mnd ∧ ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) ∈ (Base‘𝑌) ∧ ((0 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌) ∧ (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))) → (((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + ((0 𝑋) · (𝐺‘0))) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (((0 𝑋) · (𝐺‘0)) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))))))
11365, 111, 83, 96, 112syl13anc 1478 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + ((0 𝑋) · (𝐺‘0))) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (((0 𝑋) · (𝐺‘0)) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))))))
11425a1i 11 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))))))
115106nnne0d 11265 . . . . . . . . . . . . . 14 (𝑖 ∈ (1...𝑠) → 𝑖 ≠ 0)
116115ad2antlr 706 . . . . . . . . . . . . 13 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ 0)
117 neeq1 3005 . . . . . . . . . . . . . 14 (𝑛 = 𝑖 → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
118117adantl 467 . . . . . . . . . . . . 13 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
119116, 118mpbird 247 . . . . . . . . . . . 12 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ 0)
120 eqneqall 2954 . . . . . . . . . . . 12 (𝑛 = 0 → (𝑛 ≠ 0 → 0 = (𝑇‘(𝑏‘(𝑖 − 1)))))
121119, 120mpan9 496 . . . . . . . . . . 11 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = (𝑇‘(𝑏‘(𝑖 − 1))))
122 simplr 752 . . . . . . . . . . . . . . 15 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 𝑛 = 𝑖)
123 eqeq1 2775 . . . . . . . . . . . . . . . . 17 (0 = 𝑛 → (0 = 𝑖𝑛 = 𝑖))
124123eqcoms 2779 . . . . . . . . . . . . . . . 16 (𝑛 = 0 → (0 = 𝑖𝑛 = 𝑖))
125124adantl 467 . . . . . . . . . . . . . . 15 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (0 = 𝑖𝑛 = 𝑖))
126122, 125mpbird 247 . . . . . . . . . . . . . 14 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = 𝑖)
127126fveq2d 6334 . . . . . . . . . . . . 13 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑏‘0) = (𝑏𝑖))
128127fveq2d 6334 . . . . . . . . . . . 12 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑇‘(𝑏‘0)) = (𝑇‘(𝑏𝑖)))
129128oveq2d 6807 . . . . . . . . . . 11 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ((𝑇𝑀) × (𝑇‘(𝑏‘0))) = ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))
130121, 129oveq12d 6809 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
131 elfz2 12533 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...𝑠) ↔ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)))
132 zleltp1 11628 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℤ ∧ 𝑠 ∈ ℤ) → (𝑖𝑠𝑖 < (𝑠 + 1)))
133132ancoms 446 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖𝑠𝑖 < (𝑠 + 1)))
1341333adant1 1124 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖𝑠𝑖 < (𝑠 + 1)))
135134biimpcd 239 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖𝑠 → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
136135adantl 467 . . . . . . . . . . . . . . . . . . . . 21 ((1 ≤ 𝑖𝑖𝑠) → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
137136impcom 394 . . . . . . . . . . . . . . . . . . . 20 (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)) → 𝑖 < (𝑠 + 1))
138137orcd 862 . . . . . . . . . . . . . . . . . . 19 (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)) → (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖))
139 zre 11581 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑠 ∈ ℤ → 𝑠 ∈ ℝ)
140 1red 10255 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑠 ∈ ℤ → 1 ∈ ℝ)
141139, 140readdcld 10269 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑠 ∈ ℤ → (𝑠 + 1) ∈ ℝ)
142 zre 11581 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 ∈ ℤ → 𝑖 ∈ ℝ)
143141, 142anim12ci 601 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
1441433adant1 1124 . . . . . . . . . . . . . . . . . . . . 21 ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
145 lttri2 10320 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
146144, 145syl 17 . . . . . . . . . . . . . . . . . . . 20 ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
147146adantr 466 . . . . . . . . . . . . . . . . . . 19 (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
148138, 147mpbird 247 . . . . . . . . . . . . . . . . . 18 (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)) → 𝑖 ≠ (𝑠 + 1))
149131, 148sylbi 207 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝑠) → 𝑖 ≠ (𝑠 + 1))
150149ad2antlr 706 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ (𝑠 + 1))
151 neeq1 3005 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑖 → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
152151adantl 467 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
153150, 152mpbird 247 . . . . . . . . . . . . . . 15 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ (𝑠 + 1))
154153adantr 466 . . . . . . . . . . . . . 14 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → 𝑛 ≠ (𝑠 + 1))
155154neneqd 2948 . . . . . . . . . . . . 13 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → ¬ 𝑛 = (𝑠 + 1))
156155pm2.21d 119 . . . . . . . . . . . 12 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → (𝑛 = (𝑠 + 1) → (𝑇‘(𝑏𝑠)) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))
157156imp 393 . . . . . . . . . . 11 (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ 𝑛 = (𝑠 + 1)) → (𝑇‘(𝑏𝑠)) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
158106nnred 11235 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℝ)
159 eleq1w 2833 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑖 → (𝑛 ∈ ℝ ↔ 𝑖 ∈ ℝ))
160158, 159syl5ibrcom 237 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...𝑠) → (𝑛 = 𝑖𝑛 ∈ ℝ))
161160adantl 467 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑛 = 𝑖𝑛 ∈ ℝ))
162161imp 393 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ∈ ℝ)
16375nn0red 11552 . . . . . . . . . . . . . . . . . 18 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑠 ∈ ℝ)
164163ad2antrr 705 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑠 ∈ ℝ)
165 1red 10255 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 1 ∈ ℝ)
166164, 165readdcld 10269 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑠 + 1) ∈ ℝ)
167131, 137sylbi 207 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...𝑠) → 𝑖 < (𝑠 + 1))
168167ad2antlr 706 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 < (𝑠 + 1))
169 breq1 4789 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑖 → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
170169adantl 467 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
171168, 170mpbird 247 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 < (𝑠 + 1))
172162, 166, 171ltnsymd 10386 . . . . . . . . . . . . . . 15 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ¬ (𝑠 + 1) < 𝑛)
173172pm2.21d 119 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ((𝑠 + 1) < 𝑛0 = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))
174173ad2antrr 705 . . . . . . . . . . . . 13 (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → ((𝑠 + 1) < 𝑛0 = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))
175174imp 393 . . . . . . . . . . . 12 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ (𝑠 + 1) < 𝑛) → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
176 simp-4r 770 . . . . . . . . . . . . . . 15 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → 𝑛 = 𝑖)
177176fvoveq1d 6813 . . . . . . . . . . . . . 14 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏‘(𝑛 − 1)) = (𝑏‘(𝑖 − 1)))
178177fveq2d 6334 . . . . . . . . . . . . 13 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏‘(𝑛 − 1))) = (𝑇‘(𝑏‘(𝑖 − 1))))
179176fveq2d 6334 . . . . . . . . . . . . . . 15 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏𝑛) = (𝑏𝑖))
180179fveq2d 6334 . . . . . . . . . . . . . 14 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏𝑛)) = (𝑇‘(𝑏𝑖)))
181180oveq2d 6807 . . . . . . . . . . . . 13 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇𝑀) × (𝑇‘(𝑏𝑛))) = ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))
182178, 181oveq12d 6809 . . . . . . . . . . . 12 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
183175, 182ifeqda 4260 . . . . . . . . . . 11 (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
184157, 183ifeqda 4260 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
185130, 184ifeqda 4260 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
186 ovexd 6823 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))) ∈ V)
187114, 185, 108, 186fvmptd 6428 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝐺𝑖) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
188187oveq2d 6807 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 𝑋) · (𝐺𝑖)) = ((𝑖 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))
189188mpteq2dva 4878 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖))) = (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))))
190189oveq2d 6807 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = (𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))))
19125a1i 11 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))))))
192 nn0p1gt0 11522 . . . . . . . . . . . . . . 15 (𝑠 ∈ ℕ0 → 0 < (𝑠 + 1))
193 0red 10241 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℕ0 → 0 ∈ ℝ)
194 ltne 10334 . . . . . . . . . . . . . . . . 17 ((0 ∈ ℝ ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
195193, 194sylan 569 . . . . . . . . . . . . . . . 16 ((𝑠 ∈ ℕ0 ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
196 neeq1 3005 . . . . . . . . . . . . . . . 16 (𝑛 = (𝑠 + 1) → (𝑛 ≠ 0 ↔ (𝑠 + 1) ≠ 0))
197195, 196syl5ibrcom 237 . . . . . . . . . . . . . . 15 ((𝑠 ∈ ℕ0 ∧ 0 < (𝑠 + 1)) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
198192, 197mpdan 667 . . . . . . . . . . . . . 14 (𝑠 ∈ ℕ0 → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
19934, 198syl 17 . . . . . . . . . . . . 13 (𝑠 ∈ ℕ → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
200199ad2antrl 707 . . . . . . . . . . . 12 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
201200imp 393 . . . . . . . . . . 11 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) → 𝑛 ≠ 0)
202 eqneqall 2954 . . . . . . . . . . 11 (𝑛 = 0 → (𝑛 ≠ 0 → ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏𝑠))))
203201, 202mpan9 496 . . . . . . . . . 10 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ 𝑛 = 0) → ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏𝑠)))
204 iftrue 4231 . . . . . . . . . . 11 (𝑛 = (𝑠 + 1) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))) = (𝑇‘(𝑏𝑠)))
205204ad2antlr 706 . . . . . . . . . 10 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))) = (𝑇‘(𝑏𝑠)))
206203, 205ifeqda 4260 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = (𝑇‘(𝑏𝑠)))
20775, 35syl 17 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ ℕ0)
208 fvexd 6342 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑇‘(𝑏𝑠)) ∈ V)
209191, 206, 207, 208fvmptd 6428 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝐺‘(𝑠 + 1)) = (𝑇‘(𝑏𝑠)))
210209oveq2d 6807 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))) = (((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))))
21143ad2ant2 1128 . . . . . . . . . . . . 13 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑅 ∈ Ring)
212 eqid 2771 . . . . . . . . . . . . . 14 (Base‘𝑃) = (Base‘𝑃)
21326, 7, 212vr1cl 19795 . . . . . . . . . . . . 13 (𝑅 ∈ Ring → 𝑋 ∈ (Base‘𝑃))
214211, 213syl 17 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑋 ∈ (Base‘𝑃))
215 eqid 2771 . . . . . . . . . . . . . 14 (mulGrp‘𝑃) = (mulGrp‘𝑃)
216215, 212mgpbas 18696 . . . . . . . . . . . . 13 (Base‘𝑃) = (Base‘(mulGrp‘𝑃))
217 eqid 2771 . . . . . . . . . . . . . 14 (1r𝑃) = (1r𝑃)
218215, 217ringidval 18704 . . . . . . . . . . . . 13 (1r𝑃) = (0g‘(mulGrp‘𝑃))
219216, 218, 28mulg0 17747 . . . . . . . . . . . 12 (𝑋 ∈ (Base‘𝑃) → (0 𝑋) = (1r𝑃))
220214, 219syl 17 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (0 𝑋) = (1r𝑃))
2217ply1crng 19776 . . . . . . . . . . . . . . 15 (𝑅 ∈ CRing → 𝑃 ∈ CRing)
222221anim2i 603 . . . . . . . . . . . . . 14 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
2232223adant3 1126 . . . . . . . . . . . . 13 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
2248matsca2 20436 . . . . . . . . . . . . 13 ((𝑁 ∈ Fin ∧ 𝑃 ∈ CRing) → 𝑃 = (Scalar‘𝑌))
225223, 224syl 17 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑃 = (Scalar‘𝑌))
226225fveq2d 6334 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (1r𝑃) = (1r‘(Scalar‘𝑌)))
227220, 226eqtrd 2805 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (0 𝑋) = (1r‘(Scalar‘𝑌)))
228227adantr 466 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (0 𝑋) = (1r‘(Scalar‘𝑌)))
229228oveq1d 6806 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((0 𝑋) · (𝐺‘0)) = ((1r‘(Scalar‘𝑌)) · (𝐺‘0)))
2307, 8pmatlmod 20712 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ LMod)
2314, 230sylan2 580 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ LMod)
2322313adant3 1126 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ LMod)
233232adantr 466 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ LMod)
23420, 21, 7, 8, 22, 23, 2, 24, 25chfacfisf 20872 . . . . . . . . . . 11 (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝐺:ℕ0⟶(Base‘𝑌))
2354, 234syl3anl2 1521 . . . . . . . . . 10 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝐺:ℕ0⟶(Base‘𝑌))
236235, 81ffvelrnd 6501 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝐺‘0) ∈ (Base‘𝑌))
237 eqid 2771 . . . . . . . . . 10 (Scalar‘𝑌) = (Scalar‘𝑌)
238 eqid 2771 . . . . . . . . . 10 (1r‘(Scalar‘𝑌)) = (1r‘(Scalar‘𝑌))
2391, 237, 27, 238lmodvs1 19094 . . . . . . . . 9 ((𝑌 ∈ LMod ∧ (𝐺‘0) ∈ (Base‘𝑌)) → ((1r‘(Scalar‘𝑌)) · (𝐺‘0)) = (𝐺‘0))
240233, 236, 239syl2anc 573 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((1r‘(Scalar‘𝑌)) · (𝐺‘0)) = (𝐺‘0))
241 iftrue 4231 . . . . . . . . . 10 (𝑛 = 0 → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
242241adantl 467 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = 0) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
243 ovexd 6823 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) ∈ V)
244191, 242, 81, 243fvmptd 6428 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝐺‘0) = ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
245229, 240, 2443eqtrd 2809 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((0 𝑋) · (𝐺‘0)) = ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
246210, 245oveq12d 6809 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 𝑋) · (𝐺‘0))) = ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) + ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
2471, 3cmncom 18409 . . . . . . 7 ((𝑌 ∈ CMnd ∧ ((0 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌) ∧ (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (((0 𝑋) · (𝐺‘0)) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 𝑋) · (𝐺‘0))))
24813, 83, 96, 247syl3anc 1476 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((0 𝑋) · (𝐺‘0)) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 𝑋) · (𝐺‘0))))
249 ringgrp 18753 . . . . . . . . 9 (𝑌 ∈ Ring → 𝑌 ∈ Grp)
25010, 249syl 17 . . . . . . . 8 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ Grp)
251250adantr 466 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ Grp)
252210, 96eqeltrrd 2851 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ∈ (Base‘𝑌))
25310adantr 466 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ Ring)
25424, 20, 21, 7, 8mat2pmatbas 20744 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀𝐵) → (𝑇𝑀) ∈ (Base‘𝑌))
2554, 254syl3an2 1167 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑇𝑀) ∈ (Base‘𝑌))
256255adantr 466 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑇𝑀) ∈ (Base‘𝑌))
257 simpl1 1227 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑁 ∈ Fin)
258211adantr 466 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑅 ∈ Ring)
259 elmapi 8029 . . . . . . . . . . . 12 (𝑏 ∈ (𝐵𝑚 (0...𝑠)) → 𝑏:(0...𝑠)⟶𝐵)
260259adantl 467 . . . . . . . . . . 11 ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑏:(0...𝑠)⟶𝐵)
261260adantl 467 . . . . . . . . . 10 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑏:(0...𝑠)⟶𝐵)
262 0elfz 12637 . . . . . . . . . . . 12 (𝑠 ∈ ℕ0 → 0 ∈ (0...𝑠))
26334, 262syl 17 . . . . . . . . . . 11 (𝑠 ∈ ℕ → 0 ∈ (0...𝑠))
264263ad2antrl 707 . . . . . . . . . 10 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 0 ∈ (0...𝑠))
265261, 264ffvelrnd 6501 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑏‘0) ∈ 𝐵)
26624, 20, 21, 7, 8mat2pmatbas 20744 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘0) ∈ 𝐵) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
267257, 258, 265, 266syl3anc 1476 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
2681, 22ringcl 18762 . . . . . . . 8 ((𝑌 ∈ Ring ∧ (𝑇𝑀) ∈ (Base‘𝑌) ∧ (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌)) → ((𝑇𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
269253, 256, 267, 268syl3anc 1476 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑇𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
2701, 2, 23, 3grpsubadd0sub 17703 . . . . . . 7 ((𝑌 ∈ Grp ∧ (((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ∈ (Base‘𝑌) ∧ ((𝑇𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌)) → ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) + ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
271251, 252, 269, 270syl3anc 1476 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) + ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
272246, 248, 2713eqtr4d 2815 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((0 𝑋) · (𝐺‘0)) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
273190, 272oveq12d 6809 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + (((0 𝑋) · (𝐺‘0)) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1))))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))) + ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
274113, 273eqtrd 2805 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) + ((0 𝑋) · (𝐺‘0))) + (((𝑠 + 1) 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))) + ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
27576, 102, 2743eqtrd 2809 . 2 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))) + ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
27640, 74, 2753eqtrd 2809 1 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ ℕ0 ↦ ((𝑖 𝑋) · (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))) + ((((𝑠 + 1) 𝑋) · (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 196  wa 382  wo 836  w3a 1071   = wceq 1631  wcel 2145  wne 2943  Vcvv 3351  cun 3721  cin 3722  c0 4063  ifcif 4225  {csn 4316   class class class wbr 4786  cmpt 4863  wf 6025  cfv 6029  (class class class)co 6791  𝑚 cmap 8007  Fincfn 8107  cc 10134  cr 10135  0cc0 10136  1c1 10137   + caddc 10139   < clt 10274  cle 10275  cmin 10466  cn 11220  2c2 11270  0cn0 11492  cz 11577  cuz 11886  ...cfz 12526  Basecbs 16057  +gcplusg 16142  .rcmulr 16143  Scalarcsca 16145   ·𝑠 cvsca 16146  0gc0g 16301   Σg cgsu 16302  Mndcmnd 17495  Grpcgrp 17623  -gcsg 17625  .gcmg 17741  CMndccmn 18393  mulGrpcmgp 18690  1rcur 18702  Ringcrg 18748  CRingccrg 18749  LModclmod 19066  var1cv1 19754  Poly1cpl1 19755   Mat cmat 20423   matToPolyMat cmat2pmat 20722
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1870  ax-4 1885  ax-5 1991  ax-6 2057  ax-7 2093  ax-8 2147  ax-9 2154  ax-10 2174  ax-11 2190  ax-12 2203  ax-13 2408  ax-ext 2751  ax-rep 4904  ax-sep 4915  ax-nul 4923  ax-pow 4974  ax-pr 5034  ax-un 7094  ax-inf2 8700  ax-cnex 10192  ax-resscn 10193  ax-1cn 10194  ax-icn 10195  ax-addcl 10196  ax-addrcl 10197  ax-mulcl 10198  ax-mulrcl 10199  ax-mulcom 10200  ax-addass 10201  ax-mulass 10202  ax-distr 10203  ax-i2m1 10204  ax-1ne0 10205  ax-1rid 10206  ax-rnegex 10207  ax-rrecex 10208  ax-cnre 10209  ax-pre-lttri 10210  ax-pre-lttrn 10211  ax-pre-ltadd 10212  ax-pre-mulgt0 10213
This theorem depends on definitions:  df-bi 197  df-an 383  df-or 837  df-3or 1072  df-3an 1073  df-tru 1634  df-fal 1637  df-ex 1853  df-nf 1858  df-sb 2050  df-eu 2622  df-mo 2623  df-clab 2758  df-cleq 2764  df-clel 2767  df-nfc 2902  df-ne 2944  df-nel 3047  df-ral 3066  df-rex 3067  df-reu 3068  df-rmo 3069  df-rab 3070  df-v 3353  df-sbc 3588  df-csb 3683  df-dif 3726  df-un 3728  df-in 3730  df-ss 3737  df-pss 3739  df-nul 4064  df-if 4226  df-pw 4299  df-sn 4317  df-pr 4319  df-tp 4321  df-op 4323  df-ot 4325  df-uni 4575  df-int 4612  df-iun 4656  df-iin 4657  df-br 4787  df-opab 4847  df-mpt 4864  df-tr 4887  df-id 5157  df-eprel 5162  df-po 5170  df-so 5171  df-fr 5208  df-se 5209  df-we 5210  df-xp 5255  df-rel 5256  df-cnv 5257  df-co 5258  df-dm 5259  df-rn 5260  df-res 5261  df-ima 5262  df-pred 5821  df-ord 5867  df-on 5868  df-lim 5869  df-suc 5870  df-iota 5992  df-fun 6031  df-fn 6032  df-f 6033  df-f1 6034  df-fo 6035  df-f1o 6036  df-fv 6037  df-isom 6038  df-riota 6752  df-ov 6794  df-oprab 6795  df-mpt2 6796  df-of 7042  df-ofr 7043  df-om 7211  df-1st 7313  df-2nd 7314  df-supp 7445  df-wrecs 7557  df-recs 7619  df-rdg 7657  df-1o 7711  df-2o 7712  df-oadd 7715  df-er 7894  df-map 8009  df-pm 8010  df-ixp 8061  df-en 8108  df-dom 8109  df-sdom 8110  df-fin 8111  df-fsupp 8430  df-sup 8502  df-oi 8569  df-card 8963  df-pnf 10276  df-mnf 10277  df-xr 10278  df-ltxr 10279  df-le 10280  df-sub 10468  df-neg 10469  df-nn 11221  df-2 11279  df-3 11280  df-4 11281  df-5 11282  df-6 11283  df-7 11284  df-8 11285  df-9 11286  df-n0 11493  df-z 11578  df-dec 11694  df-uz 11887  df-rp 12029  df-fz 12527  df-fzo 12667  df-seq 13002  df-hash 13315  df-struct 16059  df-ndx 16060  df-slot 16061  df-base 16063  df-sets 16064  df-ress 16065  df-plusg 16155  df-mulr 16156  df-sca 16158  df-vsca 16159  df-ip 16160  df-tset 16161  df-ple 16162  df-ds 16165  df-hom 16167  df-cco 16168  df-0g 16303  df-gsum 16304  df-prds 16309  df-pws 16311  df-mre 16447  df-mrc 16448  df-acs 16450  df-mgm 17443  df-sgrp 17485  df-mnd 17496  df-mhm 17536  df-submnd 17537  df-grp 17626  df-minusg 17627  df-sbg 17628  df-mulg 17742  df-subg 17792  df-ghm 17859  df-cntz 17950  df-cmn 18395  df-abl 18396  df-mgp 18691  df-ur 18703  df-ring 18750  df-cring 18751  df-subrg 18981  df-lmod 19068  df-lss 19136  df-sra 19380  df-rgmod 19381  df-ascl 19522  df-psr 19564  df-mvr 19565  df-mpl 19566  df-opsr 19568  df-psr1 19758  df-vr1 19759  df-ply1 19760  df-dsmm 20286  df-frlm 20301  df-mamu 20400  df-mat 20424  df-mat2pmat 20725
This theorem is referenced by:  cpmadugsum  20896
  Copyright terms: Public domain W3C validator