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

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

Proof of Theorem chfacfpmmulgsum
StepHypRef Expression
1 eqid 2620 . . 3 (Base‘𝑌) = (Base‘𝑌)
2 cayhamlem1.0 . . 3 0 = (0g𝑌)
3 chfacfpmmulgsum.p . . 3 + = (+g𝑌)
4 crngring 18539 . . . . . . . 8 (𝑅 ∈ CRing → 𝑅 ∈ Ring)
54anim2i 592 . . . . . . 7 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
653adant3 1079 . . . . . 6 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
7 cayhamlem1.p . . . . . . 7 𝑃 = (Poly1𝑅)
8 cayhamlem1.y . . . . . . 7 𝑌 = (𝑁 Mat 𝑃)
97, 8pmatring 20479 . . . . . 6 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ Ring)
106, 9syl 17 . . . . 5 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ Ring)
11 ringcmn 18562 . . . . 5 (𝑌 ∈ Ring → 𝑌 ∈ CMnd)
1210, 11syl 17 . . . 4 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ CMnd)
1312adantr 481 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ CMnd)
14 nn0ex 11283 . . . 4 0 ∈ V
1514a1i 11 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ℕ0 ∈ V)
16 simpll 789 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵))
17 simplr 791 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))))
18 simpr 477 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → 𝑖 ∈ ℕ0)
1916, 17, 183jca 1240 . . . 4 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑖 ∈ ℕ0))
20 cayhamlem1.a . . . . 5 𝐴 = (𝑁 Mat 𝑅)
21 cayhamlem1.b . . . . 5 𝐵 = (Base‘𝐴)
22 cayhamlem1.r . . . . 5 × = (.r𝑌)
23 cayhamlem1.s . . . . 5 = (-g𝑌)
24 cayhamlem1.t . . . . 5 𝑇 = (𝑁 matToPolyMat 𝑅)
25 cayhamlem1.g . . . . 5 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))))
26 cayhamlem1.e . . . . 5 = (.g‘(mulGrp‘𝑌))
2720, 21, 7, 8, 22, 23, 2, 24, 25, 26chfacfpmmulcl 20647 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑖 ∈ ℕ0) → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) ∈ (Base‘𝑌))
2819, 27syl 17 . . 3 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ0) → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) ∈ (Base‘𝑌))
2920, 21, 7, 8, 22, 23, 2, 24, 25, 26chfacfpmmulfsupp 20649 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑖 ∈ ℕ0 ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))) finSupp 0 )
30 nn0disj 12439 . . . 4 ((0...(𝑠 + 1)) ∩ (ℤ‘((𝑠 + 1) + 1))) = ∅
3130a1i 11 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((0...(𝑠 + 1)) ∩ (ℤ‘((𝑠 + 1) + 1))) = ∅)
32 nnnn0 11284 . . . . . 6 (𝑠 ∈ ℕ → 𝑠 ∈ ℕ0)
33 peano2nn0 11318 . . . . . 6 (𝑠 ∈ ℕ0 → (𝑠 + 1) ∈ ℕ0)
3432, 33syl 17 . . . . 5 (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℕ0)
35 nn0split 12438 . . . . 5 ((𝑠 + 1) ∈ ℕ0 → ℕ0 = ((0...(𝑠 + 1)) ∪ (ℤ‘((𝑠 + 1) + 1))))
3634, 35syl 17 . . . 4 (𝑠 ∈ ℕ → ℕ0 = ((0...(𝑠 + 1)) ∪ (ℤ‘((𝑠 + 1) + 1))))
3736ad2antrl 763 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ℕ0 = ((0...(𝑠 + 1)) ∪ (ℤ‘((𝑠 + 1) + 1))))
381, 2, 3, 13, 15, 28, 29, 31, 37gsumsplit2 18310 . 2 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ ℕ0 ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))))))
39 simpll 789 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ‘((𝑠 + 1) + 1))) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵))
40 simplr 791 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ‘((𝑠 + 1) + 1))) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))))
41 nncn 11013 . . . . . . . . . . . . 13 (𝑠 ∈ ℕ → 𝑠 ∈ ℂ)
42 add1p1 11268 . . . . . . . . . . . . 13 (𝑠 ∈ ℂ → ((𝑠 + 1) + 1) = (𝑠 + 2))
4341, 42syl 17 . . . . . . . . . . . 12 (𝑠 ∈ ℕ → ((𝑠 + 1) + 1) = (𝑠 + 2))
4443ad2antrl 763 . . . . . . . . . . 11 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑠 + 1) + 1) = (𝑠 + 2))
4544fveq2d 6182 . . . . . . . . . 10 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (ℤ‘((𝑠 + 1) + 1)) = (ℤ‘(𝑠 + 2)))
4645eleq2d 2685 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↔ 𝑖 ∈ (ℤ‘(𝑠 + 2))))
4746biimpa 501 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ‘((𝑠 + 1) + 1))) → 𝑖 ∈ (ℤ‘(𝑠 + 2)))
4820, 21, 7, 8, 22, 23, 2, 24, 25, 26chfacfpmmul0 20648 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑖 ∈ (ℤ‘(𝑠 + 2))) → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) = 0 )
4939, 40, 47, 48syl3anc 1324 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ‘((𝑠 + 1) + 1))) → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) = 0 )
5049mpteq2dva 4735 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))) = (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ 0 ))
5150oveq2d 6651 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ 0 )))
524, 9sylan2 491 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Ring)
53 ringmnd 18537 . . . . . . . . . 10 (𝑌 ∈ Ring → 𝑌 ∈ Mnd)
5452, 53syl 17 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Mnd)
55543adant3 1079 . . . . . . . 8 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ Mnd)
56 fvex 6188 . . . . . . . 8 (ℤ‘((𝑠 + 1) + 1)) ∈ V
5755, 56jctir 560 . . . . . . 7 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑌 ∈ Mnd ∧ (ℤ‘((𝑠 + 1) + 1)) ∈ V))
5857adantr 481 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 ∈ Mnd ∧ (ℤ‘((𝑠 + 1) + 1)) ∈ V))
592gsumz 17355 . . . . . 6 ((𝑌 ∈ Mnd ∧ (ℤ‘((𝑠 + 1) + 1)) ∈ V) → (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ 0 )) = 0 )
6058, 59syl 17 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ 0 )) = 0 )
6151, 60eqtrd 2654 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = 0 )
6261oveq2d 6651 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))))) = ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + 0 ))
6355adantr 481 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ Mnd)
64 fzfid 12755 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (0...(𝑠 + 1)) ∈ Fin)
65 elfznn0 12417 . . . . . . . 8 (𝑖 ∈ (0...(𝑠 + 1)) → 𝑖 ∈ ℕ0)
6665, 19sylan2 491 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (0...(𝑠 + 1))) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑖 ∈ ℕ0))
6766, 27syl 17 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (0...(𝑠 + 1))) → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) ∈ (Base‘𝑌))
6867ralrimiva 2963 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ∀𝑖 ∈ (0...(𝑠 + 1))((𝑖 (𝑇𝑀)) × (𝐺𝑖)) ∈ (Base‘𝑌))
691, 13, 64, 68gsummptcl 18347 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) ∈ (Base‘𝑌))
701, 3, 2mndrid 17293 . . . 4 ((𝑌 ∈ Mnd ∧ (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) ∈ (Base‘𝑌)) → ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + 0 ) = (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))))
7163, 69, 70syl2anc 692 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + 0 ) = (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))))
7262, 71eqtrd 2654 . 2 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ (ℤ‘((𝑠 + 1) + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))))) = (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))))
7332ad2antrl 763 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑠 ∈ ℕ0)
741, 3, 13, 73, 67gsummptfzsplit 18313 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (0...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))))))
75 elfznn0 12417 . . . . . . 7 (𝑖 ∈ (0...𝑠) → 𝑖 ∈ ℕ0)
7675, 28sylan2 491 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (0...𝑠)) → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) ∈ (Base‘𝑌))
771, 3, 13, 73, 76gsummptfzsplitl 18314 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ {0} ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))))))
78 0nn0 11292 . . . . . . . 8 0 ∈ ℕ0
7978a1i 11 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 0 ∈ ℕ0)
8020, 21, 7, 8, 22, 23, 2, 24, 25, 26chfacfpmmulcl 20647 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 0 ∈ ℕ0) → ((0 (𝑇𝑀)) × (𝐺‘0)) ∈ (Base‘𝑌))
8179, 80mpd3an3 1423 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((0 (𝑇𝑀)) × (𝐺‘0)) ∈ (Base‘𝑌))
82 oveq1 6642 . . . . . . . . 9 (𝑖 = 0 → (𝑖 (𝑇𝑀)) = (0 (𝑇𝑀)))
83 fveq2 6178 . . . . . . . . 9 (𝑖 = 0 → (𝐺𝑖) = (𝐺‘0))
8482, 83oveq12d 6653 . . . . . . . 8 (𝑖 = 0 → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) = ((0 (𝑇𝑀)) × (𝐺‘0)))
851, 84gsumsn 18335 . . . . . . 7 ((𝑌 ∈ Mnd ∧ 0 ∈ ℕ0 ∧ ((0 (𝑇𝑀)) × (𝐺‘0)) ∈ (Base‘𝑌)) → (𝑌 Σg (𝑖 ∈ {0} ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = ((0 (𝑇𝑀)) × (𝐺‘0)))
8663, 79, 81, 85syl3anc 1324 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ {0} ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = ((0 (𝑇𝑀)) × (𝐺‘0)))
8786oveq2d 6651 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ {0} ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + ((0 (𝑇𝑀)) × (𝐺‘0))))
8877, 87eqtrd 2654 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + ((0 (𝑇𝑀)) × (𝐺‘0))))
89 ovexd 6665 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ V)
90 1nn0 11293 . . . . . . . 8 1 ∈ ℕ0
9190a1i 11 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 1 ∈ ℕ0)
9273, 91nn0addcld 11340 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ ℕ0)
9320, 21, 7, 8, 22, 23, 2, 24, 25, 26chfacfpmmulcl 20647 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ (𝑠 + 1) ∈ ℕ0) → (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
9492, 93mpd3an3 1423 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
95 oveq1 6642 . . . . . . 7 (𝑖 = (𝑠 + 1) → (𝑖 (𝑇𝑀)) = ((𝑠 + 1) (𝑇𝑀)))
96 fveq2 6178 . . . . . . 7 (𝑖 = (𝑠 + 1) → (𝐺𝑖) = (𝐺‘(𝑠 + 1)))
9795, 96oveq12d 6653 . . . . . 6 (𝑖 = (𝑠 + 1) → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) = (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))))
981, 97gsumsn 18335 . . . . 5 ((𝑌 ∈ Mnd ∧ (𝑠 + 1) ∈ V ∧ (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (𝑌 Σg (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))))
9963, 89, 94, 98syl3anc 1324 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))))
10088, 99oveq12d 6653 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (0...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (𝑌 Σg (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))))) = (((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + ((0 (𝑇𝑀)) × (𝐺‘0))) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1)))))
101 fzfid 12755 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (1...𝑠) ∈ Fin)
102 simpll 789 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵))
103 simplr 791 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))))
104 elfznn 12355 . . . . . . . . . 10 (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ)
105104nnnn0d 11336 . . . . . . . . 9 (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ0)
106105adantl 482 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → 𝑖 ∈ ℕ0)
107102, 103, 106, 27syl3anc 1324 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) ∈ (Base‘𝑌))
108107ralrimiva 2963 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ∀𝑖 ∈ (1...𝑠)((𝑖 (𝑇𝑀)) × (𝐺𝑖)) ∈ (Base‘𝑌))
1091, 13, 101, 108gsummptcl 18347 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) ∈ (Base‘𝑌))
1101, 3mndass 17283 . . . . 5 ((𝑌 ∈ Mnd ∧ ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) ∈ (Base‘𝑌) ∧ ((0 (𝑇𝑀)) × (𝐺‘0)) ∈ (Base‘𝑌) ∧ (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))) → (((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + ((0 (𝑇𝑀)) × (𝐺‘0))) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (((0 (𝑇𝑀)) × (𝐺‘0)) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))))))
11163, 109, 81, 94, 110syl13anc 1326 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + ((0 (𝑇𝑀)) × (𝐺‘0))) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (((0 (𝑇𝑀)) × (𝐺‘0)) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))))))
11225a1i 11 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))))))
113104nnne0d 11050 . . . . . . . . . . . . . 14 (𝑖 ∈ (1...𝑠) → 𝑖 ≠ 0)
114113ad2antlr 762 . . . . . . . . . . . . 13 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ 0)
115 neeq1 2853 . . . . . . . . . . . . . 14 (𝑛 = 𝑖 → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
116115adantl 482 . . . . . . . . . . . . 13 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
117114, 116mpbird 247 . . . . . . . . . . . 12 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ 0)
118 eqneqall 2802 . . . . . . . . . . . 12 (𝑛 = 0 → (𝑛 ≠ 0 → 0 = (𝑇‘(𝑏‘(𝑖 − 1)))))
119117, 118mpan9 486 . . . . . . . . . . 11 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = (𝑇‘(𝑏‘(𝑖 − 1))))
120 simplr 791 . . . . . . . . . . . . . . 15 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 𝑛 = 𝑖)
121 eqeq1 2624 . . . . . . . . . . . . . . . . 17 (0 = 𝑛 → (0 = 𝑖𝑛 = 𝑖))
122121eqcoms 2628 . . . . . . . . . . . . . . . 16 (𝑛 = 0 → (0 = 𝑖𝑛 = 𝑖))
123122adantl 482 . . . . . . . . . . . . . . 15 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (0 = 𝑖𝑛 = 𝑖))
124120, 123mpbird 247 . . . . . . . . . . . . . 14 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = 𝑖)
125124fveq2d 6182 . . . . . . . . . . . . 13 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑏‘0) = (𝑏𝑖))
126125fveq2d 6182 . . . . . . . . . . . 12 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑇‘(𝑏‘0)) = (𝑇‘(𝑏𝑖)))
127126oveq2d 6651 . . . . . . . . . . 11 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ((𝑇𝑀) × (𝑇‘(𝑏‘0))) = ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))
128119, 127oveq12d 6653 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
129 elfz2 12318 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...𝑠) ↔ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)))
130 zleltp1 11413 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑖 ∈ ℤ ∧ 𝑠 ∈ ℤ) → (𝑖𝑠𝑖 < (𝑠 + 1)))
131130ancoms 469 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖𝑠𝑖 < (𝑠 + 1)))
1321313adant1 1077 . . . . . . . . . . . . . . . . . . . . . . 23 ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖𝑠𝑖 < (𝑠 + 1)))
133132biimpcd 239 . . . . . . . . . . . . . . . . . . . . . 22 (𝑖𝑠 → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
134133adantl 482 . . . . . . . . . . . . . . . . . . . . 21 ((1 ≤ 𝑖𝑖𝑠) → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
135134impcom 446 . . . . . . . . . . . . . . . . . . . 20 (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)) → 𝑖 < (𝑠 + 1))
136135orcd 407 . . . . . . . . . . . . . . . . . . 19 (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)) → (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖))
137 zre 11366 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑠 ∈ ℤ → 𝑠 ∈ ℝ)
138 1red 10040 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑠 ∈ ℤ → 1 ∈ ℝ)
139137, 138readdcld 10054 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑠 ∈ ℤ → (𝑠 + 1) ∈ ℝ)
140 zre 11366 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑖 ∈ ℤ → 𝑖 ∈ ℝ)
141139, 140anim12ci 590 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
1421413adant1 1077 . . . . . . . . . . . . . . . . . . . . 21 ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
143 lttri2 10105 . . . . . . . . . . . . . . . . . . . . 21 ((𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
144142, 143syl 17 . . . . . . . . . . . . . . . . . . . 20 ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
145144adantr 481 . . . . . . . . . . . . . . . . . . 19 (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
146136, 145mpbird 247 . . . . . . . . . . . . . . . . . 18 (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖𝑖𝑠)) → 𝑖 ≠ (𝑠 + 1))
147129, 146sylbi 207 . . . . . . . . . . . . . . . . 17 (𝑖 ∈ (1...𝑠) → 𝑖 ≠ (𝑠 + 1))
148147ad2antlr 762 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ (𝑠 + 1))
149 neeq1 2853 . . . . . . . . . . . . . . . . 17 (𝑛 = 𝑖 → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
150149adantl 482 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
151148, 150mpbird 247 . . . . . . . . . . . . . . 15 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ (𝑠 + 1))
152151adantr 481 . . . . . . . . . . . . . 14 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → 𝑛 ≠ (𝑠 + 1))
153152neneqd 2796 . . . . . . . . . . . . 13 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → ¬ 𝑛 = (𝑠 + 1))
154153pm2.21d 118 . . . . . . . . . . . 12 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → (𝑛 = (𝑠 + 1) → (𝑇‘(𝑏𝑠)) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))
155154imp 445 . . . . . . . . . . 11 (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ 𝑛 = (𝑠 + 1)) → (𝑇‘(𝑏𝑠)) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
156104nnred 11020 . . . . . . . . . . . . . . . . . . 19 (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℝ)
157 eleq1 2687 . . . . . . . . . . . . . . . . . . 19 (𝑛 = 𝑖 → (𝑛 ∈ ℝ ↔ 𝑖 ∈ ℝ))
158156, 157syl5ibrcom 237 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...𝑠) → (𝑛 = 𝑖𝑛 ∈ ℝ))
159158adantl 482 . . . . . . . . . . . . . . . . 17 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑛 = 𝑖𝑛 ∈ ℝ))
160159imp 445 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ∈ ℝ)
16173nn0red 11337 . . . . . . . . . . . . . . . . . 18 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑠 ∈ ℝ)
162161ad2antrr 761 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑠 ∈ ℝ)
163 1red 10040 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 1 ∈ ℝ)
164162, 163readdcld 10054 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑠 + 1) ∈ ℝ)
165129, 135sylbi 207 . . . . . . . . . . . . . . . . . 18 (𝑖 ∈ (1...𝑠) → 𝑖 < (𝑠 + 1))
166165ad2antlr 762 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 < (𝑠 + 1))
167 breq1 4647 . . . . . . . . . . . . . . . . . 18 (𝑛 = 𝑖 → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
168167adantl 482 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
169166, 168mpbird 247 . . . . . . . . . . . . . . . 16 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 < (𝑠 + 1))
170160, 164, 169ltnsymd 10171 . . . . . . . . . . . . . . 15 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ¬ (𝑠 + 1) < 𝑛)
171170pm2.21d 118 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ((𝑠 + 1) < 𝑛0 = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))
172171ad2antrr 761 . . . . . . . . . . . . 13 (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → ((𝑠 + 1) < 𝑛0 = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))
173172imp 445 . . . . . . . . . . . 12 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ (𝑠 + 1) < 𝑛) → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
174 simp-4r 806 . . . . . . . . . . . . . . . 16 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → 𝑛 = 𝑖)
175174oveq1d 6650 . . . . . . . . . . . . . . 15 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑛 − 1) = (𝑖 − 1))
176175fveq2d 6182 . . . . . . . . . . . . . 14 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏‘(𝑛 − 1)) = (𝑏‘(𝑖 − 1)))
177176fveq2d 6182 . . . . . . . . . . . . 13 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏‘(𝑛 − 1))) = (𝑇‘(𝑏‘(𝑖 − 1))))
178174fveq2d 6182 . . . . . . . . . . . . . . 15 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏𝑛) = (𝑏𝑖))
179178fveq2d 6182 . . . . . . . . . . . . . 14 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏𝑛)) = (𝑇‘(𝑏𝑖)))
180179oveq2d 6651 . . . . . . . . . . . . 13 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇𝑀) × (𝑇‘(𝑏𝑛))) = ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))
181177, 180oveq12d 6653 . . . . . . . . . . . 12 ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
182173, 181ifeqda 4112 . . . . . . . . . . 11 (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
183155, 182ifeqda 4112 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
184128, 183ifeqda 4112 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
185 ovexd 6665 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))) ∈ V)
186112, 184, 106, 185fvmptd 6275 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝐺𝑖) = ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))
187186oveq2d 6651 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 (𝑇𝑀)) × (𝐺𝑖)) = ((𝑖 (𝑇𝑀)) × ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))
188187mpteq2dva 4735 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖))) = (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖)))))))
189188oveq2d 6651 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = (𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))))
19025a1i 11 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))))))
191 nn0p1gt0 11307 . . . . . . . . . . . . . . 15 (𝑠 ∈ ℕ0 → 0 < (𝑠 + 1))
192 0red 10026 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℕ0 → 0 ∈ ℝ)
193 ltne 10119 . . . . . . . . . . . . . . . . 17 ((0 ∈ ℝ ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
194192, 193sylan 488 . . . . . . . . . . . . . . . 16 ((𝑠 ∈ ℕ0 ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
195 neeq1 2853 . . . . . . . . . . . . . . . 16 (𝑛 = (𝑠 + 1) → (𝑛 ≠ 0 ↔ (𝑠 + 1) ≠ 0))
196194, 195syl5ibrcom 237 . . . . . . . . . . . . . . 15 ((𝑠 ∈ ℕ0 ∧ 0 < (𝑠 + 1)) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
197191, 196mpdan 701 . . . . . . . . . . . . . 14 (𝑠 ∈ ℕ0 → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
19832, 197syl 17 . . . . . . . . . . . . 13 (𝑠 ∈ ℕ → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
199198ad2antrl 763 . . . . . . . . . . . 12 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
200199imp 445 . . . . . . . . . . 11 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) → 𝑛 ≠ 0)
201 eqneqall 2802 . . . . . . . . . . 11 (𝑛 = 0 → (𝑛 ≠ 0 → ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏𝑠))))
202200, 201mpan9 486 . . . . . . . . . 10 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ 𝑛 = 0) → ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏𝑠)))
203 iftrue 4083 . . . . . . . . . . 11 (𝑛 = (𝑠 + 1) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))) = (𝑇‘(𝑏𝑠)))
204203ad2antlr 762 . . . . . . . . . 10 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))) = (𝑇‘(𝑏𝑠)))
205202, 204ifeqda 4112 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = (𝑇‘(𝑏𝑠)))
20673, 33syl 17 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ ℕ0)
207 fvexd 6190 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑇‘(𝑏𝑠)) ∈ V)
208190, 205, 206, 207fvmptd 6275 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝐺‘(𝑠 + 1)) = (𝑇‘(𝑏𝑠)))
209208oveq2d 6651 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))) = (((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))))
21024, 20, 21, 7, 8mat2pmatbas 20512 . . . . . . . . . . . . 13 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀𝐵) → (𝑇𝑀) ∈ (Base‘𝑌))
2114, 210syl3an2 1358 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑇𝑀) ∈ (Base‘𝑌))
212 eqid 2620 . . . . . . . . . . . . . 14 (mulGrp‘𝑌) = (mulGrp‘𝑌)
213212, 1mgpbas 18476 . . . . . . . . . . . . 13 (Base‘𝑌) = (Base‘(mulGrp‘𝑌))
214 eqid 2620 . . . . . . . . . . . . 13 (0g‘(mulGrp‘𝑌)) = (0g‘(mulGrp‘𝑌))
215213, 214, 26mulg0 17527 . . . . . . . . . . . 12 ((𝑇𝑀) ∈ (Base‘𝑌) → (0 (𝑇𝑀)) = (0g‘(mulGrp‘𝑌)))
216211, 215syl 17 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (0 (𝑇𝑀)) = (0g‘(mulGrp‘𝑌)))
217 eqid 2620 . . . . . . . . . . . 12 (1r𝑌) = (1r𝑌)
218212, 217ringidval 18484 . . . . . . . . . . 11 (1r𝑌) = (0g‘(mulGrp‘𝑌))
219216, 218syl6eqr 2672 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (0 (𝑇𝑀)) = (1r𝑌))
220219adantr 481 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (0 (𝑇𝑀)) = (1r𝑌))
221220oveq1d 6650 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((0 (𝑇𝑀)) × (𝐺‘0)) = ((1r𝑌) × (𝐺‘0)))
222523adant3 1079 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ Ring)
223222adantr 481 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ Ring)
22420, 21, 7, 8, 22, 23, 2, 24, 25chfacfisf 20640 . . . . . . . . . . 11 (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝐺:ℕ0⟶(Base‘𝑌))
2254, 224syl3anl2 1373 . . . . . . . . . 10 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝐺:ℕ0⟶(Base‘𝑌))
226225, 79ffvelrnd 6346 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝐺‘0) ∈ (Base‘𝑌))
2271, 22, 217ringlidm 18552 . . . . . . . . 9 ((𝑌 ∈ Ring ∧ (𝐺‘0) ∈ (Base‘𝑌)) → ((1r𝑌) × (𝐺‘0)) = (𝐺‘0))
228223, 226, 227syl2anc 692 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((1r𝑌) × (𝐺‘0)) = (𝐺‘0))
229 iftrue 4083 . . . . . . . . . 10 (𝑛 = 0 → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
230229adantl 482 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝑛 = 0) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
231 ovexd 6665 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) ∈ V)
232190, 230, 79, 231fvmptd 6275 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝐺‘0) = ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
233221, 228, 2323eqtrd 2658 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((0 (𝑇𝑀)) × (𝐺‘0)) = ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
234209, 233oveq12d 6653 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))) + ((0 (𝑇𝑀)) × (𝐺‘0))) = ((((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) + ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
2351, 3cmncom 18190 . . . . . . 7 ((𝑌 ∈ CMnd ∧ ((0 (𝑇𝑀)) × (𝐺‘0)) ∈ (Base‘𝑌) ∧ (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (((0 (𝑇𝑀)) × (𝐺‘0)) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))) + ((0 (𝑇𝑀)) × (𝐺‘0))))
23613, 81, 94, 235syl3anc 1324 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((0 (𝑇𝑀)) × (𝐺‘0)) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))) + ((0 (𝑇𝑀)) × (𝐺‘0))))
237 ringgrp 18533 . . . . . . . . 9 (𝑌 ∈ Ring → 𝑌 ∈ Grp)
23810, 237syl 17 . . . . . . . 8 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ Grp)
239238adantr 481 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ Grp)
240209, 94eqeltrrd 2700 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) ∈ (Base‘𝑌))
24110adantr 481 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑌 ∈ Ring)
242211adantr 481 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑇𝑀) ∈ (Base‘𝑌))
243 simpl1 1062 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑁 ∈ Fin)
24443ad2ant2 1081 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑅 ∈ Ring)
245244adantr 481 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑅 ∈ Ring)
246 elmapi 7864 . . . . . . . . . . . 12 (𝑏 ∈ (𝐵𝑚 (0...𝑠)) → 𝑏:(0...𝑠)⟶𝐵)
247246adantl 482 . . . . . . . . . . 11 ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑏:(0...𝑠)⟶𝐵)
248247adantl 482 . . . . . . . . . 10 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝑏:(0...𝑠)⟶𝐵)
249 0elfz 12420 . . . . . . . . . . . 12 (𝑠 ∈ ℕ0 → 0 ∈ (0...𝑠))
25032, 249syl 17 . . . . . . . . . . 11 (𝑠 ∈ ℕ → 0 ∈ (0...𝑠))
251250ad2antrl 763 . . . . . . . . . 10 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 0 ∈ (0...𝑠))
252248, 251ffvelrnd 6346 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑏‘0) ∈ 𝐵)
25324, 20, 21, 7, 8mat2pmatbas 20512 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘0) ∈ 𝐵) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
254243, 245, 252, 253syl3anc 1324 . . . . . . . 8 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
2551, 22ringcl 18542 . . . . . . . 8 ((𝑌 ∈ Ring ∧ (𝑇𝑀) ∈ (Base‘𝑌) ∧ (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌)) → ((𝑇𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
256241, 242, 254, 255syl3anc 1324 . . . . . . 7 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑇𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
2571, 2, 23, 3grpsubadd0sub 17483 . . . . . . 7 ((𝑌 ∈ Grp ∧ (((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) ∈ (Base‘𝑌) ∧ ((𝑇𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌)) → ((((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) + ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
258239, 240, 256, 257syl3anc 1324 . . . . . 6 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) + ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
259234, 236, 2583eqtr4d 2664 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((0 (𝑇𝑀)) × (𝐺‘0)) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0)))))
260189, 259oveq12d 6653 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + (((0 (𝑇𝑀)) × (𝐺‘0)) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1))))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))) + ((((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
261111, 260eqtrd 2654 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) + ((0 (𝑇𝑀)) × (𝐺‘0))) + (((𝑠 + 1) (𝑇𝑀)) × (𝐺‘(𝑠 + 1)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))) + ((((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
26274, 100, 2613eqtrd 2658 . 2 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑌 Σg (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 (𝑇𝑀)) × (𝐺𝑖)))) = ((𝑌 Σg (𝑖 ∈ (1...𝑠) ↦ ((𝑖 (𝑇𝑀)) × ((𝑇‘(𝑏‘(𝑖 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑖))))))) + ((((𝑠 + 1) (𝑇𝑀)) × (𝑇‘(𝑏𝑠))) ((𝑇𝑀) × (𝑇‘(𝑏‘0))))))
26338, 72, 2623eqtrd 2658 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  wo 383  wa 384  w3a 1036   = wceq 1481  wcel 1988  wne 2791  Vcvv 3195  cun 3565  cin 3566  c0 3907  ifcif 4077  {csn 4168   class class class wbr 4644  cmpt 4720  wf 5872  cfv 5876  (class class class)co 6635  𝑚 cmap 7842  Fincfn 7940  cc 9919  cr 9920  0cc0 9921  1c1 9922   + caddc 9924   < clt 10059  cle 10060  cmin 10251  cn 11005  2c2 11055  0cn0 11277  cz 11362  cuz 11672  ...cfz 12311  Basecbs 15838  +gcplusg 15922  .rcmulr 15923  0gc0g 16081   Σg cgsu 16082  Mndcmnd 17275  Grpcgrp 17403  -gcsg 17405  .gcmg 17521  CMndccmn 18174  mulGrpcmgp 18470  1rcur 18482  Ringcrg 18528  CRingccrg 18529  Poly1cpl1 19528   Mat cmat 20194   matToPolyMat cmat2pmat 20490
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1720  ax-4 1735  ax-5 1837  ax-6 1886  ax-7 1933  ax-8 1990  ax-9 1997  ax-10 2017  ax-11 2032  ax-12 2045  ax-13 2244  ax-ext 2600  ax-rep 4762  ax-sep 4772  ax-nul 4780  ax-pow 4834  ax-pr 4897  ax-un 6934  ax-inf2 8523  ax-cnex 9977  ax-resscn 9978  ax-1cn 9979  ax-icn 9980  ax-addcl 9981  ax-addrcl 9982  ax-mulcl 9983  ax-mulrcl 9984  ax-mulcom 9985  ax-addass 9986  ax-mulass 9987  ax-distr 9988  ax-i2m1 9989  ax-1ne0 9990  ax-1rid 9991  ax-rnegex 9992  ax-rrecex 9993  ax-cnre 9994  ax-pre-lttri 9995  ax-pre-lttrn 9996  ax-pre-ltadd 9997  ax-pre-mulgt0 9998
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1484  df-fal 1487  df-ex 1703  df-nf 1708  df-sb 1879  df-eu 2472  df-mo 2473  df-clab 2607  df-cleq 2613  df-clel 2616  df-nfc 2751  df-ne 2792  df-nel 2895  df-ral 2914  df-rex 2915  df-reu 2916  df-rmo 2917  df-rab 2918  df-v 3197  df-sbc 3430  df-csb 3527  df-dif 3570  df-un 3572  df-in 3574  df-ss 3581  df-pss 3583  df-nul 3908  df-if 4078  df-pw 4151  df-sn 4169  df-pr 4171  df-tp 4173  df-op 4175  df-ot 4177  df-uni 4428  df-int 4467  df-iun 4513  df-iin 4514  df-br 4645  df-opab 4704  df-mpt 4721  df-tr 4744  df-id 5014  df-eprel 5019  df-po 5025  df-so 5026  df-fr 5063  df-se 5064  df-we 5065  df-xp 5110  df-rel 5111  df-cnv 5112  df-co 5113  df-dm 5114  df-rn 5115  df-res 5116  df-ima 5117  df-pred 5668  df-ord 5714  df-on 5715  df-lim 5716  df-suc 5717  df-iota 5839  df-fun 5878  df-fn 5879  df-f 5880  df-f1 5881  df-fo 5882  df-f1o 5883  df-fv 5884  df-isom 5885  df-riota 6596  df-ov 6638  df-oprab 6639  df-mpt2 6640  df-of 6882  df-ofr 6883  df-om 7051  df-1st 7153  df-2nd 7154  df-supp 7281  df-wrecs 7392  df-recs 7453  df-rdg 7491  df-1o 7545  df-2o 7546  df-oadd 7549  df-er 7727  df-map 7844  df-pm 7845  df-ixp 7894  df-en 7941  df-dom 7942  df-sdom 7943  df-fin 7944  df-fsupp 8261  df-sup 8333  df-oi 8400  df-card 8750  df-pnf 10061  df-mnf 10062  df-xr 10063  df-ltxr 10064  df-le 10065  df-sub 10253  df-neg 10254  df-nn 11006  df-2 11064  df-3 11065  df-4 11066  df-5 11067  df-6 11068  df-7 11069  df-8 11070  df-9 11071  df-n0 11278  df-z 11363  df-dec 11479  df-uz 11673  df-rp 11818  df-fz 12312  df-fzo 12450  df-seq 12785  df-hash 13101  df-struct 15840  df-ndx 15841  df-slot 15842  df-base 15844  df-sets 15845  df-ress 15846  df-plusg 15935  df-mulr 15936  df-sca 15938  df-vsca 15939  df-ip 15940  df-tset 15941  df-ple 15942  df-ds 15945  df-hom 15947  df-cco 15948  df-0g 16083  df-gsum 16084  df-prds 16089  df-pws 16091  df-mre 16227  df-mrc 16228  df-acs 16230  df-mgm 17223  df-sgrp 17265  df-mnd 17276  df-mhm 17316  df-submnd 17317  df-grp 17406  df-minusg 17407  df-sbg 17408  df-mulg 17522  df-subg 17572  df-ghm 17639  df-cntz 17731  df-cmn 18176  df-abl 18177  df-mgp 18471  df-ur 18483  df-ring 18530  df-cring 18531  df-subrg 18759  df-lmod 18846  df-lss 18914  df-sra 19153  df-rgmod 19154  df-ascl 19295  df-psr 19337  df-mpl 19339  df-opsr 19341  df-psr1 19531  df-ply1 19533  df-dsmm 20057  df-frlm 20072  df-mamu 20171  df-mat 20195  df-mat2pmat 20493
This theorem is referenced by:  chfacfpmmulgsum2  20651
  Copyright terms: Public domain W3C validator