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

Theorem cayhamlem4 20916
Description: Lemma for cayleyhamilton 20918. (Contributed by AV, 25-Nov-2019.) (Revised by AV, 15-Dec-2019.)
Hypotheses
Ref Expression
chcoeffeq.a 𝐴 = (𝑁 Mat 𝑅)
chcoeffeq.b 𝐵 = (Base‘𝐴)
chcoeffeq.p 𝑃 = (Poly1𝑅)
chcoeffeq.y 𝑌 = (𝑁 Mat 𝑃)
chcoeffeq.r × = (.r𝑌)
chcoeffeq.s = (-g𝑌)
chcoeffeq.0 0 = (0g𝑌)
chcoeffeq.t 𝑇 = (𝑁 matToPolyMat 𝑅)
chcoeffeq.c 𝐶 = (𝑁 CharPlyMat 𝑅)
chcoeffeq.k 𝐾 = (𝐶𝑀)
chcoeffeq.g 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))))
chcoeffeq.w 𝑊 = (Base‘𝑌)
chcoeffeq.1 1 = (1r𝐴)
chcoeffeq.m = ( ·𝑠𝐴)
chcoeffeq.u 𝑈 = (𝑁 cPolyMatToMat 𝑅)
cayhamlem.e1 = (.g‘(mulGrp‘𝐴))
cayhamlem.e2 𝐸 = (.g‘(mulGrp‘𝑌))
Assertion
Ref Expression
cayhamlem4 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → ∃𝑠 ∈ ℕ ∃𝑏 ∈ (𝐵𝑚 (0...𝑠))(𝐴 Σg (𝑛 ∈ ℕ0 ↦ (((coe1𝐾)‘𝑛) (𝑛 𝑀)))) = (𝑈‘(𝑌 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛))))))
Distinct variable groups:   𝐴,𝑛   𝐵,𝑛   𝑛,𝐺   𝑛,𝐾   𝑛,𝑀   𝑛,𝑁   𝑅,𝑛   𝑈,𝑛   𝑛,𝑌   1 ,𝑛   ,𝑛   𝑛,𝑏,𝑠,𝐴   𝐵,𝑏,𝑠   𝑀,𝑏,𝑠   𝑁,𝑏,𝑠   𝑃,𝑏,𝑛,𝑠   𝑅,𝑏,𝑠   𝑇,𝑏,𝑛,𝑠   𝑛,𝑊   𝑌,𝑏,𝑠   0 ,𝑛   × ,𝑛   ,𝑏,𝑛,𝑠   ,𝑛
Allowed substitution hints:   𝐶(𝑛,𝑠,𝑏)   × (𝑠,𝑏)   𝑈(𝑠,𝑏)   1 (𝑠,𝑏)   𝐸(𝑛,𝑠,𝑏)   (𝑠,𝑏)   𝐺(𝑠,𝑏)   (𝑠,𝑏)   𝐾(𝑠,𝑏)   𝑊(𝑠,𝑏)   0 (𝑠,𝑏)

