chfacfscmulgsum - Metamath Proof Explorer

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

Theorem chfacfscmulgsum 22776

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	⊢ 𝑃 = (Poly₁‘𝑅)
chfacfisf.y	⊢ 𝑌 = (𝑁 Mat 𝑃)
chfacfisf.r	⊢ × = (._r‘𝑌)
chfacfisf.s	⊢ − = (-_g‘𝑌)
chfacfisf.0	⊢ 0 = (0_g‘𝑌)
chfacfisf.t	⊢ 𝑇 = (𝑁 matToPolyMat 𝑅)
chfacfisf.g	⊢ 𝐺 = (𝑛 ∈ ℕ₀ ↦ if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))))
chfacfscmulcl.x	⊢ 𝑋 = (var₁‘𝑅)
chfacfscmulcl.m	⊢ · = ( ·_𝑠 ‘𝑌)
chfacfscmulcl.e	⊢ ↑ = (._g‘(mulGrp‘𝑃))
chfacfscmulgsum.p	⊢ + = (+_g‘𝑌)

**Assertion**
Ref	Expression
chfacfscmulgsum	⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ ℕ₀ ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))

Distinct variable groups: 𝐵,𝑛 𝑛,𝑀 𝑛,𝑁 𝑅,𝑛 𝑛,𝑌 𝑛,𝑏 𝑛,𝑠,𝐵 0 ,𝑛 𝐵,𝑖,𝑠 𝑖,𝐺 𝑖,𝑀 𝑖,𝑁 𝑅,𝑖 𝑖,𝑋 𝑖,𝑌 ↑ ,𝑖 · ,𝑏,𝑖 𝑇,𝑛 − ,𝑛 × ,𝑛 𝑖,𝑛 Allowed substitution hints: 𝐴(𝑖,𝑛,𝑠,𝑏) 𝐵(𝑏) 𝑃(𝑖,𝑛,𝑠,𝑏) + (𝑖,𝑛,𝑠,𝑏) 𝑅(𝑠,𝑏) 𝑇(𝑖,𝑠,𝑏) · (𝑛,𝑠) × (𝑖,𝑠,𝑏) ↑ (𝑛,𝑠,𝑏) 𝐺(𝑛,𝑠,𝑏) 𝑀(𝑠,𝑏) − (𝑖,𝑠,𝑏) 𝑁(𝑠,𝑏) 𝑋(𝑛,𝑠,𝑏) 𝑌(𝑠,𝑏) 0 (𝑖,𝑠,𝑏)

