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 20665

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 ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (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 2622	. . 3 ⊢ (Base‘𝑌) = (Base‘𝑌)
2		chfacfisf.0	. . 3 ⊢ 0 = (0_g‘𝑌)
3		chfacfscmulgsum.p	. . 3 ⊢ + = (+_g‘𝑌)
4		crngring 18558	. . . . . . . 8 ⊢ (𝑅 ∈ CRing → 𝑅 ∈ Ring)
5	4	anim2i 593	. . . . . . 7 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
6	5	3adant3 1081	. . . . . 6 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
7		chfacfisf.p	. . . . . . 7 ⊢ 𝑃 = (Poly₁‘𝑅)
8		chfacfisf.y	. . . . . . 7 ⊢ 𝑌 = (𝑁 Mat 𝑃)
9	7, 8	pmatring 20498	. . . . . 6 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ Ring)
10	6, 9	syl 17	. . . . 5 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Ring)
11		ringcmn 18581	. . . . 5 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ CMnd)
12	10, 11	syl 17	. . . 4 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ CMnd)
13	12	adantr 481	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑌 ∈ CMnd)
14		nn0ex 11298	. . . 4 ⊢ ℕ₀ ∈ V
15	14	a1i 11	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ℕ₀ ∈ V)
16		simpll 790	. . . . 5 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵))
17		simplr 792	. . . . 5 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠))))
18		simpr 477	. . . . 5 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → 𝑖 ∈ ℕ₀)
19	16, 17, 18	3jca 1242	. . . 4 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (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 20662	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠))) ∧ 𝑖 ∈ ℕ₀) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
30	19, 29	syl 17	. . 3 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ ℕ₀) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
31	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmulfsupp 20664	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑖 ∈ ℕ₀ ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))) finSupp 0 )
32		nn0disj 12455	. . . 4 ⊢ ((0...(𝑠 + 1)) ∩ (ℤ_≥‘((𝑠 + 1) + 1))) = ∅
33	32	a1i 11	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((0...(𝑠 + 1)) ∩ (ℤ_≥‘((𝑠 + 1) + 1))) = ∅)
34		nnnn0 11299	. . . . . 6 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ ℕ₀)
35		peano2nn0 11333	. . . . . 6 ⊢ (𝑠 ∈ ℕ₀ → (𝑠 + 1) ∈ ℕ₀)
36	34, 35	syl 17	. . . . 5 ⊢ (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℕ₀)
37		nn0split 12454	. . . . 5 ⊢ ((𝑠 + 1) ∈ ℕ₀ → ℕ₀ = ((0...(𝑠 + 1)) ∪ (ℤ_≥‘((𝑠 + 1) + 1))))
38	36, 37	syl 17	. . . 4 ⊢ (𝑠 ∈ ℕ → ℕ₀ = ((0...(𝑠 + 1)) ∪ (ℤ_≥‘((𝑠 + 1) + 1))))
39	38	ad2antrl 764	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ℕ₀ = ((0...(𝑠 + 1)) ∪ (ℤ_≥‘((𝑠 + 1) + 1))))
40	1, 2, 3, 13, 15, 30, 31, 33, 39	gsumsplit2 18329	. 2 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ ℕ₀ ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))))
41		simpll 790	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵))
42		simplr 792	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠))))
43		nncn 11028	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ ℂ)
44		add1p1 11283	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℂ → ((𝑠 + 1) + 1) = (𝑠 + 2))
45	43, 44	syl 17	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ ℕ → ((𝑠 + 1) + 1) = (𝑠 + 2))
46	45	ad2antrl 764	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((𝑠 + 1) + 1) = (𝑠 + 2))
47	46	fveq2d 6195	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (ℤ_≥‘((𝑠 + 1) + 1)) = (ℤ_≥‘(𝑠 + 2)))
48	47	eleq2d 2687	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↔ 𝑖 ∈ (ℤ_≥‘(𝑠 + 2))))
49	48	biimpa 501	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → 𝑖 ∈ (ℤ_≥‘(𝑠 + 2)))
50	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmul0 20663	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠))) ∧ 𝑖 ∈ (ℤ_≥‘(𝑠 + 2))) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = 0 )
51	41, 42, 49, 50	syl3anc 1326	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1))) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = 0 )
52	51	mpteq2dva 4744	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))) = (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 ))
53	52	oveq2d 6666	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 )))
54	4, 9	sylan2 491	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Ring)
55		ringmnd 18556	. . . . . . . . . 10 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ Mnd)
56	54, 55	syl 17	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ Mnd)
57	56	3adant3 1081	. . . . . . . 8 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Mnd)
58		fvex 6201	. . . . . . . 8 ⊢ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V
59	57, 58	jctir 561	. . . . . . 7 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑌 ∈ Mnd ∧ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V))
60	59	adantr 481	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 ∈ Mnd ∧ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V))
61	2	gsumz 17374	. . . . . 6 ⊢ ((𝑌 ∈ Mnd ∧ (ℤ_≥‘((𝑠 + 1) + 1)) ∈ V) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 )) = 0 )
62	60, 61	syl 17	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ 0 )) = 0 )
63	53, 62	eqtrd 2656	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = 0 )
64	63	oveq2d 6666	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + 0 ))
65	57	adantr 481	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑌 ∈ Mnd)
66		fzfid 12772	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (0...(𝑠 + 1)) ∈ Fin)
67		elfznn0 12433	. . . . . . . 8 ⊢ (𝑖 ∈ (0...(𝑠 + 1)) → 𝑖 ∈ ℕ₀)
68	67, 19	sylan2 491	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (0...(𝑠 + 1))) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠))) ∧ 𝑖 ∈ ℕ₀))
69	68, 29	syl 17	. . . . . 6 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (0...(𝑠 + 1))) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
70	69	ralrimiva 2966	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ∀𝑖 ∈ (0...(𝑠 + 1))((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
71	1, 13, 66, 70	gsummptcl 18366	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌))
72	1, 3, 2	mndrid 17312	. . . 4 ⊢ ((𝑌 ∈ Mnd ∧ (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌)) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + 0 ) = (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))))
73	65, 71, 72	syl2anc 693	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + 0 ) = (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))))
74	64, 73	eqtrd 2656	. 2 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ (ℤ_≥‘((𝑠 + 1) + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))))
75	34	ad2antrl 764	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑠 ∈ ℕ₀)
76	1, 3, 13, 75, 69	gsummptfzsplit 18332	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))))
77		elfznn0 12433	. . . . . . 7 ⊢ (𝑖 ∈ (0...𝑠) → 𝑖 ∈ ℕ₀)
78	77, 30	sylan2 491	. . . . . 6 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (0...𝑠)) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
79	1, 3, 13, 75, 78	gsummptfzsplitl 18333	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))))
80		0nn0 11307	. . . . . . . 8 ⊢ 0 ∈ ℕ₀
81	80	a1i 11	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 0 ∈ ℕ₀)
82	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmulcl 20662	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠))) ∧ 0 ∈ ℕ₀) → ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌))
83	81, 82	mpd3an3 1425	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌))
84		oveq1 6657	. . . . . . . . 9 ⊢ (𝑖 = 0 → (𝑖 ↑ 𝑋) = (0 ↑ 𝑋))
85		fveq2 6191	. . . . . . . . 9 ⊢ (𝑖 = 0 → (𝐺‘𝑖) = (𝐺‘0))
86	84, 85	oveq12d 6668	. . . . . . . 8 ⊢ (𝑖 = 0 → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = ((0 ↑ 𝑋) · (𝐺‘0)))
87	1, 86	gsumsn 18354	. . . . . . 7 ⊢ ((𝑌 ∈ Mnd ∧ 0 ∈ ℕ₀ ∧ ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌)) → (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((0 ↑ 𝑋) · (𝐺‘0)))
88	65, 81, 83, 87	syl3anc 1326	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((0 ↑ 𝑋) · (𝐺‘0)))
89	88	oveq2d 6666	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {0} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))))
90	79, 89	eqtrd 2656	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))))
91		ovexd 6680	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ V)
92		1nn0 11308	. . . . . . . 8 ⊢ 1 ∈ ℕ₀
93	92	a1i 11	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 1 ∈ ℕ₀)
94	75, 93	nn0addcld 11355	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ ℕ₀)
95	20, 21, 7, 8, 22, 23, 2, 24, 25, 26, 27, 28	chfacfscmulcl 20662	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠))) ∧ (𝑠 + 1) ∈ ℕ₀) → (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
96	94, 95	mpd3an3 1425	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))
97		oveq1 6657	. . . . . . 7 ⊢ (𝑖 = (𝑠 + 1) → (𝑖 ↑ 𝑋) = ((𝑠 + 1) ↑ 𝑋))
98		fveq2 6191	. . . . . . 7 ⊢ (𝑖 = (𝑠 + 1) → (𝐺‘𝑖) = (𝐺‘(𝑠 + 1)))
99	97, 98	oveq12d 6668	. . . . . 6 ⊢ (𝑖 = (𝑠 + 1) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))
100	1, 99	gsumsn 18354	. . . . 5 ⊢ ((𝑌 ∈ Mnd ∧ (𝑠 + 1) ∈ V ∧ (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))
101	65, 91, 96, 100	syl3anc 1326	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))
102	90, 101	oveq12d 6668	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (0...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (𝑌 Σ_g (𝑖 ∈ {(𝑠 + 1)} ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))))) = (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))))
103		fzfid 12772	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (1...𝑠) ∈ Fin)
104		simpll 790	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵))
105		simplr 792	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠))))
106		elfznn 12370	. . . . . . . . . 10 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ)
107	106	nnnn0d 11351	. . . . . . . . 9 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℕ₀)
108	107	adantl 482	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → 𝑖 ∈ ℕ₀)
109	104, 105, 108, 29	syl3anc 1326	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
110	109	ralrimiva 2966	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ∀𝑖 ∈ (1...𝑠)((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) ∈ (Base‘𝑌))
111	1, 13, 103, 110	gsummptcl 18366	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌))
112	1, 3	mndass 17302	. . . . 5 ⊢ ((𝑌 ∈ Mnd ∧ ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) ∈ (Base‘𝑌) ∧ ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌) ∧ (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌))) → (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))))
113	65, 111, 83, 96, 112	syl13anc 1328	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))))
114	25	a1i 11	. . . . . . . . 9 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → 𝐺 = (𝑛 ∈ ℕ₀ ↦ if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))))))
115	106	nnne0d 11065	. . . . . . . . . . . . . 14 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ≠ 0)
116	115	ad2antlr 763	. . . . . . . . . . . . 13 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ 0)
117		neeq1 2856	. . . . . . . . . . . . . 14 ⊢ (𝑛 = 𝑖 → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
118	117	adantl 482	. . . . . . . . . . . . 13 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ 0 ↔ 𝑖 ≠ 0))
119	116, 118	mpbird 247	. . . . . . . . . . . 12 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ 0)
120		eqneqall 2805	. . . . . . . . . . . 12 ⊢ (𝑛 = 0 → (𝑛 ≠ 0 → 0 = (𝑇‘(𝑏‘(𝑖 − 1)))))
121	119, 120	mpan9 486	. . . . . . . . . . 11 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = (𝑇‘(𝑏‘(𝑖 − 1))))
122		simplr 792	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 𝑛 = 𝑖)
123		eqeq1 2626	. . . . . . . . . . . . . . . . 17 ⊢ (0 = 𝑛 → (0 = 𝑖 ↔ 𝑛 = 𝑖))
124	123	eqcoms 2630	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = 0 → (0 = 𝑖 ↔ 𝑛 = 𝑖))
125	124	adantl 482	. . . . . . . . . . . . . . 15 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (0 = 𝑖 ↔ 𝑛 = 𝑖))
126	122, 125	mpbird 247	. . . . . . . . . . . . . 14 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → 0 = 𝑖)
127	126	fveq2d 6195	. . . . . . . . . . . . 13 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑏‘0) = (𝑏‘𝑖))
128	127	fveq2d 6195	. . . . . . . . . . . 12 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → (𝑇‘(𝑏‘0)) = (𝑇‘(𝑏‘𝑖)))
129	128	oveq2d 6666	. . . . . . . . . . 11 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) = ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))
130	121, 129	oveq12d 6668	. . . . . . . . . 10 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ 𝑛 = 0) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
131		elfz2 12333	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ (1...𝑠) ↔ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)))
132		zleltp1 11428	. . . . . . . . . . . . . . . . . . . . . . . . 25 ⊢ ((𝑖 ∈ ℤ ∧ 𝑠 ∈ ℤ) → (𝑖 ≤ 𝑠 ↔ 𝑖 < (𝑠 + 1)))
133	132	ancoms 469	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≤ 𝑠 ↔ 𝑖 < (𝑠 + 1)))
134	133	3adant1 1079	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≤ 𝑠 ↔ 𝑖 < (𝑠 + 1)))
135	134	biimpcd 239	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ (𝑖 ≤ 𝑠 → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
136	135	adantl 482	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠) → ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → 𝑖 < (𝑠 + 1)))
137	136	impcom 446	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → 𝑖 < (𝑠 + 1))
138	137	orcd 407	. . . . . . . . . . . . . . . . . . 19 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖))
139		zre 11381	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑠 ∈ ℤ → 𝑠 ∈ ℝ)
140		1red 10055	. . . . . . . . . . . . . . . . . . . . . . . 24 ⊢ (𝑠 ∈ ℤ → 1 ∈ ℝ)
141	139, 140	readdcld 10069	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑠 ∈ ℤ → (𝑠 + 1) ∈ ℝ)
142		zre 11381	. . . . . . . . . . . . . . . . . . . . . . 23 ⊢ (𝑖 ∈ ℤ → 𝑖 ∈ ℝ)
143	141, 142	anim12ci 591	. . . . . . . . . . . . . . . . . . . . . 22 ⊢ ((𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
144	143	3adant1 1079	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ))
145		lttri2 10120	. . . . . . . . . . . . . . . . . . . . 21 ⊢ ((𝑖 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
146	144, 145	syl 17	. . . . . . . . . . . . . . . . . . . 20 ⊢ ((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
147	146	adantr 481	. . . . . . . . . . . . . . . . . . 19 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → (𝑖 ≠ (𝑠 + 1) ↔ (𝑖 < (𝑠 + 1) ∨ (𝑠 + 1) < 𝑖)))
148	138, 147	mpbird 247	. . . . . . . . . . . . . . . . . 18 ⊢ (((1 ∈ ℤ ∧ 𝑠 ∈ ℤ ∧ 𝑖 ∈ ℤ) ∧ (1 ≤ 𝑖 ∧ 𝑖 ≤ 𝑠)) → 𝑖 ≠ (𝑠 + 1))
149	131, 148	sylbi 207	. . . . . . . . . . . . . . . . 17 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ≠ (𝑠 + 1))
150	149	ad2antlr 763	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 ≠ (𝑠 + 1))
151		neeq1 2856	. . . . . . . . . . . . . . . . 17 ⊢ (𝑛 = 𝑖 → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
152	151	adantl 482	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 ≠ (𝑠 + 1) ↔ 𝑖 ≠ (𝑠 + 1)))
153	150, 152	mpbird 247	. . . . . . . . . . . . . . 15 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ≠ (𝑠 + 1))
154	153	adantr 481	. . . . . . . . . . . . . 14 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → 𝑛 ≠ (𝑠 + 1))
155	154	neneqd 2799	. . . . . . . . . . . . 13 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → ¬ 𝑛 = (𝑠 + 1))
156	155	pm2.21d 118	. . . . . . . . . . . 12 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → (𝑛 = (𝑠 + 1) → (𝑇‘(𝑏‘𝑠)) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
157	156	imp 445	. . . . . . . . . . 11 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ 𝑛 = (𝑠 + 1)) → (𝑇‘(𝑏‘𝑠)) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
158	106	nnred 11035	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 ∈ ℝ)
159		eleq1 2689	. . . . . . . . . . . . . . . . . . 19 ⊢ (𝑛 = 𝑖 → (𝑛 ∈ ℝ ↔ 𝑖 ∈ ℝ))
160	158, 159	syl5ibrcom 237	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ (1...𝑠) → (𝑛 = 𝑖 → 𝑛 ∈ ℝ))
161	160	adantl 482	. . . . . . . . . . . . . . . . 17 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝑛 = 𝑖 → 𝑛 ∈ ℝ))
162	161	imp 445	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 ∈ ℝ)
163	75	nn0red 11352	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑠 ∈ ℝ)
164	163	ad2antrr 762	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑠 ∈ ℝ)
165		1red 10055	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 1 ∈ ℝ)
166	164, 165	readdcld 10069	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑠 + 1) ∈ ℝ)
167	131, 137	sylbi 207	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑖 ∈ (1...𝑠) → 𝑖 < (𝑠 + 1))
168	167	ad2antlr 763	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑖 < (𝑠 + 1))
169		breq1 4656	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 = 𝑖 → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
170	169	adantl 482	. . . . . . . . . . . . . . . . 17 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → (𝑛 < (𝑠 + 1) ↔ 𝑖 < (𝑠 + 1)))
171	168, 170	mpbird 247	. . . . . . . . . . . . . . . 16 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → 𝑛 < (𝑠 + 1))
172	162, 166, 171	ltnsymd 10186	. . . . . . . . . . . . . . 15 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ¬ (𝑠 + 1) < 𝑛)
173	172	pm2.21d 118	. . . . . . . . . . . . . 14 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → ((𝑠 + 1) < 𝑛 → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
174	173	ad2antrr 762	. . . . . . . . . . . . 13 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → ((𝑠 + 1) < 𝑛 → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
175	174	imp 445	. . . . . . . . . . . 12 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ (𝑠 + 1) < 𝑛) → 0 = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
176		simp-4r 807	. . . . . . . . . . . . . . . 16 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → 𝑛 = 𝑖)
177	176	oveq1d 6665	. . . . . . . . . . . . . . 15 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑛 − 1) = (𝑖 − 1))
178	177	fveq2d 6195	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏‘(𝑛 − 1)) = (𝑏‘(𝑖 − 1)))
179	178	fveq2d 6195	. . . . . . . . . . . . 13 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏‘(𝑛 − 1))) = (𝑇‘(𝑏‘(𝑖 − 1))))
180	176	fveq2d 6195	. . . . . . . . . . . . . . 15 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑏‘𝑛) = (𝑏‘𝑖))
181	180	fveq2d 6195	. . . . . . . . . . . . . 14 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → (𝑇‘(𝑏‘𝑛)) = (𝑇‘(𝑏‘𝑖)))
182	181	oveq2d 6666	. . . . . . . . . . . . 13 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))) = ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))
183	179, 182	oveq12d 6668	. . . . . . . . . . . 12 ⊢ ((((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
184	175, 183	ifeqda 4121	. . . . . . . . . . 11 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
185	157, 184	ifeqda 4121	. . . . . . . . . 10 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
186	130, 185	ifeqda 4121	. . . . . . . . 9 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) ∧ 𝑛 = 𝑖) → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
187		ovexd 6680	. . . . . . . . 9 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))) ∈ V)
188	114, 186, 108, 187	fvmptd 6288	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → (𝐺‘𝑖) = ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))
189	188	oveq2d 6666	. . . . . . 7 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑖 ∈ (1...𝑠)) → ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)) = ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))
190	189	mpteq2dva 4744	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖))) = (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖)))))))
191	190	oveq2d 6666	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = (𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))))
192	25	a1i 11	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝐺 = (𝑛 ∈ ℕ₀ ↦ if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))))))
193		nn0p1gt0 11322	. . . . . . . . . . . . . . 15 ⊢ (𝑠 ∈ ℕ₀ → 0 < (𝑠 + 1))
194		0red 10041	. . . . . . . . . . . . . . . . 17 ⊢ (𝑠 ∈ ℕ₀ → 0 ∈ ℝ)
195		ltne 10134	. . . . . . . . . . . . . . . . 17 ⊢ ((0 ∈ ℝ ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
196	194, 195	sylan 488	. . . . . . . . . . . . . . . 16 ⊢ ((𝑠 ∈ ℕ₀ ∧ 0 < (𝑠 + 1)) → (𝑠 + 1) ≠ 0)
197		neeq1 2856	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 = (𝑠 + 1) → (𝑛 ≠ 0 ↔ (𝑠 + 1) ≠ 0))
198	196, 197	syl5ibrcom 237	. . . . . . . . . . . . . . 15 ⊢ ((𝑠 ∈ ℕ₀ ∧ 0 < (𝑠 + 1)) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
199	193, 198	mpdan 702	. . . . . . . . . . . . . 14 ⊢ (𝑠 ∈ ℕ₀ → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
200	34, 199	syl 17	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℕ → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
201	200	ad2antrl 764	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑛 = (𝑠 + 1) → 𝑛 ≠ 0))
202	201	imp 445	. . . . . . . . . . 11 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) → 𝑛 ≠ 0)
203		eqneqall 2805	. . . . . . . . . . 11 ⊢ (𝑛 = 0 → (𝑛 ≠ 0 → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏‘𝑠))))
204	202, 203	mpan9 486	. . . . . . . . . 10 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ 𝑛 = 0) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = (𝑇‘(𝑏‘𝑠)))
205		iftrue 4092	. . . . . . . . . . 11 ⊢ (𝑛 = (𝑠 + 1) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) = (𝑇‘(𝑏‘𝑠)))
206	205	ad2antlr 763	. . . . . . . . . 10 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) = (𝑇‘(𝑏‘𝑠)))
207	204, 206	ifeqda 4121	. . . . . . . . 9 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑛 = (𝑠 + 1)) → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) = (𝑇‘(𝑏‘𝑠)))
208	75, 35	syl 17	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ ℕ₀)
209		fvexd 6203	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑇‘(𝑏‘𝑠)) ∈ V)
210	192, 207, 208, 209	fvmptd 6288	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝐺‘(𝑠 + 1)) = (𝑇‘(𝑏‘𝑠)))
211	210	oveq2d 6666	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) = (((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))))
212	4	3ad2ant2 1083	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑅 ∈ Ring)
213		eqid 2622	. . . . . . . . . . . . . 14 ⊢ (Base‘𝑃) = (Base‘𝑃)
214	26, 7, 213	vr1cl 19587	. . . . . . . . . . . . 13 ⊢ (𝑅 ∈ Ring → 𝑋 ∈ (Base‘𝑃))
215	212, 214	syl 17	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑋 ∈ (Base‘𝑃))
216		eqid 2622	. . . . . . . . . . . . . 14 ⊢ (mulGrp‘𝑃) = (mulGrp‘𝑃)
217	216, 213	mgpbas 18495	. . . . . . . . . . . . 13 ⊢ (Base‘𝑃) = (Base‘(mulGrp‘𝑃))
218		eqid 2622	. . . . . . . . . . . . . 14 ⊢ (1_r‘𝑃) = (1_r‘𝑃)
219	216, 218	ringidval 18503	. . . . . . . . . . . . 13 ⊢ (1_r‘𝑃) = (0_g‘(mulGrp‘𝑃))
220	217, 219, 28	mulg0 17546	. . . . . . . . . . . 12 ⊢ (𝑋 ∈ (Base‘𝑃) → (0 ↑ 𝑋) = (1_r‘𝑃))
221	215, 220	syl 17	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (0 ↑ 𝑋) = (1_r‘𝑃))
222	7	ply1crng 19568	. . . . . . . . . . . . . . 15 ⊢ (𝑅 ∈ CRing → 𝑃 ∈ CRing)
223	222	anim2i 593	. . . . . . . . . . . . . 14 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
224	223	3adant3 1081	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
225	8	matsca2 20226	. . . . . . . . . . . . 13 ⊢ ((𝑁 ∈ Fin ∧ 𝑃 ∈ CRing) → 𝑃 = (Scalar‘𝑌))
226	224, 225	syl 17	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑃 = (Scalar‘𝑌))
227	226	fveq2d 6195	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (1_r‘𝑃) = (1_r‘(Scalar‘𝑌)))
228	221, 227	eqtrd 2656	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (0 ↑ 𝑋) = (1_r‘(Scalar‘𝑌)))
229	228	adantr 481	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (0 ↑ 𝑋) = (1_r‘(Scalar‘𝑌)))
230	229	oveq1d 6665	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((0 ↑ 𝑋) · (𝐺‘0)) = ((1_r‘(Scalar‘𝑌)) · (𝐺‘0)))
231	7, 8	pmatlmod 20499	. . . . . . . . . . . 12 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ LMod)
232	4, 231	sylan2 491	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ LMod)
233	232	3adant3 1081	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ LMod)
234	233	adantr 481	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑌 ∈ LMod)
235	20, 21, 7, 8, 22, 23, 2, 24, 25	chfacfisf 20659	. . . . . . . . . . 11 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝐺:ℕ₀⟶(Base‘𝑌))
236	4, 235	syl3anl2 1375	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝐺:ℕ₀⟶(Base‘𝑌))
237	236, 81	ffvelrnd 6360	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝐺‘0) ∈ (Base‘𝑌))
238		eqid 2622	. . . . . . . . . 10 ⊢ (Scalar‘𝑌) = (Scalar‘𝑌)
239		eqid 2622	. . . . . . . . . 10 ⊢ (1_r‘(Scalar‘𝑌)) = (1_r‘(Scalar‘𝑌))
240	1, 238, 27, 239	lmodvs1 18891	. . . . . . . . 9 ⊢ ((𝑌 ∈ LMod ∧ (𝐺‘0) ∈ (Base‘𝑌)) → ((1_r‘(Scalar‘𝑌)) · (𝐺‘0)) = (𝐺‘0))
241	234, 237, 240	syl2anc 693	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((1_r‘(Scalar‘𝑌)) · (𝐺‘0)) = (𝐺‘0))
242		iftrue 4092	. . . . . . . . . 10 ⊢ (𝑛 = 0 → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
243	242	adantl 482	. . . . . . . . 9 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) ∧ 𝑛 = 0) → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
244		ovexd 6680	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) ∈ V)
245	192, 243, 81, 244	fvmptd 6288	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝐺‘0) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
246	230, 241, 245	3eqtrd 2660	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((0 ↑ 𝑋) · (𝐺‘0)) = ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
247	211, 246	oveq12d 6668	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 ↑ 𝑋) · (𝐺‘0))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) + ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
248	1, 3	cmncom 18209	. . . . . . 7 ⊢ ((𝑌 ∈ CMnd ∧ ((0 ↑ 𝑋) · (𝐺‘0)) ∈ (Base‘𝑌) ∧ (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) ∈ (Base‘𝑌)) → (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 ↑ 𝑋) · (𝐺‘0))))
249	13, 83, 96, 248	syl3anc 1326	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))) + ((0 ↑ 𝑋) · (𝐺‘0))))
250		ringgrp 18552	. . . . . . . . 9 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ Grp)
251	10, 250	syl 17	. . . . . . . 8 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Grp)
252	251	adantr 481	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑌 ∈ Grp)
253	211, 96	eqeltrrd 2702	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) ∈ (Base‘𝑌))
254	10	adantr 481	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑌 ∈ Ring)
255	24, 20, 21, 7, 8	mat2pmatbas 20531	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) → (𝑇‘𝑀) ∈ (Base‘𝑌))
256	4, 255	syl3an2 1360	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) → (𝑇‘𝑀) ∈ (Base‘𝑌))
257	256	adantr 481	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑇‘𝑀) ∈ (Base‘𝑌))
258		simpl1 1064	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑁 ∈ Fin)
259	212	adantr 481	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑅 ∈ Ring)
260		elmapi 7879	. . . . . . . . . . . 12 ⊢ (𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)) → 𝑏:(0...𝑠)⟶𝐵)
261	260	adantl 482	. . . . . . . . . . 11 ⊢ ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠))) → 𝑏:(0...𝑠)⟶𝐵)
262	261	adantl 482	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 𝑏:(0...𝑠)⟶𝐵)
263		0elfz 12436	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ ℕ₀ → 0 ∈ (0...𝑠))
264	34, 263	syl 17	. . . . . . . . . . 11 ⊢ (𝑠 ∈ ℕ → 0 ∈ (0...𝑠))
265	264	ad2antrl 764	. . . . . . . . . 10 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → 0 ∈ (0...𝑠))
266	262, 265	ffvelrnd 6360	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑏‘0) ∈ 𝐵)
267	24, 20, 21, 7, 8	mat2pmatbas 20531	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘0) ∈ 𝐵) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
268	258, 259, 266, 267	syl3anc 1326	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
269	1, 22	ringcl 18561	. . . . . . . 8 ⊢ ((𝑌 ∈ Ring ∧ (𝑇‘𝑀) ∈ (Base‘𝑌) ∧ (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌)) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
270	254, 257, 268, 269	syl3anc 1326	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
271	1, 2, 23, 3	grpsubadd0sub 17502	. . . . . . 7 ⊢ ((𝑌 ∈ Grp ∧ (((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) ∈ (Base‘𝑌) ∧ ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌)) → ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) + ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
272	252, 253, 270, 271	syl3anc 1326	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) + ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
273	247, 249, 272	3eqtr4d 2666	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))))
274	191, 273	oveq12d 6668	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + (((0 ↑ 𝑋) · (𝐺‘0)) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1))))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
275	113, 274	eqtrd 2656	. . 3 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) + ((0 ↑ 𝑋) · (𝐺‘0))) + (((𝑠 + 1) ↑ 𝑋) · (𝐺‘(𝑠 + 1)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
276	76, 102, 275	3eqtrd 2660	. 2 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ (0...(𝑠 + 1)) ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))
277	40, 74, 276	3eqtrd 2660	1 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑_𝑚 (0...𝑠)))) → (𝑌 Σ_g (𝑖 ∈ ℕ₀ ↦ ((𝑖 ↑ 𝑋) · (𝐺‘𝑖)))) = ((𝑌 Σ_g (𝑖 ∈ (1...𝑠) ↦ ((𝑖 ↑ 𝑋) · ((𝑇‘(𝑏‘(𝑖 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑖))))))) + ((((𝑠 + 1) ↑ 𝑋) · (𝑇‘(𝑏‘𝑠))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))))))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ↔ wb 196 ∨ wo 383 ∧ wa 384 ∧ w3a 1037 = wceq 1483 ∈ wcel 1990 ≠ wne 2794 Vcvv 3200 ∪ cun 3572 ∩ cin 3573 ∅c0 3915 ifcif 4086 {csn 4177 class class class wbr 4653 ↦ cmpt 4729 ⟶wf 5884 ‘cfv 5888 (class class class)co 6650 ↑_𝑚 cmap 7857 Fincfn 7955 ℂcc 9934 ℝcr 9935 0cc0 9936 1c1 9937 + caddc 9939 < clt 10074 ≤ cle 10075 − cmin 10266 ℕcn 11020 2c2 11070 ℕ₀cn0 11292 ℤcz 11377 ℤ_≥cuz 11687 ...cfz 12326 Basecbs 15857 +_gcplusg 15941 ._rcmulr 15942 Scalarcsca 15944 ·_𝑠 cvsca 15945 0_gc0g 16100 Σ_g cgsu 16101 Mndcmnd 17294 Grpcgrp 17422 -_gcsg 17424 ._gcmg 17540 CMndccmn 18193 mulGrpcmgp 18489 1_rcur 18501 Ringcrg 18547 CRingccrg 18548 LModclmod 18863 var₁cv1 19546 Poly₁cpl1 19547 Mat cmat 20213 matToPolyMat cmat2pmat 20509

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1722 ax-4 1737 ax-5 1839 ax-6 1888 ax-7 1935 ax-8 1992 ax-9 1999 ax-10 2019 ax-11 2034 ax-12 2047 ax-13 2246 ax-ext 2602 ax-rep 4771 ax-sep 4781 ax-nul 4789 ax-pow 4843 ax-pr 4906 ax-un 6949 ax-inf2 8538 ax-cnex 9992 ax-resscn 9993 ax-1cn 9994 ax-icn 9995 ax-addcl 9996 ax-addrcl 9997 ax-mulcl 9998 ax-mulrcl 9999 ax-mulcom 10000 ax-addass 10001 ax-mulass 10002 ax-distr 10003 ax-i2m1 10004 ax-1ne0 10005 ax-1rid 10006 ax-rnegex 10007 ax-rrecex 10008 ax-cnre 10009 ax-pre-lttri 10010 ax-pre-lttrn 10011 ax-pre-ltadd 10012 ax-pre-mulgt0 10013

This theorem depends on definitions: df-bi 197 df-or 385 df-an 386 df-3or 1038 df-3an 1039 df-tru 1486 df-fal 1489 df-ex 1705 df-nf 1710 df-sb 1881 df-eu 2474 df-mo 2475 df-clab 2609 df-cleq 2615 df-clel 2618 df-nfc 2753 df-ne 2795 df-nel 2898 df-ral 2917 df-rex 2918 df-reu 2919 df-rmo 2920 df-rab 2921 df-v 3202 df-sbc 3436 df-csb 3534 df-dif 3577 df-un 3579 df-in 3581 df-ss 3588 df-pss 3590 df-nul 3916 df-if 4087 df-pw 4160 df-sn 4178 df-pr 4180 df-tp 4182 df-op 4184 df-ot 4186 df-uni 4437 df-int 4476 df-iun 4522 df-iin 4523 df-br 4654 df-opab 4713 df-mpt 4730 df-tr 4753 df-id 5024 df-eprel 5029 df-po 5035 df-so 5036 df-fr 5073 df-se 5074 df-we 5075 df-xp 5120 df-rel 5121 df-cnv 5122 df-co 5123 df-dm 5124 df-rn 5125 df-res 5126 df-ima 5127 df-pred 5680 df-ord 5726 df-on 5727 df-lim 5728 df-suc 5729 df-iota 5851 df-fun 5890 df-fn 5891 df-f 5892 df-f1 5893 df-fo 5894 df-f1o 5895 df-fv 5896 df-isom 5897 df-riota 6611 df-ov 6653 df-oprab 6654 df-mpt2 6655 df-of 6897 df-ofr 6898 df-om 7066 df-1st 7168 df-2nd 7169 df-supp 7296 df-wrecs 7407 df-recs 7468 df-rdg 7506 df-1o 7560 df-2o 7561 df-oadd 7564 df-er 7742 df-map 7859 df-pm 7860 df-ixp 7909 df-en 7956 df-dom 7957 df-sdom 7958 df-fin 7959 df-fsupp 8276 df-sup 8348 df-oi 8415 df-card 8765 df-pnf 10076 df-mnf 10077 df-xr 10078 df-ltxr 10079 df-le 10080 df-sub 10268 df-neg 10269 df-nn 11021 df-2 11079 df-3 11080 df-4 11081 df-5 11082 df-6 11083 df-7 11084 df-8 11085 df-9 11086 df-n0 11293 df-z 11378 df-dec 11494 df-uz 11688 df-rp 11833 df-fz 12327 df-fzo 12466 df-seq 12802 df-hash 13118 df-struct 15859 df-ndx 15860 df-slot 15861 df-base 15863 df-sets 15864 df-ress 15865 df-plusg 15954 df-mulr 15955 df-sca 15957 df-vsca 15958 df-ip 15959 df-tset 15960 df-ple 15961 df-ds 15964 df-hom 15966 df-cco 15967 df-0g 16102 df-gsum 16103 df-prds 16108 df-pws 16110 df-mre 16246 df-mrc 16247 df-acs 16249 df-mgm 17242 df-sgrp 17284 df-mnd 17295 df-mhm 17335 df-submnd 17336 df-grp 17425 df-minusg 17426 df-sbg 17427 df-mulg 17541 df-subg 17591 df-ghm 17658 df-cntz 17750 df-cmn 18195 df-abl 18196 df-mgp 18490 df-ur 18502 df-ring 18549 df-cring 18550 df-subrg 18778 df-lmod 18865 df-lss 18933 df-sra 19172 df-rgmod 19173 df-ascl 19314 df-psr 19356 df-mvr 19357 df-mpl 19358 df-opsr 19360 df-psr1 19550 df-vr1 19551 df-ply1 19552 df-dsmm 20076 df-frlm 20091 df-mamu 20190 df-mat 20214 df-mat2pmat 20512

This theorem is referenced by: cpmadugsum 20683

W3C validator