Theorem chfacfisf 22980

Description: The "characteristic factor function" is a function from the nonnegative integers to polynomial matrices. (Contributed by AV, 8-Nov-2019.)

Hypotheses

Ref	Expression
chfacfisf.a	⊢ 𝐴 = (𝑁 Mat 𝑅)
chfacfisf.b	⊢ 𝐵 = (Base‘𝐴)
chfacfisf.p	⊢ 𝑃 = (Poly1‘𝑅)
chfacfisf.y	⊢ 𝑌 = (𝑁 Mat 𝑃)
chfacfisf.r	⊢ × = (.r‘𝑌)
chfacfisf.s	⊢ − = (-g‘𝑌)
chfacfisf.0	⊢ 0 = (0g‘𝑌)
chfacfisf.t	⊢ 𝑇 = (𝑁 matToPolyMat 𝑅)
chfacfisf.g	⊢ 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))))

Assertion

Ref	Expression
chfacfisf	⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → 𝐺:ℕ0⟶(Base‘𝑌))

Distinct variable groups:   𝐵,𝑛   𝑛,𝑀   𝑛,𝑁   𝑅,𝑛   𝑛,𝑌   𝑛,𝑏   𝑛,𝑠

Allowed substitution hints:   𝐴(𝑛,𝑠,𝑏)   𝐵(𝑠,𝑏)   𝑃(𝑛,𝑠,𝑏)   𝑅(𝑠,𝑏)   𝑇(𝑛,𝑠,𝑏)   × (𝑛,𝑠,𝑏)   𝐺(𝑛,𝑠,𝑏)   𝑀(𝑠,𝑏)   − (𝑛,𝑠,𝑏)   𝑁(𝑠,𝑏)   𝑌(𝑠,𝑏)   0 (𝑛,𝑠,𝑏)

Proof of Theorem chfacfisf