**Proof of Theorem chfacfscmulgsum**
Step	Hyp	Ref	Expression
1		eqid 2731	. . 3 ⊢ (Base‘𝑌) = (Base‘𝑌)
2		chfacfisf.0	. . 3 ⊢ 0 = (0_g‘𝑌)
3		chfacfscmulgsum.p	. . 3 ⊢ + = (+_g‘𝑌)
4		crngring 20164	. . . . . . . 8 ⊢ (𝑅 ∈ CRing → 𝑅 ∈ Ring)
5	4	anim2i 617	. . . . . . 7 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
6	5	3adant3 1132	. . . . . 6 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
7		chfacfisf.p	. . . . . . 7 ⊢ 𝑃 = (Poly₁‘𝑅)
8		chfacfisf.y	. . . . . . 7 ⊢ 𝑌 = (𝑁 Mat 𝑃)
9	7, 8	pmatring 22608	. . . . . 6 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ Ring)
10	6, 9	syl 17	. . . . 5 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Ring)
11		ringcmn 20201	. . . . 5 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ CMnd)
12	10, 11	syl 17	. . . 4 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ CMnd)
13	12	adantr 480	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑌 ∈ CMnd)
14		nn0ex 12387	. . . 4 ⊢ ℕ₀ ∈ V
15	14	a1i 11	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ℕ₀ ∈ V)
16		simpll 766	. . . . 5 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵))
17		simplr 768	. . . . 5 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))))
18		simpr 484	. . . . 5 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → 𝑖 ∈ ℕ₀)
19	16, 17, 18	3jca 1128	. . . 4 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (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 ⊢ 𝐺 = (𝑛 ∈ ℕ₀ ↦ if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))))
26		chfacfscmulcl.x	. . . . 5 ⊢ 𝑋 = (var₁‘𝑅)
27		chfacfscmulcl.m	. . . . 5 ⊢ · = ( ·_𝑠 ‘𝑌)
28		chfacfscmulcl.e	. . . . 5 ⊢ ↑ = (._g‘(mulGrp‘𝑃))
29	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmulcl 22773	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) ∧ 𝑖 ∈ ℕ₀) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
30	19, 29	syl 17	. . 3 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
31	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmulfsupp 22775	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑖 ∈ ℕ₀ ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))) finSupp 0 )
32		nn0disj 13544	. . . 4 ⊢ ((0...(𝑠 + 1)) ∩ (ℤ_≥‘((𝑠 + 1) + 1))) = ∅
33	32	a1i 11	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((0...(𝑠 + 1)) ∩ (ℤ_≥‘((𝑠 + 1) + 1))) = ∅)
34		nnnn0 12388	. . . . . 6 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ ℕ₀)
35		peano2nn0 12421	. . . . . 6 ⊢ (𝑠 ∈ ℕ₀ → (𝑠 + 1) ∈ ℕ₀)
36	34, 35	syl 17	. . . . 5 ⊢ (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℕ₀)
37		nn0split 13543	. . . . 5 ⊢ ((𝑠 + 1) ∈ ℕ₀ → ℕ₀ = ((0...(𝑠 + 1)) ∪ (ℤ_≥‘((𝑠 + 1) + 1))))
38	36, 37	syl 17	. . . 4 ⊢ (𝑠 ∈ ℕ → ℕ₀ = ((0...(𝑠 + 1)) ∪ (ℤ_≥‘((𝑠 + 1) + 1))))
39	38	ad2antrl 728	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ℕ₀ = ((0...(𝑠 + 1)) ∪ (ℤ_≥‘((𝑠 + 1) + 1))))
40	1, 2, 3, 13, 15, 30, 31, 33, 39	gsumsplit2 19842	. 2 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ ℕ₀ ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))))
41		simpll 766	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵))
42		simplr 768	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))))
43		nncn 12133	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ ℂ)
44		add1p1 12372	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℂ → ((𝑠 + 1) + 1) = (𝑠 + 2))
45	43, 44	syl 17	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ ℕ → ((𝑠 + 1) + 1) = (𝑠 + 2))
46	45	ad2antrl 728	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑠 + 1) + 1) = (𝑠 + 2))
47	46	fveq2d 6826	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (ℤ_≥‘((𝑠 + 1) + 1)) = (ℤ_≥‘(𝑠 + 2)))
48	47	eleq2d 2817	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↔ 𝑖 ∈ (ℤ_≥‘(𝑠 + 2))))
49	48	biimpa 476	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → 𝑖 ∈ (ℤ_≥‘(𝑠 + 2)))
50	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmul0 22774	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) ∧ 𝑖 ∈ (ℤ_≥‘(𝑠 + 2))) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = 0 )
51	41, 42, 49, 50	syl3anc 1373	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = 0 )
52	51	mpteq2dva 5184	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))) = (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 ))
53	52	oveq2d 7362	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 )))
54	4, 9	sylan2 593	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Ring)
55		ringmnd 20162	. . . . . . . . . 10 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ Mnd)
56	54, 55	syl 17	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Mnd)
57	56	3adant3 1132	. . . . . . . 8 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Mnd)
58		fvex 6835	. . . . . . . 8 ⊢ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V
59	57, 58	jctir 520	. . . . . . 7 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑌 ∈ Mnd ∧ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V))
60	59	adantr 480	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 ∈ Mnd ∧ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V))
61	2	gsumz 18744	. . . . . 6 ⊢ ((𝑌 ∈ Mnd ∧ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 )) = 0 )
62	60, 61	syl 17	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 )) = 0 )
63	53, 62	eqtrd 2766	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = 0 )
64	63	oveq2d 7362	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + 0 ))
65		fzfid 13880	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (0...(𝑠 + 1)) ∈ Fin)
66		elfznn0 13520	. . . . . . . 8 ⊢ (𝑖 ∈ (0...(𝑠 + 1)) → 𝑖 ∈ ℕ₀)
67	66, 19	sylan2 593	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (0...(𝑠 + 1))) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) ∧ 𝑖 ∈ ℕ₀))
68	67, 29	syl 17	. . . . . 6 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (0...(𝑠 + 1))) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
69	68	ralrimiva 3124	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ∀𝑖 ∈ (0...(𝑠 + 1))((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
70	1, 13, 65, 69	gsummptcl 19880	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌))
71	1, 3, 2	mndrid 18663	. . . 4 ⊢ ((𝑌 ∈ Mnd ∧ (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌)) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + 0 ) = (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))))
72	57, 70, 71	syl2an2r 685	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + 0 ) = (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))))
73	64, 72	eqtrd 2766	. 2 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))))
74	34	ad2antrl 728	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑠 ∈ ℕ₀)
75	1, 3, 13, 74, 68	gsummptfzsplit 19845	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))))
76		elfznn0 13520	. . . . . . 7 ⊢ (𝑖 ∈ (0...𝑠) → 𝑖 ∈ ℕ₀)
77	76, 30	sylan2 593	. . . . . 6 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (0...𝑠)) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
78	1, 3, 13, 74, 77	gsummptfzsplitl 19846	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))))
79	57	adantr 480	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑌 ∈ Mnd)
80		0nn0 12396	. . . . . . . 8 ⊢ 0 ∈ ℕ₀
81	80	a1i 11	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 0 ∈ ℕ₀)
82	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmulcl 22773	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) ∧ 0 ∈ ℕ₀) → ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌))
83	81, 82	mpd3an3 1464	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌))
84		oveq1 7353	. . . . . . . . 9 ⊢ (𝑖 = 0 → (𝑖 ↑ 𝑋) = (0 ↑ 𝑋))
85		fveq2 6822	. . . . . . . . 9 ⊢ (𝑖 = 0 → (𝐺‘𝑖) = (𝐺‘0))
86	84, 85	oveq12d 7364	. . . . . . . 8 ⊢ (𝑖 = 0 → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = ((0 ↑ 𝑋) · (𝐺‘0)))
87	1, 86	gsumsn 19867	. . . . . . 7 ⊢ ((𝑌 ∈ Mnd ∧ 0 ∈ ℕ₀ ∧ ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌)) → (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((0 ↑ 𝑋) · (𝐺‘0)))
88	79, 81, 83, 87	syl3anc 1373	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((0 ↑ 𝑋) · (𝐺‘0)))
89	88	oveq2d 7362	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))))
90	78, 89	eqtrd 2766	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))))
91		ovexd 7381	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑠 + 1) ∈ V)
92		1nn0 12397	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
93	92	a1i 11	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 1 ∈ ℕ₀)
94	74, 93	nn0addcld 12446	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑠 + 1) ∈ ℕ₀)
95	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmulcl 22773	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) ∧ (𝑠 + 1) ∈ ℕ₀) → (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
96	94, 95	mpd3an3 1464	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
97		oveq1 7353	. . . . . . 7 ⊢ (𝑖 = (𝑠 + 1) → (𝑖 ↑ 𝑋) = ((𝑠 + 1) ↑ 𝑋))
98		fveq2 6822	. . . . . . 7 ⊢ (𝑖 = (𝑠 + 1) → (𝐺‘𝑖) = (𝐺‘(𝑠 + 1)))
99	97, 98	oveq12d 7364	. . . . . 6 ⊢ (𝑖 = (𝑠 + 1) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))
100	1, 99	gsumsn 19867	. . . . 5 ⊢ ((𝑌 ∈ Mnd ∧ (𝑠 + 1) ∈ V ∧ (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))
101	79, 91, 96, 100	syl3anc 1373	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))
102	90, 101	oveq12d 7364	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))))
103		fzfid 13880	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (1...𝑠) ∈ Fin)
104		simpll 766	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵))
105		simplr 768	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))))
106		elfznn 13453	. . . . . . . . . 10 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ)
107	106	nnnn0d 12442	. . . . . . . . 9 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ₀)
108	107	adantl 481	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → 𝑖 ∈ ℕ₀)
109	104, 105, 108, 29	syl3anc 1373	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
110	109	ralrimiva 3124	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ∀𝑖 ∈ (1...𝑠)((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
111	1, 13, 103, 110	gsummptcl 19880	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌))
112	1, 3	mndass 18651	. . . . 5 ⊢ ((𝑌 ∈ Mnd ∧ ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌) ∧ ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌) ∧ (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))) → (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))))
113	79, 111, 83, 96, 112	syl13anc 1374	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))))
114	106	nnne0d 12175	. . . . . . . . . . . . . 14 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ≠ 0)
115	114	ad2antlr 727	. . . . . . . . . . . . 13 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ 0)
116		neeq1 2990	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 𝑖 → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
117	116	adantl 481	. . . . . . . . . . . . 13 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
118	115, 117	mpbird 257	. . . . . . . . . . . 12 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ 0)
119		eqneqall 2939	. . . . . . . . . . . 12 ⊢ (𝑛 = 0 → (𝑛 ≠ 0 → 0 = (𝑇‘(𝑏‘(𝑖 − 1)))))
120	118, 119	mpan9 506	. . . . . . . . . . 11 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = (𝑇‘(𝑏‘(𝑖 − 1))))
121		simplr 768	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 𝑛 = 𝑖)
122		eqeq1 2735	. . . . . . . . . . . . . . . . 17 ⊢ (0 = 𝑛 → (0 = 𝑖 ↔ 𝑛 = 𝑖))
123	122	eqcoms 2739	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 0 → (0 = 𝑖 ↔ 𝑛 = 𝑖))
124	123	adantl 481	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (0 = 𝑖 ↔ 𝑛 = 𝑖))
125	121, 124	mpbird 257	. . . . . . . . . . . . . 14 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = 𝑖)
126	125	fveq2d 6826	. . . . . . . . . . . . 13 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑏‘0) = (𝑏‘𝑖))
127	126	fveq2d 6826	. . . . . . . . . . . 12 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑇‘(𝑏‘0)) = (𝑇‘(𝑏‘𝑖)))
128	127	oveq2d 7362	. . . . . . . . . . 11 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) = ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))
129	120, 128	oveq12d 7364	. . . . . . . . . 10 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
130		elfz2 13414	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ (1...𝑠) ↔ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)))
131		zleltp1 12523	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑖 ∈ ℤ ∧ 𝑠 ∈ ℤ) → (𝑖 ≤ 𝑠 ↔ 𝑖 < (𝑠 + 1)))
132	131	ancoms 458	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≤ 𝑠 ↔ 𝑖 < (𝑠 + 1)))
133	132	3adant1 1130	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≤ 𝑠 ↔ 𝑖 < (𝑠 + 1)))
134	133	biimpcd 249	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 ≤ 𝑠 → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
135	134	adantl 481	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠) → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
136	135	impcom 407	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → 𝑖 < (𝑠 + 1))
137	136	orcd 873	. . . . . . . . . . . . . . . . . . 19 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖))
138		zre 12472	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑠 ∈ ℤ → 𝑠 ∈ ℝ)
139		1red 11113	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑠 ∈ ℤ → 1 ∈ ℝ)
140	138, 139	readdcld 11141	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑠 ∈ ℤ → (𝑠 + 1) ∈ ℝ)
141		zre 12472	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑖 ∈ ℤ → 𝑖 ∈ ℝ)
142	140, 141	anim12ci 614	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
143	142	3adant1 1130	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
144		lttri2 11195	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
145	143, 144	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
146	145	adantr 480	. . . . . . . . . . . . . . . . . . 19 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
147	137, 146	mpbird 257	. . . . . . . . . . . . . . . . . 18 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → 𝑖 ≠ (𝑠 + 1))
148	130, 147	sylbi 217	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ≠ (𝑠 + 1))
149	148	ad2antlr 727	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ (𝑠 + 1))
150		neeq1 2990	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 𝑖 → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
151	150	adantl 481	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
152	149, 151	mpbird 257	. . . . . . . . . . . . . . 15 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ (𝑠 + 1))
153	152	adantr 480	. . . . . . . . . . . . . 14 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → 𝑛 ≠ (𝑠 + 1))
154	153	neneqd 2933	. . . . . . . . . . . . 13 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → ¬ 𝑛 = (𝑠 + 1))
155	154	pm2.21d 121	. . . . . . . . . . . 12 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → (𝑛 = (𝑠 + 1) → (𝑇‘(𝑏‘𝑠)) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
156	155	imp 406	. . . . . . . . . . 11 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ 𝑛 = (𝑠 + 1)) → (𝑇‘(𝑏‘𝑠)) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
157	106	nnred 12140	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℝ)
158		eleq1w 2814	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 𝑖 → (𝑛 ∈ ℝ ↔ 𝑖 ∈ ℝ))
159	157, 158	syl5ibrcom 247	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ (1...𝑠) → (𝑛 = 𝑖 → 𝑛 ∈ ℝ))
160	159	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑛 = 𝑖 → 𝑛 ∈ ℝ))
161	160	imp 406	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ∈ ℝ)
162	74	nn0red 12443	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑠 ∈ ℝ)
163	162	ad2antrr 726	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑠 ∈ ℝ)
164		1red 11113	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 1 ∈ ℝ)
165	163, 164	readdcld 11141	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑠 + 1) ∈ ℝ)
166	130, 136	sylbi 217	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 < (𝑠 + 1))
167	166	ad2antlr 727	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 < (𝑠 + 1))
168		breq1 5094	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑖 → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
169	168	adantl 481	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
170	167, 169	mpbird 257	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 < (𝑠 + 1))
171	161, 165, 170	ltnsymd 11262	. . . . . . . . . . . . . . 15 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ¬ (𝑠 + 1) < 𝑛)
172	171	pm2.21d 121	. . . . . . . . . . . . . 14 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ((𝑠 + 1) < 𝑛 → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
173	172	ad2antrr 726	. . . . . . . . . . . . 13 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → ((𝑠 + 1) < 𝑛 → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
174	173	imp 406	. . . . . . . . . . . 12 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ (𝑠 + 1) < 𝑛) → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
175		simp-4r 783	. . . . . . . . . . . . . . 15 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → 𝑛 = 𝑖)
176	175	fvoveq1d 7368	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏‘(𝑛 − 1)) = (𝑏‘(𝑖 − 1)))
177	176	fveq2d 6826	. . . . . . . . . . . . 13 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏‘(𝑛 − 1))) = (𝑇‘(𝑏‘(𝑖 − 1))))
178	175	fveq2d 6826	. . . . . . . . . . . . . . 15 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏‘𝑛) = (𝑏‘𝑖))
179	178	fveq2d 6826	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏‘𝑛)) = (𝑇‘(𝑏‘𝑖)))
180	179	oveq2d 7362	. . . . . . . . . . . . 13 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))) = ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))
181	177, 180	oveq12d 7364	. . . . . . . . . . . 12 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
182	174, 181	ifeqda 4512	. . . . . . . . . . 11 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
183	156, 182	ifeqda 4512	. . . . . . . . . 10 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
184	129, 183	ifeqda 4512	. . . . . . . . 9 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
185		ovexd 7381	. . . . . . . . 9 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))) ∈ V)
186	25, 184, 108, 185	fvmptd2 6937	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝐺‘𝑖) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
187	186	oveq2d 7362	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
188	187	mpteq2dva 5184	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))) = (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))))
189	188	oveq2d 7362	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))))
190		nn0p1gt0 12410	. . . . . . . . . . . . . 14 ⊢ (𝑠 ∈ ℕ₀ → 0 < (𝑠 + 1))
191		0red 11115	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 ∈ ℕ₀ → 0 ∈ ℝ)
192		ltne 11210	. . . . . . . . . . . . . . . 16 ⊢ ((0 ∈ ℝ ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
193	191, 192	sylan 580	. . . . . . . . . . . . . . 15 ⊢ ((𝑠 ∈ ℕ₀ ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
194		neeq1 2990	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = (𝑠 + 1) → (𝑛 ≠ 0 ↔ (𝑠 + 1) ≠ 0))
195	193, 194	syl5ibrcom 247	. . . . . . . . . . . . . 14 ⊢ ((𝑠 ∈ ℕ₀ ∧ 0 < (𝑠 + 1)) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
196	34, 190, 195	syl2anc2 585	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℕ → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
197	196	ad2antrl 728	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
198	197	imp 406	. . . . . . . . . . 11 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) → 𝑛 ≠ 0)
199		eqneqall 2939	. . . . . . . . . . 11 ⊢ (𝑛 = 0 → (𝑛 ≠ 0 → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏‘𝑠))))
200	198, 199	mpan9 506	. . . . . . . . . 10 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ 𝑛 = 0) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏‘𝑠)))
201		iftrue 4481	. . . . . . . . . . 11 ⊢ (𝑛 = (𝑠 + 1) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) = (𝑇‘(𝑏‘𝑠)))
202	201	ad2antlr 727	. . . . . . . . . 10 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) = (𝑇‘(𝑏‘𝑠)))
203	200, 202	ifeqda 4512	. . . . . . . . 9 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) = (𝑇‘(𝑏‘𝑠)))
204	74, 35	syl 17	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑠 + 1) ∈ ℕ₀)
205		fvexd 6837	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑇‘(𝑏‘𝑠)) ∈ V)
206	25, 203, 204, 205	fvmptd2 6937	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝐺‘(𝑠 + 1)) = (𝑇‘(𝑏‘𝑠)))
207	206	oveq2d 7362	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) = (((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))))
208	4	3ad2ant2 1134	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑅 ∈ Ring)
209		eqid 2731	. . . . . . . . . . . . . 14 ⊢ (Base‘𝑃) = (Base‘𝑃)
210	26, 7, 209	vr1cl 22131	. . . . . . . . . . . . 13 ⊢ (𝑅 ∈ Ring → 𝑋 ∈ (Base‘𝑃))
211	208, 210	syl 17	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑋 ∈ (Base‘𝑃))
212		eqid 2731	. . . . . . . . . . . . . 14 ⊢ (mulGrp‘𝑃) = (mulGrp‘𝑃)
213	212, 209	mgpbas 20064	. . . . . . . . . . . . 13 ⊢ (Base‘𝑃) = (Base‘(mulGrp‘𝑃))
214		eqid 2731	. . . . . . . . . . . . . 14 ⊢ (1_r‘𝑃) = (1_r‘𝑃)
215	212, 214	ringidval 20102	. . . . . . . . . . . . 13 ⊢ (1_r‘𝑃) = (0_g‘(mulGrp‘𝑃))
216	213, 215, 28	mulg0 18987	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ (Base‘𝑃) → (0 ↑ 𝑋) = (1_r‘𝑃))
217	211, 216	syl 17	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (0 ↑ 𝑋) = (1_r‘𝑃))
218	7	ply1crng 22112	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ CRing → 𝑃 ∈ CRing)
219	218	anim2i 617	. . . . . . . . . . . . . 14 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
220	219	3adant3 1132	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
221	8	matsca2 22336	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ Fin ∧ 𝑃 ∈ CRing) → 𝑃 = (Scalar‘𝑌))
222	220, 221	syl 17	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑃 = (Scalar‘𝑌))
223	222	fveq2d 6826	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (1_r‘𝑃) = (1_r‘(Scalar‘𝑌)))
224	217, 223	eqtrd 2766	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (0 ↑ 𝑋) = (1_r‘(Scalar‘𝑌)))
225	224	adantr 480	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (0 ↑ 𝑋) = (1_r‘(Scalar‘𝑌)))
226	225	oveq1d 7361	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((0 ↑ 𝑋) · (𝐺‘0)) = ((1_r‘(Scalar‘𝑌)) · (𝐺‘0)))
227	7, 8	pmatlmod 22609	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ LMod)
228	4, 227	sylan2 593	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ LMod)
229	228	3adant3 1132	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ LMod)
230	20, 21, 7, 8, 22, 23, 2, 24, 25	chfacfisf 22770	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝐺:ℕ₀⟶(Base‘𝑌))
231	4, 230	syl3anl2 1415	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝐺:ℕ₀⟶(Base‘𝑌))
232	231, 81	ffvelcdmd 7018	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝐺‘0) ∈ (Base‘𝑌))
233		eqid 2731	. . . . . . . . . 10 ⊢ (Scalar‘𝑌) = (Scalar‘𝑌)
234		eqid 2731	. . . . . . . . . 10 ⊢ (1_r‘(Scalar‘𝑌)) = (1_r‘(Scalar‘𝑌))
235	1, 233, 27, 234	lmodvs1 20824	. . . . . . . . 9 ⊢ ((𝑌 ∈ LMod ∧ (𝐺‘0) ∈ (Base‘𝑌)) → ((1_r‘(Scalar‘𝑌)) · (𝐺‘0)) = (𝐺‘0))
236	229, 232, 235	syl2an2r 685	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((1_r‘(Scalar‘𝑌)) · (𝐺‘0)) = (𝐺‘0))
237		iftrue 4481	. . . . . . . . 9 ⊢ (𝑛 = 0 → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
238		ovexd 7381	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) ∈ V)
239	25, 237, 81, 238	fvmptd3 6952	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝐺‘0) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
240	226, 236, 239	3eqtrd 2770	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((0 ↑ 𝑋) · (𝐺‘0)) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
241	207, 240	oveq12d 7364	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 ↑ 𝑋) · (𝐺‘0))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) + ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
242	1, 3	cmncom 19711	. . . . . . 7 ⊢ ((𝑌 ∈ CMnd ∧ ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌) ∧ (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 ↑ 𝑋) · (𝐺‘0))))
243	13, 83, 96, 242	syl3anc 1373	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 ↑ 𝑋) · (𝐺‘0))))
244		ringgrp 20157	. . . . . . . . 9 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ Grp)
245	10, 244	syl 17	. . . . . . . 8 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Grp)
246	245	adantr 480	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑌 ∈ Grp)
247	207, 96	eqeltrrd 2832	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) ∈ (Base‘𝑌))
248	10	adantr 480	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑌 ∈ Ring)
249	24, 20, 21, 7, 8	mat2pmatbas 22642	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) → (𝑇‘𝑀) ∈ (Base‘𝑌))
250	4, 249	syl3an2 1164	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑇‘𝑀) ∈ (Base‘𝑌))
251	250	adantr 480	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑇‘𝑀) ∈ (Base‘𝑌))
252		simpl1 1192	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑁 ∈ Fin)
253	208	adantr 480	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑅 ∈ Ring)
254		elmapi 8773	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ (𝐵 ↑_m (0...𝑠)) → 𝑏:(0...𝑠)⟶𝐵)
255	254	adantl 481	. . . . . . . . . . 11 ⊢ ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) → 𝑏:(0...𝑠)⟶𝐵)
256	255	adantl 481	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑏:(0...𝑠)⟶𝐵)
257		0elfz 13524	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ ℕ₀ → 0 ∈ (0...𝑠))
258	34, 257	syl 17	. . . . . . . . . . 11 ⊢ (𝑠 ∈ ℕ → 0 ∈ (0...𝑠))
259	258	ad2antrl 728	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 0 ∈ (0...𝑠))
260	256, 259	ffvelcdmd 7018	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑏‘0) ∈ 𝐵)
261	24, 20, 21, 7, 8	mat2pmatbas 22642	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘0) ∈ 𝐵) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
262	252, 253, 260, 261	syl3anc 1373	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
263	1, 22	ringcl 20169	. . . . . . . 8 ⊢ ((𝑌 ∈ Ring ∧ (𝑇‘𝑀) ∈ (Base‘𝑌) ∧ (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌)) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
264	248, 251, 262, 263	syl3anc 1373	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
265	1, 2, 23, 3	grpsubadd0sub 18940	. . . . . . 7 ⊢ ((𝑌 ∈ Grp ∧ (((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) ∈ (Base‘𝑌) ∧ ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌)) → ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) + ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
266	246, 247, 264, 265	syl3anc 1373	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) + ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
267	241, 243, 266	3eqtr4d 2776	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
268	189, 267	oveq12d 7364	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
269	113, 268	eqtrd 2766	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
270	75, 102, 269	3eqtrd 2770	. 2 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
271	40, 73, 270	3eqtrd 2770	1 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ ℕ₀ ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 206 ∧ wa 395 ∨ wo 847 ∧ w3a 1086 = wceq 1541 ∈ wcel 2111 ≠ wne 2928 Vcvv 3436 ∪ cun 3900 ∩ cin 3901 ∅c0 4283 ifcif 4475 {csn 4576 class class class wbr 5091 ↦ cmpt 5172 ⟶wf 6477 ‘cfv 6481 (class class class)co 7346 ↑_m cmap 8750 Fincfn 8869 ℂcc 11004 ℝcr 11005 0cc0 11006 1c1 11007 + caddc 11009 < clt 11146 ≤ cle 11147 − cmin 11344 ℕcn 12125 2c2 12180 ℕ₀cn0 12381 ℤcz 12468 ℤ_≥cuz 12732 ...cfz 13407 Basecbs 17120 +_gcplusg 17161 ._rcmulr 17162 Scalarcsca 17164 ·_𝑠 cvsca 17165 0_gc0g 17343 Σ_g cgsu 17344 Mndcmnd 18642 Grpcgrp 18846 -_gcsg 18848 ._gcmg 18980 CMndccmn 19693 mulGrpcmgp 20059 1_rcur 20100 Ringcrg 20152 CRingccrg 20153 LModclmod 20794 var₁cv1 22089 Poly₁cpl1 22090 Mat cmat 22323 matToPolyMat cmat2pmat 22620

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1968 ax-7 2009 ax-8 2113 ax-9 2121 ax-10 2144 ax-11 2160 ax-12 2180 ax-ext 2703 ax-rep 5217 ax-sep 5234 ax-nul 5244 ax-pow 5303 ax-pr 5370 ax-un 7668 ax-cnex 11062 ax-resscn 11063 ax-1cn 11064 ax-icn 11065 ax-addcl 11066 ax-addrcl 11067 ax-mulcl 11068 ax-mulrcl 11069 ax-mulcom 11070 ax-addass 11071 ax-mulass 11072 ax-distr 11073 ax-i2m1 11074 ax-1ne0 11075 ax-1rid 11076 ax-rnegex 11077 ax-rrecex 11078 ax-cnre 11079 ax-pre-lttri 11080 ax-pre-lttrn 11081 ax-pre-ltadd 11082 ax-pre-mulgt0 11083

This theorem depends on definitions: df-bi 207 df-an 396 df-or 848 df-3or 1087 df-3an 1088 df-tru 1544 df-fal 1554 df-ex 1781 df-nf 1785 df-sb 2068 df-mo 2535 df-eu 2564 df-clab 2710 df-cleq 2723 df-clel 2806 df-nfc 2881 df-ne 2929 df-nel 3033 df-ral 3048 df-rex 3057 df-rmo 3346 df-reu 3347 df-rab 3396 df-v 3438 df-sbc 3742 df-csb 3851 df-dif 3905 df-un 3907 df-in 3909 df-ss 3919 df-pss 3922 df-nul 4284 df-if 4476 df-pw 4552 df-sn 4577 df-pr 4579 df-tp 4581 df-op 4583 df-ot 4585 df-uni 4860 df-int 4898 df-iun 4943 df-iin 4944 df-br 5092 df-opab 5154 df-mpt 5173 df-tr 5199 df-id 5511 df-eprel 5516 df-po 5524 df-so 5525 df-fr 5569 df-se 5570 df-we 5571 df-xp 5622 df-rel 5623 df-cnv 5624 df-co 5625 df-dm 5626 df-rn 5627 df-res 5628 df-ima 5629 df-pred 6248 df-ord 6309 df-on 6310 df-lim 6311 df-suc 6312 df-iota 6437 df-fun 6483 df-fn 6484 df-f 6485 df-f1 6486 df-fo 6487 df-f1o 6488 df-fv 6489 df-isom 6490 df-riota 7303 df-ov 7349 df-oprab 7350 df-mpo 7351 df-of 7610 df-ofr 7611 df-om 7797 df-1st 7921 df-2nd 7922 df-supp 8091 df-frecs 8211 df-wrecs 8242 df-recs 8291 df-rdg 8329 df-1o 8385 df-2o 8386 df-er 8622 df-map 8752 df-pm 8753 df-ixp 8822 df-en 8870 df-dom 8871 df-sdom 8872 df-fin 8873 df-fsupp 9246 df-sup 9326 df-oi 9396 df-card 9832 df-pnf 11148 df-mnf 11149 df-xr 11150 df-ltxr 11151 df-le 11152 df-sub 11346 df-neg 11347 df-nn 12126 df-2 12188 df-3 12189 df-4 12190 df-5 12191 df-6 12192 df-7 12193 df-8 12194 df-9 12195 df-n0 12382 df-z 12469 df-dec 12589 df-uz 12733 df-rp 12891 df-fz 13408 df-fzo 13555 df-seq 13909 df-hash 14238 df-struct 17058 df-sets 17075 df-slot 17093 df-ndx 17105 df-base 17121 df-ress 17142 df-plusg 17174 df-mulr 17175 df-sca 17177 df-vsca 17178 df-ip 17179 df-tset 17180 df-ple 17181 df-ds 17183 df-hom 17185 df-cco 17186 df-0g 17345 df-gsum 17346 df-prds 17351 df-pws 17353 df-mre 17488 df-mrc 17489 df-acs 17491 df-mgm 18548 df-sgrp 18627 df-mnd 18643 df-mhm 18691 df-submnd 18692 df-grp 18849 df-minusg 18850 df-sbg 18851 df-mulg 18981 df-subg 19036 df-ghm 19126 df-cntz 19230 df-cmn 19695 df-abl 19696 df-mgp 20060 df-rng 20072 df-ur 20101 df-ring 20154 df-cring 20155 df-subrng 20462 df-subrg 20486 df-lmod 20796 df-lss 20866 df-sra 21108 df-rgmod 21109 df-dsmm 21670 df-frlm 21685 df-ascl 21793 df-psr 21847 df-mvr 21848 df-mpl 21849 df-opsr 21851 df-psr1 22093 df-vr1 22094 df-ply1 22095 df-mamu 22307 df-mat 22324 df-mat2pmat 22623

This theorem is referenced by: cpmadugsum 22794

W3C validator