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 21465

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 2798	. . 3 ⊢ (Base‘𝑌) = (Base‘𝑌)
2		chfacfisf.0	. . 3 ⊢ 0 = (0_g‘𝑌)
3		chfacfscmulgsum.p	. . 3 ⊢ + = (+_g‘𝑌)
4		crngring 19302	. . . . . . . 8 ⊢ (𝑅 ∈ CRing → 𝑅 ∈ Ring)
5	4	anim2i 619	. . . . . . 7 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
6	5	3adant3 1129	. . . . . 6 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
7		chfacfisf.p	. . . . . . 7 ⊢ 𝑃 = (Poly₁‘𝑅)
8		chfacfisf.y	. . . . . . 7 ⊢ 𝑌 = (𝑁 Mat 𝑃)
9	7, 8	pmatring 21297	. . . . . 6 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ Ring)
10	6, 9	syl 17	. . . . 5 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Ring)
11		ringcmn 19327	. . . . 5 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ CMnd)
12	10, 11	syl 17	. . . 4 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ CMnd)
13	12	adantr 484	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑌 ∈ CMnd)
14		nn0ex 11891	. . . 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 488	. . . . 5 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → 𝑖 ∈ ℕ₀)
19	16, 17, 18	3jca 1125	. . . 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 21462	. . . 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 21464	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑖 ∈ ℕ₀ ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))) finSupp 0 )
32		nn0disj 13018	. . . 4 ⊢ ((0...(𝑠 + 1)) ∩ (ℤ_≥‘((𝑠 + 1) + 1))) = ∅
33	32	a1i 11	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((0...(𝑠 + 1)) ∩ (ℤ_≥‘((𝑠 + 1) + 1))) = ∅)
34		nnnn0 11892	. . . . . 6 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ ℕ₀)
35		peano2nn0 11925	. . . . . 6 ⊢ (𝑠 ∈ ℕ₀ → (𝑠 + 1) ∈ ℕ₀)
36	34, 35	syl 17	. . . . 5 ⊢ (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℕ₀)
37		nn0split 13017	. . . . 5 ⊢ ((𝑠 + 1) ∈ ℕ₀ → ℕ₀ = ((0...(𝑠 + 1)) ∪ (ℤ_≥‘((𝑠 + 1) + 1))))
38	36, 37	syl 17	. . . 4 ⊢ (𝑠 ∈ ℕ → ℕ₀ = ((0...(𝑠 + 1)) ∪ (ℤ_≥‘((𝑠 + 1) + 1))))
39	38	ad2antrl 727	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ℕ₀ = ((0...(𝑠 + 1)) ∪ (ℤ_≥‘((𝑠 + 1) + 1))))
40	1, 2, 3, 13, 15, 30, 31, 33, 39	gsumsplit2 19042	. 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 11633	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ ℂ)
44		add1p1 11876	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℂ → ((𝑠 + 1) + 1) = (𝑠 + 2))
45	43, 44	syl 17	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ ℕ → ((𝑠 + 1) + 1) = (𝑠 + 2))
46	45	ad2antrl 727	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑠 + 1) + 1) = (𝑠 + 2))
47	46	fveq2d 6649	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (ℤ_≥‘((𝑠 + 1) + 1)) = (ℤ_≥‘(𝑠 + 2)))
48	47	eleq2d 2875	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↔ 𝑖 ∈ (ℤ_≥‘(𝑠 + 2))))
49	48	biimpa 480	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → 𝑖 ∈ (ℤ_≥‘(𝑠 + 2)))
50	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmul0 21463	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) ∧ 𝑖 ∈ (ℤ_≥‘(𝑠 + 2))) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = 0 )
51	41, 42, 49, 50	syl3anc 1368	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = 0 )
52	51	mpteq2dva 5125	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))) = (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 ))
53	52	oveq2d 7151	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 )))
54	4, 9	sylan2 595	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Ring)
55		ringmnd 19300	. . . . . . . . . 10 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ Mnd)
56	54, 55	syl 17	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Mnd)
57	56	3adant3 1129	. . . . . . . 8 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Mnd)
58		fvex 6658	. . . . . . . 8 ⊢ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V
59	57, 58	jctir 524	. . . . . . 7 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑌 ∈ Mnd ∧ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V))
60	59	adantr 484	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 ∈ Mnd ∧ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V))
61	2	gsumz 17992	. . . . . 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 2833	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = 0 )
64	63	oveq2d 7151	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + 0 ))
65		fzfid 13336	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (0...(𝑠 + 1)) ∈ Fin)
66		elfznn0 12995	. . . . . . . 8 ⊢ (𝑖 ∈ (0...(𝑠 + 1)) → 𝑖 ∈ ℕ₀)
67	66, 19	sylan2 595	. . . . . . 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 3149	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ∀𝑖 ∈ (0...(𝑠 + 1))((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
70	1, 13, 65, 69	gsummptcl 19080	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌))
71	1, 3, 2	mndrid 17924	. . . 4 ⊢ ((𝑌 ∈ Mnd ∧ (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌)) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + 0 ) = (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))))
72	57, 70, 71	syl2an2r 684	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + 0 ) = (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))))
73	64, 72	eqtrd 2833	. 2 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))))
74	34	ad2antrl 727	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑠 ∈ ℕ₀)
75	1, 3, 13, 74, 68	gsummptfzsplit 19045	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))))
76		elfznn0 12995	. . . . . . 7 ⊢ (𝑖 ∈ (0...𝑠) → 𝑖 ∈ ℕ₀)
77	76, 30	sylan2 595	. . . . . 6 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (0...𝑠)) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
78	1, 3, 13, 74, 77	gsummptfzsplitl 19046	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))))
79	57	adantr 484	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑌 ∈ Mnd)
80		0nn0 11900	. . . . . . . 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 21462	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) ∧ 0 ∈ ℕ₀) → ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌))
83	81, 82	mpd3an3 1459	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌))
84		oveq1 7142	. . . . . . . . 9 ⊢ (𝑖 = 0 → (𝑖 ↑ 𝑋) = (0 ↑ 𝑋))
85		fveq2 6645	. . . . . . . . 9 ⊢ (𝑖 = 0 → (𝐺‘𝑖) = (𝐺‘0))
86	84, 85	oveq12d 7153	. . . . . . . 8 ⊢ (𝑖 = 0 → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = ((0 ↑ 𝑋) · (𝐺‘0)))
87	1, 86	gsumsn 19067	. . . . . . 7 ⊢ ((𝑌 ∈ Mnd ∧ 0 ∈ ℕ₀ ∧ ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌)) → (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((0 ↑ 𝑋) · (𝐺‘0)))
88	79, 81, 83, 87	syl3anc 1368	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((0 ↑ 𝑋) · (𝐺‘0)))
89	88	oveq2d 7151	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))))
90	78, 89	eqtrd 2833	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))))
91		ovexd 7170	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑠 + 1) ∈ V)
92		1nn0 11901	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
93	92	a1i 11	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 1 ∈ ℕ₀)
94	74, 93	nn0addcld 11947	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑠 + 1) ∈ ℕ₀)
95	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmulcl 21462	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) ∧ (𝑠 + 1) ∈ ℕ₀) → (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
96	94, 95	mpd3an3 1459	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
97		oveq1 7142	. . . . . . 7 ⊢ (𝑖 = (𝑠 + 1) → (𝑖 ↑ 𝑋) = ((𝑠 + 1) ↑ 𝑋))
98		fveq2 6645	. . . . . . 7 ⊢ (𝑖 = (𝑠 + 1) → (𝐺‘𝑖) = (𝐺‘(𝑠 + 1)))
99	97, 98	oveq12d 7153	. . . . . 6 ⊢ (𝑖 = (𝑠 + 1) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))
100	1, 99	gsumsn 19067	. . . . 5 ⊢ ((𝑌 ∈ Mnd ∧ (𝑠 + 1) ∈ V ∧ (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))
101	79, 91, 96, 100	syl3anc 1368	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))
102	90, 101	oveq12d 7153	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))))
103		fzfid 13336	. . . . . 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 12931	. . . . . . . . . 10 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ)
107	106	nnnn0d 11943	. . . . . . . . 9 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ₀)
108	107	adantl 485	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → 𝑖 ∈ ℕ₀)
109	104, 105, 108, 29	syl3anc 1368	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
110	109	ralrimiva 3149	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ∀𝑖 ∈ (1...𝑠)((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
111	1, 13, 103, 110	gsummptcl 19080	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌))
112	1, 3	mndass 17912	. . . . 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 1369	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))))
114	106	nnne0d 11675	. . . . . . . . . . . . . 14 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ≠ 0)
115	114	ad2antlr 726	. . . . . . . . . . . . 13 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ 0)
116		neeq1 3049	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 𝑖 → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
117	116	adantl 485	. . . . . . . . . . . . 13 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
118	115, 117	mpbird 260	. . . . . . . . . . . 12 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ 0)
119		eqneqall 2998	. . . . . . . . . . . 12 ⊢ (𝑛 = 0 → (𝑛 ≠ 0 → 0 = (𝑇‘(𝑏‘(𝑖 − 1)))))
120	118, 119	mpan9 510	. . . . . . . . . . 11 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = (𝑇‘(𝑏‘(𝑖 − 1))))
121		simplr 768	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 𝑛 = 𝑖)
122		eqeq1 2802	. . . . . . . . . . . . . . . . 17 ⊢ (0 = 𝑛 → (0 = 𝑖 ↔ 𝑛 = 𝑖))
123	122	eqcoms 2806	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 0 → (0 = 𝑖 ↔ 𝑛 = 𝑖))
124	123	adantl 485	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (0 = 𝑖 ↔ 𝑛 = 𝑖))
125	121, 124	mpbird 260	. . . . . . . . . . . . . 14 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = 𝑖)
126	125	fveq2d 6649	. . . . . . . . . . . . 13 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑏‘0) = (𝑏‘𝑖))
127	126	fveq2d 6649	. . . . . . . . . . . 12 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑇‘(𝑏‘0)) = (𝑇‘(𝑏‘𝑖)))
128	127	oveq2d 7151	. . . . . . . . . . 11 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) = ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))
129	120, 128	oveq12d 7153	. . . . . . . . . 10 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
130		elfz2 12892	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ (1...𝑠) ↔ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)))
131		zleltp1 12021	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑖 ∈ ℤ ∧ 𝑠 ∈ ℤ) → (𝑖 ≤ 𝑠 ↔ 𝑖 < (𝑠 + 1)))
132	131	ancoms 462	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≤ 𝑠 ↔ 𝑖 < (𝑠 + 1)))
133	132	3adant1 1127	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≤ 𝑠 ↔ 𝑖 < (𝑠 + 1)))
134	133	biimpcd 252	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 ≤ 𝑠 → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
135	134	adantl 485	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠) → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
136	135	impcom 411	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → 𝑖 < (𝑠 + 1))
137	136	orcd 870	. . . . . . . . . . . . . . . . . . 19 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖))
138		zre 11973	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑠 ∈ ℤ → 𝑠 ∈ ℝ)
139		1red 10631	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑠 ∈ ℤ → 1 ∈ ℝ)
140	138, 139	readdcld 10659	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑠 ∈ ℤ → (𝑠 + 1) ∈ ℝ)
141		zre 11973	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑖 ∈ ℤ → 𝑖 ∈ ℝ)
142	140, 141	anim12ci 616	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
143	142	3adant1 1127	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
144		lttri2 10712	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
145	143, 144	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
146	145	adantr 484	. . . . . . . . . . . . . . . . . . 19 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
147	137, 146	mpbird 260	. . . . . . . . . . . . . . . . . 18 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → 𝑖 ≠ (𝑠 + 1))
148	130, 147	sylbi 220	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ≠ (𝑠 + 1))
149	148	ad2antlr 726	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ (𝑠 + 1))
150		neeq1 3049	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 𝑖 → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
151	150	adantl 485	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
152	149, 151	mpbird 260	. . . . . . . . . . . . . . 15 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ (𝑠 + 1))
153	152	adantr 484	. . . . . . . . . . . . . 14 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → 𝑛 ≠ (𝑠 + 1))
154	153	neneqd 2992	. . . . . . . . . . . . 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 410	. . . . . . . . . . 11 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ 𝑛 = (𝑠 + 1)) → (𝑇‘(𝑏‘𝑠)) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
157	106	nnred 11640	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℝ)
158		eleq1w 2872	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 𝑖 → (𝑛 ∈ ℝ ↔ 𝑖 ∈ ℝ))
159	157, 158	syl5ibrcom 250	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ (1...𝑠) → (𝑛 = 𝑖 → 𝑛 ∈ ℝ))
160	159	adantl 485	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑛 = 𝑖 → 𝑛 ∈ ℝ))
161	160	imp 410	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ∈ ℝ)
162	74	nn0red 11944	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑠 ∈ ℝ)
163	162	ad2antrr 725	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑠 ∈ ℝ)
164		1red 10631	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 1 ∈ ℝ)
165	163, 164	readdcld 10659	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑠 + 1) ∈ ℝ)
166	130, 136	sylbi 220	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 < (𝑠 + 1))
167	166	ad2antlr 726	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 < (𝑠 + 1))
168		breq1 5033	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑖 → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
169	168	adantl 485	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
170	167, 169	mpbird 260	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 < (𝑠 + 1))
171	161, 165, 170	ltnsymd 10778	. . . . . . . . . . . . . . 15 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ¬ (𝑠 + 1) < 𝑛)
172	171	pm2.21d 121	. . . . . . . . . . . . . 14 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ((𝑠 + 1) < 𝑛 → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
173	172	ad2antrr 725	. . . . . . . . . . . . 13 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → ((𝑠 + 1) < 𝑛 → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
174	173	imp 410	. . . . . . . . . . . 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 7157	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏‘(𝑛 − 1)) = (𝑏‘(𝑖 − 1)))
177	176	fveq2d 6649	. . . . . . . . . . . . 13 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏‘(𝑛 − 1))) = (𝑇‘(𝑏‘(𝑖 − 1))))
178	175	fveq2d 6649	. . . . . . . . . . . . . . 15 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏‘𝑛) = (𝑏‘𝑖))
179	178	fveq2d 6649	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏‘𝑛)) = (𝑇‘(𝑏‘𝑖)))
180	179	oveq2d 7151	. . . . . . . . . . . . 13 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))) = ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))
181	177, 180	oveq12d 7153	. . . . . . . . . . . 12 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
182	174, 181	ifeqda 4460	. . . . . . . . . . 11 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
183	156, 182	ifeqda 4460	. . . . . . . . . 10 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
184	129, 183	ifeqda 4460	. . . . . . . . 9 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
185		ovexd 7170	. . . . . . . . 9 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))) ∈ V)
186	25, 184, 108, 185	fvmptd2 6753	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝐺‘𝑖) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
187	186	oveq2d 7151	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
188	187	mpteq2dva 5125	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))) = (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))))
189	188	oveq2d 7151	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))))
190		nn0p1gt0 11914	. . . . . . . . . . . . . 14 ⊢ (𝑠 ∈ ℕ₀ → 0 < (𝑠 + 1))
191		0red 10633	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 ∈ ℕ₀ → 0 ∈ ℝ)
192		ltne 10726	. . . . . . . . . . . . . . . 16 ⊢ ((0 ∈ ℝ ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
193	191, 192	sylan 583	. . . . . . . . . . . . . . 15 ⊢ ((𝑠 ∈ ℕ₀ ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
194		neeq1 3049	. . . . . . . . . . . . . . 15 ⊢ (𝑛 = (𝑠 + 1) → (𝑛 ≠ 0 ↔ (𝑠 + 1) ≠ 0))
195	193, 194	syl5ibrcom 250	. . . . . . . . . . . . . 14 ⊢ ((𝑠 ∈ ℕ₀ ∧ 0 < (𝑠 + 1)) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
196	34, 190, 195	syl2anc2 588	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℕ → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
197	196	ad2antrl 727	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
198	197	imp 410	. . . . . . . . . . 11 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) → 𝑛 ≠ 0)
199		eqneqall 2998	. . . . . . . . . . 11 ⊢ (𝑛 = 0 → (𝑛 ≠ 0 → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏‘𝑠))))
200	198, 199	mpan9 510	. . . . . . . . . 10 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ 𝑛 = 0) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏‘𝑠)))
201		iftrue 4431	. . . . . . . . . . 11 ⊢ (𝑛 = (𝑠 + 1) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) = (𝑇‘(𝑏‘𝑠)))
202	201	ad2antlr 726	. . . . . . . . . 10 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) = (𝑇‘(𝑏‘𝑠)))
203	200, 202	ifeqda 4460	. . . . . . . . 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 6660	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑇‘(𝑏‘𝑠)) ∈ V)
206	25, 203, 204, 205	fvmptd2 6753	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝐺‘(𝑠 + 1)) = (𝑇‘(𝑏‘𝑠)))
207	206	oveq2d 7151	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) = (((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))))
208	4	3ad2ant2 1131	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑅 ∈ Ring)
209		eqid 2798	. . . . . . . . . . . . . 14 ⊢ (Base‘𝑃) = (Base‘𝑃)
210	26, 7, 209	vr1cl 20846	. . . . . . . . . . . . 13 ⊢ (𝑅 ∈ Ring → 𝑋 ∈ (Base‘𝑃))
211	208, 210	syl 17	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑋 ∈ (Base‘𝑃))
212		eqid 2798	. . . . . . . . . . . . . 14 ⊢ (mulGrp‘𝑃) = (mulGrp‘𝑃)
213	212, 209	mgpbas 19238	. . . . . . . . . . . . 13 ⊢ (Base‘𝑃) = (Base‘(mulGrp‘𝑃))
214		eqid 2798	. . . . . . . . . . . . . 14 ⊢ (1_r‘𝑃) = (1_r‘𝑃)
215	212, 214	ringidval 19246	. . . . . . . . . . . . 13 ⊢ (1_r‘𝑃) = (0_g‘(mulGrp‘𝑃))
216	213, 215, 28	mulg0 18223	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ (Base‘𝑃) → (0 ↑ 𝑋) = (1_r‘𝑃))
217	211, 216	syl 17	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (0 ↑ 𝑋) = (1_r‘𝑃))
218	7	ply1crng 20827	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ CRing → 𝑃 ∈ CRing)
219	218	anim2i 619	. . . . . . . . . . . . . 14 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
220	219	3adant3 1129	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
221	8	matsca2 21025	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ Fin ∧ 𝑃 ∈ CRing) → 𝑃 = (Scalar‘𝑌))
222	220, 221	syl 17	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑃 = (Scalar‘𝑌))
223	222	fveq2d 6649	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (1_r‘𝑃) = (1_r‘(Scalar‘𝑌)))
224	217, 223	eqtrd 2833	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (0 ↑ 𝑋) = (1_r‘(Scalar‘𝑌)))
225	224	adantr 484	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (0 ↑ 𝑋) = (1_r‘(Scalar‘𝑌)))
226	225	oveq1d 7150	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((0 ↑ 𝑋) · (𝐺‘0)) = ((1_r‘(Scalar‘𝑌)) · (𝐺‘0)))
227	7, 8	pmatlmod 21298	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ LMod)
228	4, 227	sylan2 595	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ LMod)
229	228	3adant3 1129	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ LMod)
230	20, 21, 7, 8, 22, 23, 2, 24, 25	chfacfisf 21459	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝐺:ℕ₀⟶(Base‘𝑌))
231	4, 230	syl3anl2 1410	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝐺:ℕ₀⟶(Base‘𝑌))
232	231, 81	ffvelrnd 6829	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝐺‘0) ∈ (Base‘𝑌))
233		eqid 2798	. . . . . . . . . 10 ⊢ (Scalar‘𝑌) = (Scalar‘𝑌)
234		eqid 2798	. . . . . . . . . 10 ⊢ (1_r‘(Scalar‘𝑌)) = (1_r‘(Scalar‘𝑌))
235	1, 233, 27, 234	lmodvs1 19655	. . . . . . . . 9 ⊢ ((𝑌 ∈ LMod ∧ (𝐺‘0) ∈ (Base‘𝑌)) → ((1_r‘(Scalar‘𝑌)) · (𝐺‘0)) = (𝐺‘0))
236	229, 232, 235	syl2an2r 684	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((1_r‘(Scalar‘𝑌)) · (𝐺‘0)) = (𝐺‘0))
237		iftrue 4431	. . . . . . . . 9 ⊢ (𝑛 = 0 → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
238		ovexd 7170	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) ∈ V)
239	25, 237, 81, 238	fvmptd3 6768	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝐺‘0) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
240	226, 236, 239	3eqtrd 2837	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((0 ↑ 𝑋) · (𝐺‘0)) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
241	207, 240	oveq12d 7153	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 ↑ 𝑋) · (𝐺‘0))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) + ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
242	1, 3	cmncom 18915	. . . . . . 7 ⊢ ((𝑌 ∈ CMnd ∧ ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌) ∧ (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 ↑ 𝑋) · (𝐺‘0))))
243	13, 83, 96, 242	syl3anc 1368	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 ↑ 𝑋) · (𝐺‘0))))
244		ringgrp 19295	. . . . . . . . 9 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ Grp)
245	10, 244	syl 17	. . . . . . . 8 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Grp)
246	245	adantr 484	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑌 ∈ Grp)
247	207, 96	eqeltrrd 2891	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) ∈ (Base‘𝑌))
248	10	adantr 484	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑌 ∈ Ring)
249	24, 20, 21, 7, 8	mat2pmatbas 21331	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) → (𝑇‘𝑀) ∈ (Base‘𝑌))
250	4, 249	syl3an2 1161	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑇‘𝑀) ∈ (Base‘𝑌))
251	250	adantr 484	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑇‘𝑀) ∈ (Base‘𝑌))
252		simpl1 1188	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑁 ∈ Fin)
253	208	adantr 484	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑅 ∈ Ring)
254		elmapi 8411	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ (𝐵 ↑_m (0...𝑠)) → 𝑏:(0...𝑠)⟶𝐵)
255	254	adantl 485	. . . . . . . . . . 11 ⊢ ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠))) → 𝑏:(0...𝑠)⟶𝐵)
256	255	adantl 485	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 𝑏:(0...𝑠)⟶𝐵)
257		0elfz 12999	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ ℕ₀ → 0 ∈ (0...𝑠))
258	34, 257	syl 17	. . . . . . . . . . 11 ⊢ (𝑠 ∈ ℕ → 0 ∈ (0...𝑠))
259	258	ad2antrl 727	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → 0 ∈ (0...𝑠))
260	256, 259	ffvelrnd 6829	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑏‘0) ∈ 𝐵)
261	24, 20, 21, 7, 8	mat2pmatbas 21331	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘0) ∈ 𝐵) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
262	252, 253, 260, 261	syl3anc 1368	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
263	1, 22	ringcl 19307	. . . . . . . 8 ⊢ ((𝑌 ∈ Ring ∧ (𝑇‘𝑀) ∈ (Base‘𝑌) ∧ (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌)) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
264	248, 251, 262, 263	syl3anc 1368	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
265	1, 2, 23, 3	grpsubadd0sub 18178	. . . . . . 7 ⊢ ((𝑌 ∈ Grp ∧ (((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) ∈ (Base‘𝑌) ∧ ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌)) → ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) + ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
266	246, 247, 264, 265	syl3anc 1368	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) + ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
267	241, 243, 266	3eqtr4d 2843	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
268	189, 267	oveq12d 7153	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
269	113, 268	eqtrd 2833	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
270	75, 102, 269	3eqtrd 2837	. 2 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
271	40, 73, 270	3eqtrd 2837	1 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_m (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ ℕ₀ ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 209 ∧ wa 399 ∨ wo 844 ∧ w3a 1084 = wceq 1538 ∈ wcel 2111 ≠ wne 2987 Vcvv 3441 ∪ cun 3879 ∩ cin 3880 ∅c0 4243 ifcif 4425 {csn 4525 class class class wbr 5030 ↦ cmpt 5110 ⟶wf 6320 ‘cfv 6324 (class class class)co 7135 ↑_m cmap 8389 Fincfn 8492 ℂcc 10524 ℝcr 10525 0cc0 10526 1c1 10527 + caddc 10529 < clt 10664 ≤ cle 10665 − cmin 10859 ℕcn 11625 2c2 11680 ℕ₀cn0 11885 ℤcz 11969 ℤ_≥cuz 12231 ...cfz 12885 Basecbs 16475 +_gcplusg 16557 ._rcmulr 16558 Scalarcsca 16560 ·_𝑠 cvsca 16561 0_gc0g 16705 Σ_g cgsu 16706 Mndcmnd 17903 Grpcgrp 18095 -_gcsg 18097 ._gcmg 18216 CMndccmn 18898 mulGrpcmgp 19232 1_rcur 19244 Ringcrg 19290 CRingccrg 19291 LModclmod 19627 var₁cv1 20805 Poly₁cpl1 20806 Mat cmat 21012 matToPolyMat cmat2pmat 21309

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1797 ax-4 1811 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2113 ax-9 2121 ax-10 2142 ax-11 2158 ax-12 2175 ax-ext 2770 ax-rep 5154 ax-sep 5167 ax-nul 5174 ax-pow 5231 ax-pr 5295 ax-un 7441 ax-cnex 10582 ax-resscn 10583 ax-1cn 10584 ax-icn 10585 ax-addcl 10586 ax-addrcl 10587 ax-mulcl 10588 ax-mulrcl 10589 ax-mulcom 10590 ax-addass 10591 ax-mulass 10592 ax-distr 10593 ax-i2m1 10594 ax-1ne0 10595 ax-1rid 10596 ax-rnegex 10597 ax-rrecex 10598 ax-cnre 10599 ax-pre-lttri 10600 ax-pre-lttrn 10601 ax-pre-ltadd 10602 ax-pre-mulgt0 10603

This theorem depends on definitions: df-bi 210 df-an 400 df-or 845 df-3or 1085 df-3an 1086 df-tru 1541 df-fal 1551 df-ex 1782 df-nf 1786 df-sb 2070 df-mo 2598 df-eu 2629 df-clab 2777 df-cleq 2791 df-clel 2870 df-nfc 2938 df-ne 2988 df-nel 3092 df-ral 3111 df-rex 3112 df-reu 3113 df-rmo 3114 df-rab 3115 df-v 3443 df-sbc 3721 df-csb 3829 df-dif 3884 df-un 3886 df-in 3888 df-ss 3898 df-pss 3900 df-nul 4244 df-if 4426 df-pw 4499 df-sn 4526 df-pr 4528 df-tp 4530 df-op 4532 df-ot 4534 df-uni 4801 df-int 4839 df-iun 4883 df-iin 4884 df-br 5031 df-opab 5093 df-mpt 5111 df-tr 5137 df-id 5425 df-eprel 5430 df-po 5438 df-so 5439 df-fr 5478 df-se 5479 df-we 5480 df-xp 5525 df-rel 5526 df-cnv 5527 df-co 5528 df-dm 5529 df-rn 5530 df-res 5531 df-ima 5532 df-pred 6116 df-ord 6162 df-on 6163 df-lim 6164 df-suc 6165 df-iota 6283 df-fun 6326 df-fn 6327 df-f 6328 df-f1 6329 df-fo 6330 df-f1o 6331 df-fv 6332 df-isom 6333 df-riota 7093 df-ov 7138 df-oprab 7139 df-mpo 7140 df-of 7389 df-ofr 7390 df-om 7561 df-1st 7671 df-2nd 7672 df-supp 7814 df-wrecs 7930 df-recs 7991 df-rdg 8029 df-1o 8085 df-2o 8086 df-oadd 8089 df-er 8272 df-map 8391 df-pm 8392 df-ixp 8445 df-en 8493 df-dom 8494 df-sdom 8495 df-fin 8496 df-fsupp 8818 df-sup 8890 df-oi 8958 df-card 9352 df-pnf 10666 df-mnf 10667 df-xr 10668 df-ltxr 10669 df-le 10670 df-sub 10861 df-neg 10862 df-nn 11626 df-2 11688 df-3 11689 df-4 11690 df-5 11691 df-6 11692 df-7 11693 df-8 11694 df-9 11695 df-n0 11886 df-z 11970 df-dec 12087 df-uz 12232 df-rp 12378 df-fz 12886 df-fzo 13029 df-seq 13365 df-hash 13687 df-struct 16477 df-ndx 16478 df-slot 16479 df-base 16481 df-sets 16482 df-ress 16483 df-plusg 16570 df-mulr 16571 df-sca 16573 df-vsca 16574 df-ip 16575 df-tset 16576 df-ple 16577 df-ds 16579 df-hom 16581 df-cco 16582 df-0g 16707 df-gsum 16708 df-prds 16713 df-pws 16715 df-mre 16849 df-mrc 16850 df-acs 16852 df-mgm 17844 df-sgrp 17893 df-mnd 17904 df-mhm 17948 df-submnd 17949 df-grp 18098 df-minusg 18099 df-sbg 18100 df-mulg 18217 df-subg 18268 df-ghm 18348 df-cntz 18439 df-cmn 18900 df-abl 18901 df-mgp 19233 df-ur 19245 df-ring 19292 df-cring 19293 df-subrg 19526 df-lmod 19629 df-lss 19697 df-sra 19937 df-rgmod 19938 df-dsmm 20421 df-frlm 20436 df-ascl 20544 df-psr 20594 df-mvr 20595 df-mpl 20596 df-opsr 20598 df-psr1 20809 df-vr1 20810 df-ply1 20811 df-mamu 20991 df-mat 21013 df-mat2pmat 21312

This theorem is referenced by: cpmadugsum 21483

W3C validator