Step	Hyp	Ref	Expression
1		chfacfisf.p	. . . . . . . . 9 ⊢ 𝑃 = (Poly1‘𝑅)
2		chfacfisf.y	. . . . . . . . 9 ⊢ 𝑌 = (𝑁 Mat 𝑃)
3	1, 2	pmatring 22818	. . . . . . . 8 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ Ring)
4	3	3adant3 1148	. . . . . . 7 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Ring)
5		ringgrp 20320	. . . . . . 7 ⊢ (𝑌 ∈ Ring → 𝑌 ∈ Grp)
6	4, 5	syl 18	. . . . . 6 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Grp)
7	6	adantr 485	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → 𝑌 ∈ Grp)
8		eqid 2769	. . . . . . . 8 ⊢ (Base‘𝑌) = (Base‘𝑌)
9		chfacfisf.0	. . . . . . . 8 ⊢ 0 = (0g‘𝑌)
10	8, 9	ring0cl 20350	. . . . . . 7 ⊢ (𝑌 ∈ Ring → 0 ∈ (Base‘𝑌))
11	4, 10	syl 18	. . . . . 6 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) → 0 ∈ (Base‘𝑌))
12	11	adantr 485	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → 0 ∈ (Base‘𝑌))
13	4	adantr 485	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → 𝑌 ∈ Ring)
14		chfacfisf.t	. . . . . . . 8 ⊢ 𝑇 = (𝑁 matToPolyMat 𝑅)
15		chfacfisf.a	. . . . . . . 8 ⊢ 𝐴 = (𝑁 Mat 𝑅)
16		chfacfisf.b	. . . . . . . 8 ⊢ 𝐵 = (Base‘𝐴)
17	14, 15, 16, 1, 2	mat2pmatbas 22852	. . . . . . 7 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) → (𝑇‘𝑀) ∈ (Base‘𝑌))
18	17	adantr 485	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → (𝑇‘𝑀) ∈ (Base‘𝑌))
19		3simpa 1164	. . . . . . . . 9 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
20		elmapi 8846	. . . . . . . . . . 11 ⊢ (𝑏 ∈ (𝐵 ↑m (0...𝑠)) → 𝑏:(0...𝑠)⟶𝐵)
21	20	adantl 486	. . . . . . . . . 10 ⊢ ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠))) → 𝑏:(0...𝑠)⟶𝐵)
22		nnnn0 12511	. . . . . . . . . . . . 13 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ ℕ0)
23		nn0uz 12900	. . . . . . . . . . . . 13 ⊢ ℕ0 = (ℤ≥‘0)
24	22, 23	eleqtrdi 2879	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ (ℤ≥‘0))
25		eluzfz1 13559	. . . . . . . . . . . 12 ⊢ (𝑠 ∈ (ℤ≥‘0) → 0 ∈ (0...𝑠))
26	24, 25	syl 18	. . . . . . . . . . 11 ⊢ (𝑠 ∈ ℕ → 0 ∈ (0...𝑠))
27	26	adantr 485	. . . . . . . . . 10 ⊢ ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠))) → 0 ∈ (0...𝑠))
28	21, 27	ffvelcdmd 7081	. . . . . . . . 9 ⊢ ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠))) → (𝑏‘0) ∈ 𝐵)
29	19, 28	anim12i 624	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑏‘0) ∈ 𝐵))
30		df-3an 1103	. . . . . . . 8 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘0) ∈ 𝐵) ↔ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑏‘0) ∈ 𝐵))
31	29, 30	sylibr 237	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘0) ∈ 𝐵))
32	14, 15, 16, 1, 2	mat2pmatbas 22852	. . . . . . 7 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘0) ∈ 𝐵) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
33	31, 32	syl 18	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌))
34		chfacfisf.r	. . . . . . 7 ⊢ × = (.r‘𝑌)
35	8, 34	ringcl 20332	. . . . . 6 ⊢ ((𝑌 ∈ Ring ∧ (𝑇‘𝑀) ∈ (Base‘𝑌) ∧ (𝑇‘(𝑏‘0)) ∈ (Base‘𝑌)) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
36	13, 18, 33, 35	syl3anc 1396	. . . . 5 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌))
37		chfacfisf.s	. . . . . 6 ⊢ − = (-g‘𝑌)
38	8, 37	grpsubcl 19086	. . . . 5 ⊢ ((𝑌 ∈ Grp ∧ 0 ∈ (Base‘𝑌) ∧ ((𝑇‘𝑀) × (𝑇‘(𝑏‘0))) ∈ (Base‘𝑌)) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) ∈ (Base‘𝑌))
39	7, 12, 36, 38	syl3anc 1396	. . . 4 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) ∈ (Base‘𝑌))
40	39	ad2antrr 738	. . 3 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 = 0) → ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))) ∈ (Base‘𝑌))
41	22	adantr 485	. . . . . . . . 9 ⊢ ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠))) → 𝑠 ∈ ℕ0)
42	19, 41	anim12i 624	. . . . . . . 8 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝑠 ∈ ℕ0))
43		df-3an 1103	. . . . . . . 8 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑠 ∈ ℕ0) ↔ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ 𝑠 ∈ ℕ0))
44	42, 43	sylibr 237	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑠 ∈ ℕ0))
45		eluzfz2 13560	. . . . . . . . . 10 ⊢ (𝑠 ∈ (ℤ≥‘0) → 𝑠 ∈ (0...𝑠))
46	24, 45	syl 18	. . . . . . . . 9 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ (0...𝑠))
47	46	anim1ci 627	. . . . . . . 8 ⊢ ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠))) → (𝑏 ∈ (𝐵 ↑m (0...𝑠)) ∧ 𝑠 ∈ (0...𝑠)))
48	47	adantl 486	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → (𝑏 ∈ (𝐵 ↑m (0...𝑠)) ∧ 𝑠 ∈ (0...𝑠)))
49	15, 16, 1, 2, 14	m2pmfzmap 22873	. . . . . . 7 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑠 ∈ ℕ0) ∧ (𝑏 ∈ (𝐵 ↑m (0...𝑠)) ∧ 𝑠 ∈ (0...𝑠))) → (𝑇‘(𝑏‘𝑠)) ∈ (Base‘𝑌))
50	44, 48, 49	syl2anc 595	. . . . . 6 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → (𝑇‘(𝑏‘𝑠)) ∈ (Base‘𝑌))
51	50	adantr 485	. . . . 5 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) → (𝑇‘(𝑏‘𝑠)) ∈ (Base‘𝑌))
52	51	ad2antrr 738	. . . 4 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 = (𝑠 + 1)) → (𝑇‘(𝑏‘𝑠)) ∈ (Base‘𝑌))
53	12	ad4antr 744	. . . . 5 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ (𝑠 + 1) < 𝑛) → 0 ∈ (Base‘𝑌))
54		nn0re 12513	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℕ0 → 𝑛 ∈ ℝ)
55	54	adantl 486	. . . . . . . . . . . . . 14 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → 𝑛 ∈ ℝ)
56		peano2nn 12245	. . . . . . . . . . . . . . . 16 ⊢ (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℕ)
57	56	nnred 12248	. . . . . . . . . . . . . . 15 ⊢ (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℝ)
58	57	adantr 485	. . . . . . . . . . . . . 14 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (𝑠 + 1) ∈ ℝ)
59	55, 58	lenltd 11356	. . . . . . . . . . . . 13 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (𝑛 ≤ (𝑠 + 1) ↔ ¬ (𝑠 + 1) < 𝑛))
60		nesym 3020	. . . . . . . . . . . . . . 15 ⊢ ((𝑠 + 1) ≠ 𝑛 ↔ ¬ 𝑛 = (𝑠 + 1))
61		ltlen 11311	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 ∈ ℝ ∧ (𝑠 + 1) ∈ ℝ) → (𝑛 < (𝑠 + 1) ↔ (𝑛 ≤ (𝑠 + 1) ∧ (𝑠 + 1) ≠ 𝑛)))
62	54, 57, 61	syl2anr 608	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (𝑛 < (𝑠 + 1) ↔ (𝑛 ≤ (𝑠 + 1) ∧ (𝑠 + 1) ≠ 𝑛)))
63	62	biimprd 251	. . . . . . . . . . . . . . . 16 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → ((𝑛 ≤ (𝑠 + 1) ∧ (𝑠 + 1) ≠ 𝑛) → 𝑛 < (𝑠 + 1)))
64	63	expcomd 421	. . . . . . . . . . . . . . 15 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → ((𝑠 + 1) ≠ 𝑛 → (𝑛 ≤ (𝑠 + 1) → 𝑛 < (𝑠 + 1))))
65	60, 64	biimtrrid 246	. . . . . . . . . . . . . 14 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (¬ 𝑛 = (𝑠 + 1) → (𝑛 ≤ (𝑠 + 1) → 𝑛 < (𝑠 + 1))))
66	65	com23 87	. . . . . . . . . . . . 13 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (𝑛 ≤ (𝑠 + 1) → (¬ 𝑛 = (𝑠 + 1) → 𝑛 < (𝑠 + 1))))
67	59, 66	sylbird 263	. . . . . . . . . . . 12 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (¬ (𝑠 + 1) < 𝑛 → (¬ 𝑛 = (𝑠 + 1) → 𝑛 < (𝑠 + 1))))
68	67	impcomd 416	. . . . . . . . . . 11 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → ((¬ 𝑛 = (𝑠 + 1) ∧ ¬ (𝑠 + 1) < 𝑛) → 𝑛 < (𝑠 + 1)))
69	68	ex 417	. . . . . . . . . 10 ⊢ (𝑠 ∈ ℕ → (𝑛 ∈ ℕ0 → ((¬ 𝑛 = (𝑠 + 1) ∧ ¬ (𝑠 + 1) < 𝑛) → 𝑛 < (𝑠 + 1))))
70	69	ad2antrl 740	. . . . . . . . 9 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → (𝑛 ∈ ℕ0 → ((¬ 𝑛 = (𝑠 + 1) ∧ ¬ (𝑠 + 1) < 𝑛) → 𝑛 < (𝑠 + 1))))
71	70	imp 411	. . . . . . . 8 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) → ((¬ 𝑛 = (𝑠 + 1) ∧ ¬ (𝑠 + 1) < 𝑛) → 𝑛 < (𝑠 + 1)))
72	71	adantr 485	. . . . . . 7 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) → ((¬ 𝑛 = (𝑠 + 1) ∧ ¬ (𝑠 + 1) < 𝑛) → 𝑛 < (𝑠 + 1)))
73	3, 5	syl 18	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ Grp)
74	73	3adant3 1148	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) → 𝑌 ∈ Grp)
75	74	ad4antr 744	. . . . . . . . 9 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → 𝑌 ∈ Grp)
76	19	ad4antr 744	. . . . . . . . . . 11 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
77	21	ad4antlr 745	. . . . . . . . . . . 12 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → 𝑏:(0...𝑠)⟶𝐵)
78		neqne 2972	. . . . . . . . . . . . . . . . 17 ⊢ (¬ 𝑛 = 0 → 𝑛 ≠ 0)
79	78	anim2i 628	. . . . . . . . . . . . . . . 16 ⊢ ((𝑛 ∈ ℕ0 ∧ ¬ 𝑛 = 0) → (𝑛 ∈ ℕ0 ∧ 𝑛 ≠ 0))
80		elnnne0 12518	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ ℕ ↔ (𝑛 ∈ ℕ0 ∧ 𝑛 ≠ 0))
81	79, 80	sylibr 237	. . . . . . . . . . . . . . 15 ⊢ ((𝑛 ∈ ℕ0 ∧ ¬ 𝑛 = 0) → 𝑛 ∈ ℕ)
82		nnm1nn0 12545	. . . . . . . . . . . . . . 15 ⊢ (𝑛 ∈ ℕ → (𝑛 − 1) ∈ ℕ0)
83	81, 82	syl 18	. . . . . . . . . . . . . 14 ⊢ ((𝑛 ∈ ℕ0 ∧ ¬ 𝑛 = 0) → (𝑛 − 1) ∈ ℕ0)
84	83	ad4ant23 765	. . . . . . . . . . . . 13 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → (𝑛 − 1) ∈ ℕ0)
85	41	ad4antlr 745	. . . . . . . . . . . . 13 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → 𝑠 ∈ ℕ0)
86	62	simprbda 503	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑛 ≤ (𝑠 + 1))
87	55	adantr 485	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑛 ∈ ℝ)
88		1red 11209	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 1 ∈ ℝ)
89		nnre 12240	. . . . . . . . . . . . . . . . . . . . 21 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ ℝ)
90	89	ad2antrr 738	. . . . . . . . . . . . . . . . . . . 20 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑠 ∈ ℝ)
91	87, 88, 90	lesubaddd 11811	. . . . . . . . . . . . . . . . . . 19 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → ((𝑛 − 1) ≤ 𝑠 ↔ 𝑛 ≤ (𝑠 + 1)))
92	86, 91	mpbird 260	. . . . . . . . . . . . . . . . . 18 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → (𝑛 − 1) ≤ 𝑠)
93	92	exp31 424	. . . . . . . . . . . . . . . . 17 ⊢ (𝑠 ∈ ℕ → (𝑛 ∈ ℕ0 → (𝑛 < (𝑠 + 1) → (𝑛 − 1) ≤ 𝑠)))
94	93	ad2antrl 740	. . . . . . . . . . . . . . . 16 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → (𝑛 ∈ ℕ0 → (𝑛 < (𝑠 + 1) → (𝑛 − 1) ≤ 𝑠)))
95	94	imp 411	. . . . . . . . . . . . . . 15 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) → (𝑛 < (𝑠 + 1) → (𝑛 − 1) ≤ 𝑠))
96	95	adantr 485	. . . . . . . . . . . . . 14 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) → (𝑛 < (𝑠 + 1) → (𝑛 − 1) ≤ 𝑠))
97	96	imp 411	. . . . . . . . . . . . 13 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → (𝑛 − 1) ≤ 𝑠)
98		elfz2nn0 13646	. . . . . . . . . . . . 13 ⊢ ((𝑛 − 1) ∈ (0...𝑠) ↔ ((𝑛 − 1) ∈ ℕ0 ∧ 𝑠 ∈ ℕ0 ∧ (𝑛 − 1) ≤ 𝑠))
99	84, 85, 97, 98	syl3anbrc 1360	. . . . . . . . . . . 12 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → (𝑛 − 1) ∈ (0...𝑠))
100	77, 99	ffvelcdmd 7081	. . . . . . . . . . 11 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → (𝑏‘(𝑛 − 1)) ∈ 𝐵)
101		df-3an 1103	. . . . . . . . . . 11 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘(𝑛 − 1)) ∈ 𝐵) ↔ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) ∧ (𝑏‘(𝑛 − 1)) ∈ 𝐵))
102	76, 100, 101	sylanbrc 594	. . . . . . . . . 10 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘(𝑛 − 1)) ∈ 𝐵))
103	14, 15, 16, 1, 2	mat2pmatbas 22852	. . . . . . . . . 10 ⊢ ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝑏‘(𝑛 − 1)) ∈ 𝐵) → (𝑇‘(𝑏‘(𝑛 − 1))) ∈ (Base‘𝑌))
104	102, 103	syl 18	. . . . . . . . 9 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → (𝑇‘(𝑏‘(𝑛 − 1))) ∈ (Base‘𝑌))
105	13	ad2antrr 738	. . . . . . . . . . 11 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑌 ∈ Ring)
106	18	ad2antrr 738	. . . . . . . . . . 11 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → (𝑇‘𝑀) ∈ (Base‘𝑌))
107	44	ad2antrr 738	. . . . . . . . . . . 12 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑠 ∈ ℕ0))
108		simprr 784	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → 𝑏 ∈ (𝐵 ↑m (0...𝑠)))
109	108	ad2antrr 738	. . . . . . . . . . . 12 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑏 ∈ (𝐵 ↑m (0...𝑠)))
110		simplr 780	. . . . . . . . . . . . . . . 16 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑛 ∈ ℕ0)
111	22	ad2antrr 738	. . . . . . . . . . . . . . . 16 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑠 ∈ ℕ0)
112		nn0z 12615	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑛 ∈ ℕ0 → 𝑛 ∈ ℤ)
113		nnz 12612	. . . . . . . . . . . . . . . . . 18 ⊢ (𝑠 ∈ ℕ → 𝑠 ∈ ℤ)
114		zleltp1 12645	. . . . . . . . . . . . . . . . . 18 ⊢ ((𝑛 ∈ ℤ ∧ 𝑠 ∈ ℤ) → (𝑛 ≤ 𝑠 ↔ 𝑛 < (𝑠 + 1)))
115	112, 113, 114	syl2anr 608	. . . . . . . . . . . . . . . . 17 ⊢ ((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) → (𝑛 ≤ 𝑠 ↔ 𝑛 < (𝑠 + 1)))
116	115	biimpar 482	. . . . . . . . . . . . . . . 16 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑛 ≤ 𝑠)
117		elfz2nn0 13646	. . . . . . . . . . . . . . . 16 ⊢ (𝑛 ∈ (0...𝑠) ↔ (𝑛 ∈ ℕ0 ∧ 𝑠 ∈ ℕ0 ∧ 𝑛 ≤ 𝑠))
118	110, 111, 116, 117	syl3anbrc 1360	. . . . . . . . . . . . . . 15 ⊢ (((𝑠 ∈ ℕ ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑛 ∈ (0...𝑠))
119	118	exp31 424	. . . . . . . . . . . . . 14 ⊢ (𝑠 ∈ ℕ → (𝑛 ∈ ℕ0 → (𝑛 < (𝑠 + 1) → 𝑛 ∈ (0...𝑠))))
120	119	ad2antrl 740	. . . . . . . . . . . . 13 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → (𝑛 ∈ ℕ0 → (𝑛 < (𝑠 + 1) → 𝑛 ∈ (0...𝑠))))
121	120	imp31 422	. . . . . . . . . . . 12 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → 𝑛 ∈ (0...𝑠))
122	15, 16, 1, 2, 14	m2pmfzmap 22873	. . . . . . . . . . . 12 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑠 ∈ ℕ0) ∧ (𝑏 ∈ (𝐵 ↑m (0...𝑠)) ∧ 𝑛 ∈ (0...𝑠))) → (𝑇‘(𝑏‘𝑛)) ∈ (Base‘𝑌))
123	107, 109, 121, 122	syl12anc 849	. . . . . . . . . . 11 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → (𝑇‘(𝑏‘𝑛)) ∈ (Base‘𝑌))
124	8, 34	ringcl 20332	. . . . . . . . . . 11 ⊢ ((𝑌 ∈ Ring ∧ (𝑇‘𝑀) ∈ (Base‘𝑌) ∧ (𝑇‘(𝑏‘𝑛)) ∈ (Base‘𝑌)) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))) ∈ (Base‘𝑌))
125	105, 106, 123, 124	syl3anc 1396	. . . . . . . . . 10 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ 𝑛 < (𝑠 + 1)) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))) ∈ (Base‘𝑌))
126	125	adantlr 727	. . . . . . . . 9 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))) ∈ (Base‘𝑌))
127	8, 37	grpsubcl 19086	. . . . . . . . 9 ⊢ ((𝑌 ∈ Grp ∧ (𝑇‘(𝑏‘(𝑛 − 1))) ∈ (Base‘𝑌) ∧ ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))) ∈ (Base‘𝑌)) → ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))) ∈ (Base‘𝑌))
128	75, 104, 126, 127	syl3anc 1396	. . . . . . . 8 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ 𝑛 < (𝑠 + 1)) → ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))) ∈ (Base‘𝑌))
129	128	ex 417	. . . . . . 7 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) → (𝑛 < (𝑠 + 1) → ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))) ∈ (Base‘𝑌)))
130	72, 129	syld 48	. . . . . 6 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) → ((¬ 𝑛 = (𝑠 + 1) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))) ∈ (Base‘𝑌)))
131	130	impl 460	. . . . 5 ⊢ (((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) ∧ ¬ (𝑠 + 1) < 𝑛) → ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))) ∈ (Base‘𝑌))
132	53, 131	ifclda 4528	. . . 4 ⊢ ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) ∧ ¬ 𝑛 = (𝑠 + 1)) → if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))) ∈ (Base‘𝑌))
133	52, 132	ifclda 4528	. . 3 ⊢ (((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) ∧ ¬ 𝑛 = 0) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛)))))) ∈ (Base‘𝑌))
134	40, 133	ifclda 4528	. 2 ⊢ ((((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) ∧ 𝑛 ∈ ℕ0) → if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))) ∈ (Base‘𝑌))
135		chfacfisf.g	. 2 ⊢ 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 − ((𝑇‘𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏‘𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) − ((𝑇‘𝑀) × (𝑇‘(𝑏‘𝑛))))))))
136	134, 135	fmptd 7110	1 ⊢ (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀 ∈ 𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵 ↑m (0...𝑠)))) → 𝐺:ℕ0⟶(Base‘𝑌))

Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 400   ∧ w3a 1101   = wceq 1567   ∈ wcel 2149   ≠ wne 2964  ifcif 4492   class class class wbr 5113   ↦ cmpt 5196  ⟶wf 6533  ‘cfv 6537  (class class class)co 7411   ↑_m cmap 8824  Fincfn 8943  ℝcr 11099  0cc0 11100  1c1 11101   + caddc 11103   < clt 11243   ≤ cle 11244   − cmin 11441  ℕcn 12233  ℕ₀cn0 12504  ℤcz 12591  ℤ_≥cuz 12862  ...cfz 13535  Basecbs 17269  ._rcmulr 17311  0_gc0g 17492  Grpcgrp 19000  -_gcsg 19002  Ringcrg 20315  Poly₁cpl1 22306   Mat cmat 22533   matToPolyMat cmat2pmat 22830