Proof of Theorem cayhamlem4
Dummy variables 𝑤 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 id 22 . . 3 ((𝐴 Σg (𝑛 ∈ ℕ0 ↦ (((coe1𝐾)‘𝑛) (𝑛 𝑀)))) = (𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))) → (𝐴 Σg (𝑛 ∈ ℕ0 ↦ (((coe1𝐾)‘𝑛) (𝑛 𝑀)))) = (𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))))
2 simp1 1131 . . . . . 6 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑁 ∈ Fin)
32ad2antrr 764 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑁 ∈ Fin)
4 crngring 18779 . . . . . . 7 (𝑅 ∈ CRing → 𝑅 ∈ Ring)
543ad2ant2 1129 . . . . . 6 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑅 ∈ Ring)
65ad2antrr 764 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑅 ∈ Ring)
7 chcoeffeq.b . . . . . 6 𝐵 = (Base‘𝐴)
8 eqid 2761 . . . . . 6 (0g𝐴) = (0g𝐴)
9 chcoeffeq.a . . . . . . . . . . 11 𝐴 = (𝑁 Mat 𝑅)
109matring 20472 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝐴 ∈ Ring)
114, 10sylan2 492 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝐴 ∈ Ring)
12 ringcmn 18802 . . . . . . . . 9 (𝐴 ∈ Ring → 𝐴 ∈ CMnd)
1311, 12syl 17 . . . . . . . 8 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝐴 ∈ CMnd)
14133adant3 1127 . . . . . . 7 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝐴 ∈ CMnd)
1514ad2antrr 764 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝐴 ∈ CMnd)
16 nn0ex 11511 . . . . . . 7 0 ∈ V
1716a1i 11 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → ℕ0 ∈ V)
183, 6, 10syl2anc 696 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝐴 ∈ Ring)
1918adantr 472 . . . . . . . 8 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝐴 ∈ Ring)
202, 5, 10syl2anc 696 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝐴 ∈ Ring)
21 eqid 2761 . . . . . . . . . . . 12 (mulGrp‘𝐴) = (mulGrp‘𝐴)
2221ringmgp 18774 . . . . . . . . . . 11 (𝐴 ∈ Ring → (mulGrp‘𝐴) ∈ Mnd)
2320, 22syl 17 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (mulGrp‘𝐴) ∈ Mnd)
2423ad3antrrr 768 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → (mulGrp‘𝐴) ∈ Mnd)
25 simpr 479 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝑛 ∈ ℕ0)
26 simpll3 1259 . . . . . . . . . 10 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑀𝐵)
2726adantr 472 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝑀𝐵)
2821, 7mgpbas 18716 . . . . . . . . . 10 𝐵 = (Base‘(mulGrp‘𝐴))
29 cayhamlem.e1 . . . . . . . . . 10 = (.g‘(mulGrp‘𝐴))
3028, 29mulgnn0cl 17780 . . . . . . . . 9 (((mulGrp‘𝐴) ∈ Mnd ∧ 𝑛 ∈ ℕ0𝑀𝐵) → (𝑛 𝑀) ∈ 𝐵)
3124, 25, 27, 30syl3anc 1477 . . . . . . . 8 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → (𝑛 𝑀) ∈ 𝐵)
32 eqid 2761 . . . . . . . . . . . 12 (𝑁 ConstPolyMat 𝑅) = (𝑁 ConstPolyMat 𝑅)
33 chcoeffeq.u . . . . . . . . . . . 12 𝑈 = (𝑁 cPolyMatToMat 𝑅)
349, 7, 32, 33cpm2mf 20780 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑈:(𝑁 ConstPolyMat 𝑅)⟶𝐵)
352, 5, 34syl2anc 696 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑈:(𝑁 ConstPolyMat 𝑅)⟶𝐵)
3635ad3antrrr 768 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝑈:(𝑁 ConstPolyMat 𝑅)⟶𝐵)
37 simplr 809 . . . . . . . . . . 11 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑠 ∈ ℕ)
38 simpr 479 . . . . . . . . . . 11 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑏 ∈ (𝐵𝑚 (0...𝑠)))
39 chcoeffeq.p . . . . . . . . . . . 12 𝑃 = (Poly1𝑅)
40 chcoeffeq.y . . . . . . . . . . . 12 𝑌 = (𝑁 Mat 𝑃)
41 chcoeffeq.r . . . . . . . . . . . 12 × = (.r𝑌)
42 chcoeffeq.s . . . . . . . . . . . 12 = (-g𝑌)
43 chcoeffeq.0 . . . . . . . . . . . 12 0 = (0g𝑌)
44 chcoeffeq.t . . . . . . . . . . . 12 𝑇 = (𝑁 matToPolyMat 𝑅)
45 chcoeffeq.g . . . . . . . . . . . 12 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))))
469, 7, 39, 40, 41, 42, 43, 44, 45, 32chfacfisfcpmat 20883 . . . . . . . . . . 11 (((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝐺:ℕ0⟶(𝑁 ConstPolyMat 𝑅))
473, 6, 26, 37, 38, 46syl32anc 1485 . . . . . . . . . 10 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝐺:ℕ0⟶(𝑁 ConstPolyMat 𝑅))
4847ffvelrnda 6524 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → (𝐺𝑛) ∈ (𝑁 ConstPolyMat 𝑅))
4936, 48ffvelrnd 6525 . . . . . . . 8 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → (𝑈‘(𝐺𝑛)) ∈ 𝐵)
50 eqid 2761 . . . . . . . . 9 (.r𝐴) = (.r𝐴)
517, 50ringcl 18782 . . . . . . . 8 ((𝐴 ∈ Ring ∧ (𝑛 𝑀) ∈ 𝐵 ∧ (𝑈‘(𝐺𝑛)) ∈ 𝐵) → ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) ∈ 𝐵)
5219, 31, 49, 51syl3anc 1477 . . . . . . 7 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) ∈ 𝐵)
53 eqid 2761 . . . . . . 7 (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))) = (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))
5452, 53fmptd 6550 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))):ℕ0𝐵)
55 fvexd 6366 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (0g𝐴) ∈ V)
56 ovexd 6845 . . . . . . 7 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) ∈ V)
579, 7, 39, 40, 41, 42, 43, 44, 45chfacffsupp 20884 . . . . . . . . 9 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → 𝐺 finSupp (0g𝑌))
5857anassrs 683 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝐺 finSupp (0g𝑌))
59 ovex 6843 . . . . . . . . . . . . 13 (𝑁 ConstPolyMat 𝑅) ∈ V
6059, 16pm3.2i 470 . . . . . . . . . . . 12 ((𝑁 ConstPolyMat 𝑅) ∈ V ∧ ℕ0 ∈ V)
61 elmapg 8039 . . . . . . . . . . . 12 (((𝑁 ConstPolyMat 𝑅) ∈ V ∧ ℕ0 ∈ V) → (𝐺 ∈ ((𝑁 ConstPolyMat 𝑅) ↑𝑚0) ↔ 𝐺:ℕ0⟶(𝑁 ConstPolyMat 𝑅)))
6260, 61mp1i 13 . . . . . . . . . . 11 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝐺 ∈ ((𝑁 ConstPolyMat 𝑅) ↑𝑚0) ↔ 𝐺:ℕ0⟶(𝑁 ConstPolyMat 𝑅)))
6347, 62mpbird 247 . . . . . . . . . 10 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝐺 ∈ ((𝑁 ConstPolyMat 𝑅) ↑𝑚0))
64 fvex 6364 . . . . . . . . . 10 (0g𝑌) ∈ V
65 fsuppmapnn0ub 13010 . . . . . . . . . 10 ((𝐺 ∈ ((𝑁 ConstPolyMat 𝑅) ↑𝑚0) ∧ (0g𝑌) ∈ V) → (𝐺 finSupp (0g𝑌) → ∃𝑤 ∈ ℕ0𝑧 ∈ ℕ0 (𝑤 < 𝑧 → (𝐺𝑧) = (0g𝑌))))
6663, 64, 65sylancl 697 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝐺 finSupp (0g𝑌) → ∃𝑤 ∈ ℕ0𝑧 ∈ ℕ0 (𝑤 < 𝑧 → (𝐺𝑧) = (0g𝑌))))
67 csbov12g 6854 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ ℕ0𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = (𝑧 / 𝑛(𝑛 𝑀)(.r𝐴)𝑧 / 𝑛(𝑈‘(𝐺𝑛))))
68 csbov1g 6855 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ℕ0𝑧 / 𝑛(𝑛 𝑀) = (𝑧 / 𝑛𝑛 𝑀))
69 csbvarg 4147 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ ℕ0𝑧 / 𝑛𝑛 = 𝑧)
7069oveq1d 6830 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ℕ0 → (𝑧 / 𝑛𝑛 𝑀) = (𝑧 𝑀))
7168, 70eqtrd 2795 . . . . . . . . . . . . . . . . . 18 (𝑧 ∈ ℕ0𝑧 / 𝑛(𝑛 𝑀) = (𝑧 𝑀))
72 csbfv2g 6395 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ℕ0𝑧 / 𝑛(𝑈‘(𝐺𝑛)) = (𝑈𝑧 / 𝑛(𝐺𝑛)))
73 csbfv 6396 . . . . . . . . . . . . . . . . . . . . 21 𝑧 / 𝑛(𝐺𝑛) = (𝐺𝑧)
7473a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑧 ∈ ℕ0𝑧 / 𝑛(𝐺𝑛) = (𝐺𝑧))
7574fveq2d 6358 . . . . . . . . . . . . . . . . . . 19 (𝑧 ∈ ℕ0 → (𝑈𝑧 / 𝑛(𝐺𝑛)) = (𝑈‘(𝐺𝑧)))
7672, 75eqtrd 2795 . . . . . . . . . . . . . . . . . 18 (𝑧 ∈ ℕ0𝑧 / 𝑛(𝑈‘(𝐺𝑛)) = (𝑈‘(𝐺𝑧)))
7771, 76oveq12d 6833 . . . . . . . . . . . . . . . . 17 (𝑧 ∈ ℕ0 → (𝑧 / 𝑛(𝑛 𝑀)(.r𝐴)𝑧 / 𝑛(𝑈‘(𝐺𝑛))) = ((𝑧 𝑀)(.r𝐴)(𝑈‘(𝐺𝑧))))
7867, 77eqtrd 2795 . . . . . . . . . . . . . . . 16 (𝑧 ∈ ℕ0𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = ((𝑧 𝑀)(.r𝐴)(𝑈‘(𝐺𝑧))))
7978ad2antlr 765 . . . . . . . . . . . . . . 15 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) ∧ (𝐺𝑧) = (0g𝑌)) → 𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = ((𝑧 𝑀)(.r𝐴)(𝑈‘(𝐺𝑧))))
80 fveq2 6354 . . . . . . . . . . . . . . . . 17 ((𝐺𝑧) = (0g𝑌) → (𝑈‘(𝐺𝑧)) = (𝑈‘(0g𝑌)))
812, 5jca 555 . . . . . . . . . . . . . . . . . . . 20 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
8281adantr 472 . . . . . . . . . . . . . . . . . . 19 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) → (𝑁 ∈ Fin ∧ 𝑅 ∈ Ring))
83 eqid 2761 . . . . . . . . . . . . . . . . . . . 20 (0g𝑌) = (0g𝑌)
849, 33, 39, 40, 8, 83m2cpminv0 20789 . . . . . . . . . . . . . . . . . . 19 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → (𝑈‘(0g𝑌)) = (0g𝐴))
8582, 84syl 17 . . . . . . . . . . . . . . . . . 18 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) → (𝑈‘(0g𝑌)) = (0g𝐴))
8685ad2antrr 764 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) → (𝑈‘(0g𝑌)) = (0g𝐴))
8780, 86sylan9eqr 2817 . . . . . . . . . . . . . . . 16 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) ∧ (𝐺𝑧) = (0g𝑌)) → (𝑈‘(𝐺𝑧)) = (0g𝐴))
8887oveq2d 6831 . . . . . . . . . . . . . . 15 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) ∧ (𝐺𝑧) = (0g𝑌)) → ((𝑧 𝑀)(.r𝐴)(𝑈‘(𝐺𝑧))) = ((𝑧 𝑀)(.r𝐴)(0g𝐴)))
8918adantr 472 . . . . . . . . . . . . . . . . . 18 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) → 𝐴 ∈ Ring)
9023ad3antrrr 768 . . . . . . . . . . . . . . . . . . 19 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) → (mulGrp‘𝐴) ∈ Mnd)
91 simpr 479 . . . . . . . . . . . . . . . . . . 19 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) → 𝑧 ∈ ℕ0)
9226adantr 472 . . . . . . . . . . . . . . . . . . 19 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) → 𝑀𝐵)
9328, 29mulgnn0cl 17780 . . . . . . . . . . . . . . . . . . 19 (((mulGrp‘𝐴) ∈ Mnd ∧ 𝑧 ∈ ℕ0𝑀𝐵) → (𝑧 𝑀) ∈ 𝐵)
9490, 91, 92, 93syl3anc 1477 . . . . . . . . . . . . . . . . . 18 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) → (𝑧 𝑀) ∈ 𝐵)
9589, 94jca 555 . . . . . . . . . . . . . . . . 17 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) → (𝐴 ∈ Ring ∧ (𝑧 𝑀) ∈ 𝐵))
9695adantr 472 . . . . . . . . . . . . . . . 16 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) ∧ (𝐺𝑧) = (0g𝑌)) → (𝐴 ∈ Ring ∧ (𝑧 𝑀) ∈ 𝐵))
977, 50, 8ringrz 18809 . . . . . . . . . . . . . . . 16 ((𝐴 ∈ Ring ∧ (𝑧 𝑀) ∈ 𝐵) → ((𝑧 𝑀)(.r𝐴)(0g𝐴)) = (0g𝐴))
9896, 97syl 17 . . . . . . . . . . . . . . 15 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) ∧ (𝐺𝑧) = (0g𝑌)) → ((𝑧 𝑀)(.r𝐴)(0g𝐴)) = (0g𝐴))
9979, 88, 983eqtrd 2799 . . . . . . . . . . . . . 14 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) ∧ (𝐺𝑧) = (0g𝑌)) → 𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = (0g𝐴))
10099ex 449 . . . . . . . . . . . . 13 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑧 ∈ ℕ0) → ((𝐺𝑧) = (0g𝑌) → 𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = (0g𝐴)))
101100adantlr 753 . . . . . . . . . . . 12 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑤 ∈ ℕ0) ∧ 𝑧 ∈ ℕ0) → ((𝐺𝑧) = (0g𝑌) → 𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = (0g𝐴)))
102101imim2d 57 . . . . . . . . . . 11 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑤 ∈ ℕ0) ∧ 𝑧 ∈ ℕ0) → ((𝑤 < 𝑧 → (𝐺𝑧) = (0g𝑌)) → (𝑤 < 𝑧𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = (0g𝐴))))
103102ralimdva 3101 . . . . . . . . . 10 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑤 ∈ ℕ0) → (∀𝑧 ∈ ℕ0 (𝑤 < 𝑧 → (𝐺𝑧) = (0g𝑌)) → ∀𝑧 ∈ ℕ0 (𝑤 < 𝑧𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = (0g𝐴))))
104103reximdva 3156 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (∃𝑤 ∈ ℕ0𝑧 ∈ ℕ0 (𝑤 < 𝑧 → (𝐺𝑧) = (0g𝑌)) → ∃𝑤 ∈ ℕ0𝑧 ∈ ℕ0 (𝑤 < 𝑧𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = (0g𝐴))))
10566, 104syld 47 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝐺 finSupp (0g𝑌) → ∃𝑤 ∈ ℕ0𝑧 ∈ ℕ0 (𝑤 < 𝑧𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = (0g𝐴))))
10658, 105mpd 15 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → ∃𝑤 ∈ ℕ0𝑧 ∈ ℕ0 (𝑤 < 𝑧𝑧 / 𝑛((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) = (0g𝐴)))
10755, 56, 106mptnn0fsupp 13012 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))) finSupp (0g𝐴))
1087, 8, 15, 17, 54, 107gsumcl 18537 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))) ∈ 𝐵)
10933, 9, 7, 44m2cpminvid 20781 . . . . 5 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))) ∈ 𝐵) → (𝑈‘(𝑇‘(𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))))) = (𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))))
1103, 6, 108, 109syl3anc 1477 . . . 4 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝑈‘(𝑇‘(𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))))) = (𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))))
11139, 40pmatring 20721 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ Ring)
1122, 5, 111syl2anc 696 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ Ring)
113 ringmnd 18777 . . . . . . . . 9 (𝑌 ∈ Ring → 𝑌 ∈ Mnd)
114112, 113syl 17 . . . . . . . 8 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ Mnd)
115114ad2antrr 764 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑌 ∈ Mnd)
116 chcoeffeq.w . . . . . . . . . 10 𝑊 = (Base‘𝑌)
11744, 9, 7, 39, 40, 116mat2pmatghm 20758 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑇 ∈ (𝐴 GrpHom 𝑌))
1183, 6, 117syl2anc 696 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑇 ∈ (𝐴 GrpHom 𝑌))
119 ghmmhm 17892 . . . . . . . 8 (𝑇 ∈ (𝐴 GrpHom 𝑌) → 𝑇 ∈ (𝐴 MndHom 𝑌))
120118, 119syl 17 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑇 ∈ (𝐴 MndHom 𝑌))
12120ad3antrrr 768 . . . . . . . 8 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝐴 ∈ Ring)
1224, 34sylan2 492 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑈:(𝑁 ConstPolyMat 𝑅)⟶𝐵)
1231223adant3 1127 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑈:(𝑁 ConstPolyMat 𝑅)⟶𝐵)
124123ad3antrrr 768 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝑈:(𝑁 ConstPolyMat 𝑅)⟶𝐵)
125124, 48ffvelrnd 6525 . . . . . . . 8 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → (𝑈‘(𝐺𝑛)) ∈ 𝐵)
126121, 31, 125, 51syl3anc 1477 . . . . . . 7 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))) ∈ 𝐵)
1277, 8, 15, 115, 17, 120, 126, 107gsummptmhm 18561 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝑌 Σg (𝑛 ∈ ℕ0 ↦ (𝑇‘((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))))) = (𝑇‘(𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))))))
12844, 9, 7, 39, 40, 116mat2pmatrhm 20762 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑇 ∈ (𝐴 RingHom 𝑌))
1291283adant3 1127 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑇 ∈ (𝐴 RingHom 𝑌))
130129ad3antrrr 768 . . . . . . . . . 10 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝑇 ∈ (𝐴 RingHom 𝑌))
1317, 50, 41rhmmul 18950 . . . . . . . . . 10 ((𝑇 ∈ (𝐴 RingHom 𝑌) ∧ (𝑛 𝑀) ∈ 𝐵 ∧ (𝑈‘(𝐺𝑛)) ∈ 𝐵) → (𝑇‘((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))) = ((𝑇‘(𝑛 𝑀)) × (𝑇‘(𝑈‘(𝐺𝑛)))))
132130, 31, 125, 131syl3anc 1477 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → (𝑇‘((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))) = ((𝑇‘(𝑛 𝑀)) × (𝑇‘(𝑈‘(𝐺𝑛)))))
13344, 9, 7, 39, 40, 116mat2pmatmhm 20761 . . . . . . . . . . . . 13 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑇 ∈ ((mulGrp‘𝐴) MndHom (mulGrp‘𝑌)))
1341333adant3 1127 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑇 ∈ ((mulGrp‘𝐴) MndHom (mulGrp‘𝑌)))
135134ad3antrrr 768 . . . . . . . . . . 11 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝑇 ∈ ((mulGrp‘𝐴) MndHom (mulGrp‘𝑌)))
136 cayhamlem.e2 . . . . . . . . . . . 12 𝐸 = (.g‘(mulGrp‘𝑌))
13728, 29, 136mhmmulg 17805 . . . . . . . . . . 11 ((𝑇 ∈ ((mulGrp‘𝐴) MndHom (mulGrp‘𝑌)) ∧ 𝑛 ∈ ℕ0𝑀𝐵) → (𝑇‘(𝑛 𝑀)) = (𝑛𝐸(𝑇𝑀)))
138135, 25, 27, 137syl3anc 1477 . . . . . . . . . 10 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → (𝑇‘(𝑛 𝑀)) = (𝑛𝐸(𝑇𝑀)))
1392ad3antrrr 768 . . . . . . . . . . 11 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝑁 ∈ Fin)
1405ad3antrrr 768 . . . . . . . . . . 11 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → 𝑅 ∈ Ring)
14132, 33, 44m2cpminvid2 20783 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring ∧ (𝐺𝑛) ∈ (𝑁 ConstPolyMat 𝑅)) → (𝑇‘(𝑈‘(𝐺𝑛))) = (𝐺𝑛))
142139, 140, 48, 141syl3anc 1477 . . . . . . . . . 10 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → (𝑇‘(𝑈‘(𝐺𝑛))) = (𝐺𝑛))
143138, 142oveq12d 6833 . . . . . . . . 9 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → ((𝑇‘(𝑛 𝑀)) × (𝑇‘(𝑈‘(𝐺𝑛)))) = ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛)))
144132, 143eqtrd 2795 . . . . . . . 8 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝑛 ∈ ℕ0) → (𝑇‘((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))) = ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛)))
145144mpteq2dva 4897 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝑛 ∈ ℕ0 ↦ (𝑇‘((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))) = (𝑛 ∈ ℕ0 ↦ ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛))))
146145oveq2d 6831 . . . . . 6 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝑌 Σg (𝑛 ∈ ℕ0 ↦ (𝑇‘((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))))) = (𝑌 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛)))))
147127, 146eqtr3d 2797 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝑇‘(𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))))) = (𝑌 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛)))))
148147fveq2d 6358 . . . 4 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝑈‘(𝑇‘(𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))))) = (𝑈‘(𝑌 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛))))))
149110, 148eqtr3d 2797 . . 3 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))) = (𝑈‘(𝑌 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛))))))
1501, 149sylan9eqr 2817 . 2 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ 𝑠 ∈ ℕ) ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ (𝐴 Σg (𝑛 ∈ ℕ0 ↦ (((coe1𝐾)‘𝑛) (𝑛 𝑀)))) = (𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛)))))) → (𝐴 Σg (𝑛 ∈ ℕ0 ↦ (((coe1𝐾)‘𝑛) (𝑛 𝑀)))) = (𝑈‘(𝑌 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛))))))
151 chcoeffeq.c . . 3 𝐶 = (𝑁 CharPlyMat 𝑅)
152 chcoeffeq.k . . 3 𝐾 = (𝐶𝑀)
153 chcoeffeq.1 . . 3 1 = (1r𝐴)
154 chcoeffeq.m . . 3 = ( ·𝑠𝐴)
1559, 7, 39, 40, 41, 42, 43, 44, 151, 152, 45, 116, 153, 154, 33, 29, 50cayhamlem3 20915 . 2 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → ∃𝑠 ∈ ℕ ∃𝑏 ∈ (𝐵𝑚 (0...𝑠))(𝐴 Σg (𝑛 ∈ ℕ0 ↦ (((coe1𝐾)‘𝑛) (𝑛 𝑀)))) = (𝐴 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛 𝑀)(.r𝐴)(𝑈‘(𝐺𝑛))))))
156150, 155reximddv2 3159 1 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → ∃𝑠 ∈ ℕ ∃𝑏 ∈ (𝐵𝑚 (0...𝑠))(𝐴 Σg (𝑛 ∈ ℕ0 ↦ (((coe1𝐾)‘𝑛) (𝑛 𝑀)))) = (𝑈‘(𝑌 Σg (𝑛 ∈ ℕ0 ↦ ((𝑛𝐸(𝑇𝑀)) × (𝐺𝑛))))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 383  w3a 1072   = wceq 1632  wcel 2140  wral 3051  wrex 3052  Vcvv 3341  csb 3675  ifcif 4231   class class class wbr 4805  cmpt 4882  wf 6046  cfv 6050  (class class class)co 6815  𝑚 cmap 8026  Fincfn 8124   finSupp cfsupp 8443  0cc0 10149  1c1 10150   + caddc 10152   < clt 10287  cmin 10479  cn 11233  0cn0 11505  ...cfz 12540  Basecbs 16080  .rcmulr 16165   ·𝑠 cvsca 16168  0gc0g 16323   Σg cgsu 16324  Mndcmnd 17516   MndHom cmhm 17555  -gcsg 17646  .gcmg 17762   GrpHom cghm 17879  CMndccmn 18414  mulGrpcmgp 18710  1rcur 18722  Ringcrg 18768  CRingccrg 18769   RingHom crh 18935  Poly1cpl1 19770  coe1cco1 19771   Mat cmat 20436   ConstPolyMat ccpmat 20731   matToPolyMat cmat2pmat 20732   cPolyMatToMat ccpmat2mat 20733   CharPlyMat cchpmat 20854
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1871  ax-4 1886  ax-5 1989  ax-6 2055  ax-7 2091  ax-8 2142  ax-9 2149  ax-10 2169  ax-11 2184  ax-12 2197  ax-13 2392  ax-ext 2741  ax-rep 4924  ax-sep 4934  ax-nul 4942  ax-pow 4993  ax-pr 5056  ax-un 7116  ax-inf2 8714  ax-cnex 10205  ax-resscn 10206  ax-1cn 10207  ax-icn 10208  ax-addcl 10209  ax-addrcl 10210  ax-mulcl 10211  ax-mulrcl 10212  ax-mulcom 10213  ax-addass 10214  ax-mulass 10215  ax-distr 10216  ax-i2m1 10217  ax-1ne0 10218  ax-1rid 10219  ax-rnegex 10220  ax-rrecex 10221  ax-cnre 10222  ax-pre-lttri 10223  ax-pre-lttrn 10224  ax-pre-ltadd 10225  ax-pre-mulgt0 10226  ax-addf 10228  ax-mulf 10229
This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3or 1073  df-3an 1074  df-xor 1614  df-tru 1635  df-fal 1638  df-ex 1854  df-nf 1859  df-sb 2048  df-eu 2612  df-mo 2613  df-clab 2748  df-cleq 2754  df-clel 2757  df-nfc 2892  df-ne 2934  df-nel 3037  df-ral 3056  df-rex 3057  df-reu 3058  df-rmo 3059  df-rab 3060  df-v 3343  df-sbc 3578  df-csb 3676  df-dif 3719  df-un 3721  df-in 3723  df-ss 3730  df-pss 3732  df-nul 4060  df-if 4232  df-pw 4305  df-sn 4323  df-pr 4325  df-tp 4327  df-op 4329  df-ot 4331  df-uni 4590  df-int 4629  df-iun 4675  df-iin 4676  df-br 4806  df-opab 4866  df-mpt 4883  df-tr 4906  df-id 5175  df-eprel 5180  df-po 5188  df-so 5189  df-fr 5226  df-se 5227  df-we 5228  df-xp 5273  df-rel 5274  df-cnv 5275  df-co 5276  df-dm 5277  df-rn 5278  df-res 5279  df-ima 5280  df-pred 5842  df-ord 5888  df-on 5889  df-lim 5890  df-suc 5891  df-iota 6013  df-fun 6052  df-fn 6053  df-f 6054  df-f1 6055  df-fo 6056  df-f1o 6057  df-fv 6058  df-isom 6059  df-riota 6776  df-ov 6818  df-oprab 6819  df-mpt2 6820  df-of 7064  df-ofr 7065  df-om 7233  df-1st 7335  df-2nd 7336  df-supp 7466  df-tpos 7523  df-cur 7564  df-wrecs 7578  df-recs 7639  df-rdg 7677  df-1o 7731  df-2o 7732  df-oadd 7735  df-er 7914  df-map 8028  df-pm 8029  df-ixp 8078  df-en 8125  df-dom 8126  df-sdom 8127  df-fin 8128  df-fsupp 8444  df-sup 8516  df-oi 8583  df-card 8976  df-pnf 10289  df-mnf 10290  df-xr 10291  df-ltxr 10292  df-le 10293  df-sub 10481  df-neg 10482  df-div 10898  df-nn 11234  df-2 11292  df-3 11293  df-4 11294  df-5 11295  df-6 11296  df-7 11297  df-8 11298  df-9 11299  df-n0 11506  df-xnn0 11577  df-z 11591  df-dec 11707  df-uz 11901  df-rp 12047  df-fz 12541  df-fzo 12681  df-seq 13017  df-exp 13076  df-hash 13333  df-word 13506  df-lsw 13507  df-concat 13508  df-s1 13509  df-substr 13510  df-splice 13511  df-reverse 13512  df-s2 13814  df-struct 16082  df-ndx 16083  df-slot 16084  df-base 16086  df-sets 16087  df-ress 16088  df-plusg 16177  df-mulr 16178  df-starv 16179  df-sca 16180  df-vsca 16181  df-ip 16182  df-tset 16183  df-ple 16184  df-ds 16187  df-unif 16188  df-hom 16189  df-cco 16190  df-0g 16325  df-gsum 16326  df-prds 16331  df-pws 16333  df-mre 16469  df-mrc 16470  df-acs 16472  df-mgm 17464  df-sgrp 17506  df-mnd 17517  df-mhm 17557  df-submnd 17558  df-grp 17647  df-minusg 17648  df-sbg 17649  df-mulg 17763  df-subg 17813  df-ghm 17880  df-gim 17923  df-cntz 17971  df-oppg 17997  df-symg 18019  df-pmtr 18083  df-psgn 18132  df-evpm 18133  df-cmn 18416  df-abl 18417  df-mgp 18711  df-ur 18723  df-srg 18727  df-ring 18770  df-cring 18771  df-oppr 18844  df-dvdsr 18862  df-unit 18863  df-invr 18893  df-dvr 18904  df-rnghom 18938  df-drng 18972  df-subrg 19001  df-lmod 19088  df-lss 19156  df-sra 19395  df-rgmod 19396  df-assa 19535  df-ascl 19537  df-psr 19579  df-mvr 19580  df-mpl 19581  df-opsr 19583  df-psr1 19773  df-vr1 19774  df-ply1 19775  df-coe1 19776  df-cnfld 19970  df-zring 20042  df-zrh 20075  df-dsmm 20299  df-frlm 20314  df-mamu 20413  df-mat 20437  df-mdet 20614  df-madu 20663  df-cpmat 20734  df-mat2pmat 20735  df-cpmat2mat 20736  df-decpmat 20791  df-pm2mp 20821  df-chpmat 20855
This theorem is referenced by:  cayleyhamilton0  20917  cayleyhamiltonALT  20919
  Copyright terms: Public domain W3C validator