This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5242  ax-sep 5261  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-cnex 11156  ax-resscn 11157  ax-1cn 11158  ax-icn 11159  ax-addcl 11160  ax-addrcl 11161  ax-mulcl 11162  ax-mulrcl 11163  ax-mulcom 11164  ax-addass 11165  ax-mulass 11166  ax-distr 11167  ax-i2m1 11168  ax-1ne0 11169  ax-1rid 11170  ax-rnegex 11171  ax-rrecex 11172  ax-cnre 11173  ax-pre-lttri 11174  ax-pre-lttrn 11175  ax-pre-ltadd 11176  ax-pre-mulgt0 11177

This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3376  df-reu 3377  df-rab 3424  df-v 3465  df-sbc 3754  df-csb 3862  df-dif 3916  df-un 3918  df-in 3920  df-ss 3930  df-pss 3933  df-nul 4295  df-if 4493  df-pw 4569  df-sn 4595  df-pr 4597  df-tp 4599  df-op 4601  df-ot 4603  df-uni 4877  df-int 4917  df-iun 4962  df-iin 4963  df-br 5114  df-opab 5178  df-mpt 5197  df-tr 5223  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-se 5616  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-of 7675  df-ofr 7676  df-om 7863  df-1st 7986  df-2nd 7987  df-supp 8157  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-1o 8453  df-2o 8454  df-er 8694  df-map 8826  df-pm 8827  df-ixp 8896  df-en 8944  df-dom 8945  df-sdom 8946  df-fin 8947  df-fsupp 9322  df-sup 9402  df-oi 9472  df-card 9925  df-pnf 11245  df-mnf 11246  df-xr 11247  df-ltxr 11248  df-le 11249  df-sub 11443  df-neg 11444  df-nn 12234  df-2 12303  df-3 12304  df-4 12305  df-5 12306  df-6 12307  df-7 12308  df-8 12309  df-9 12310  df-n0 12505  df-z 12592  df-dec 12712  df-uz 12863  df-fz 13536  df-fzo 13683  df-seq 14038  df-hash 14367  df-struct 17207  df-sets 17224  df-slot 17242  df-ndx 17254  df-base 17270  df-ress 17291  df-plusg 17323  df-mulr 17324  df-sca 17326  df-vsca 17327  df-ip 17328  df-tset 17329  df-ple 17330  df-ds 17332  df-hom 17334  df-cco 17335  df-0g 17494  df-gsum 17495  df-prds 17500  df-pws 17502  df-mre 17638  df-mrc 17639  df-acs 17641  df-mgm 18698  df-sgrp 18777  df-mnd 18793  df-mhm 18841  df-submnd 18842  df-grp 19003  df-minusg 19004  df-sbg 19005  df-mulg 19134  df-subg 19189  df-ghm 19284  df-cntz 19387  df-cmn 19852  df-abl 19853  df-mgp 20217  df-rng 20231  df-ur 20264  df-ring 20317  df-subrng 20631  df-subrg 20655  df-lmod 20961  df-lss 21031  df-sra 21272  df-rgmod 21273  df-dsmm 21851  df-frlm 21866  df-ascl 21974  df-psr 22028  df-mpl 22030  df-opsr 22032  df-psr1 22309  df-ply1 22311  df-mamu 22517  df-mat 22534  df-mat2pmat 22833

This theorem is referenced by:  chfacfscmulcl  22983  chfacfscmulgsum  22986  chfacfpmmulcl  22987  chfacfpmmulgsum  22990