Metamath Proof Explorer


Theorem chpscmatgsummon

Description: The characteristic polynomial of a (nonempty!) scalar matrix, expressed as finite group sum of scaled monomials. (Contributed by AV, 2-Sep-2019)

Ref Expression
Hypotheses chp0mat.c C = N CharPlyMat R
chp0mat.p P = Poly 1 R
chp0mat.a A = N Mat R
chp0mat.x X = var 1 R
chp0mat.g G = mulGrp P
chp0mat.m × ˙ = G
chpscmat.d D = m Base A | c Base R i N j N i m j = if i = j c 0 R
chpscmat.s S = algSc P
chpscmat.m - ˙ = - P
chpscmatgsum.f F = P
chpscmatgsum.h H = mulGrp R
chpscmatgsum.e E = H
chpscmatgsum.i I = inv g R
chpscmatgsum.s · ˙ = P
chpscmatgsum.z Z = R
Assertion chpscmatgsummon N Fin R CRing M D J N n N n M n = J M J C M = P l = 0 N ( N l) Z N l E I J M J · ˙ l × ˙ X

Proof

Step Hyp Ref Expression
1 chp0mat.c C = N CharPlyMat R
2 chp0mat.p P = Poly 1 R
3 chp0mat.a A = N Mat R
4 chp0mat.x X = var 1 R
5 chp0mat.g G = mulGrp P
6 chp0mat.m × ˙ = G
7 chpscmat.d D = m Base A | c Base R i N j N i m j = if i = j c 0 R
8 chpscmat.s S = algSc P
9 chpscmat.m - ˙ = - P
10 chpscmatgsum.f F = P
11 chpscmatgsum.h H = mulGrp R
12 chpscmatgsum.e E = H
13 chpscmatgsum.i I = inv g R
14 chpscmatgsum.s · ˙ = P
15 chpscmatgsum.z Z = R
16 1 2 3 4 5 6 7 8 9 10 11 12 13 14 chpscmatgsumbin N Fin R CRing M D J N n N n M n = J M J C M = P l = 0 N ( N l) F N l E I J M J · ˙ l × ˙ X
17 crngring R CRing R Ring
18 17 adantl N Fin R CRing R Ring
19 2 ply1lmod R Ring P LMod
20 18 19 syl N Fin R CRing P LMod
21 20 ad2antrr N Fin R CRing M D J N n N n M n = J M J l 0 N P LMod
22 eqid Base R = Base R
23 11 22 mgpbas Base R = Base H
24 11 ringmgp R Ring H Mnd
25 18 24 syl N Fin R CRing H Mnd
26 25 ad2antrr N Fin R CRing M D J N n N n M n = J M J l 0 N H Mnd
27 fznn0sub l 0 N N l 0
28 27 adantl N Fin R CRing M D J N n N n M n = J M J l 0 N N l 0
29 ringgrp R Ring R Grp
30 17 29 syl R CRing R Grp
31 30 adantl N Fin R CRing R Grp
32 simp2 M D J N n N n M n = J M J J N
33 elrabi M m Base A | c Base R i N j N i m j = if i = j c 0 R M Base A
34 33 7 eleq2s M D M Base A
35 34 3ad2ant1 M D J N n N n M n = J M J M Base A
36 32 32 35 3jca M D J N n N n M n = J M J J N J N M Base A
37 36 adantl N Fin R CRing M D J N n N n M n = J M J J N J N M Base A
38 3 22 matecl J N J N M Base A J M J Base R
39 37 38 syl N Fin R CRing M D J N n N n M n = J M J J M J Base R
40 22 13 grpinvcl R Grp J M J Base R I J M J Base R
41 31 39 40 syl2an2r N Fin R CRing M D J N n N n M n = J M J I J M J Base R
42 41 adantr N Fin R CRing M D J N n N n M n = J M J l 0 N I J M J Base R
43 23 12 26 28 42 mulgnn0cld N Fin R CRing M D J N n N n M n = J M J l 0 N N l E I J M J Base R
44 2 ply1sca R CRing R = Scalar P
45 44 adantl N Fin R CRing R = Scalar P
46 45 eqcomd N Fin R CRing Scalar P = R
47 46 fveq2d N Fin R CRing Base Scalar P = Base R
48 47 ad2antrr N Fin R CRing M D J N n N n M n = J M J l 0 N Base Scalar P = Base R
49 43 48 eleqtrrd N Fin R CRing M D J N n N n M n = J M J l 0 N N l E I J M J Base Scalar P
50 hashcl N Fin N 0
51 50 ad2antrr N Fin R CRing M D J N n N n M n = J M J N 0
52 elfzelz l 0 N l
53 bccl N 0 l ( N l) 0
54 51 52 53 syl2an N Fin R CRing M D J N n N n M n = J M J l 0 N ( N l) 0
55 eqid Base P = Base P
56 5 55 mgpbas Base P = Base G
57 2 ply1ring R Ring P Ring
58 5 ringmgp P Ring G Mnd
59 17 57 58 3syl R CRing G Mnd
60 59 adantl N Fin R CRing G Mnd
61 60 ad2antrr N Fin R CRing M D J N n N n M n = J M J l 0 N G Mnd
62 elfznn0 l 0 N l 0
63 62 adantl N Fin R CRing M D J N n N n M n = J M J l 0 N l 0
64 4 2 55 vr1cl R Ring X Base P
65 18 64 syl N Fin R CRing X Base P
66 65 ad2antrr N Fin R CRing M D J N n N n M n = J M J l 0 N X Base P
67 56 6 61 63 66 mulgnn0cld N Fin R CRing M D J N n N n M n = J M J l 0 N l × ˙ X Base P
68 eqid Scalar P = Scalar P
69 eqid Base Scalar P = Base Scalar P
70 eqid Scalar P = Scalar P
71 55 68 14 69 10 70 lmodvsmmulgdi P LMod N l E I J M J Base Scalar P ( N l) 0 l × ˙ X Base P ( N l) F N l E I J M J · ˙ l × ˙ X = ( N l) Scalar P N l E I J M J · ˙ l × ˙ X
72 21 49 54 67 71 syl13anc N Fin R CRing M D J N n N n M n = J M J l 0 N ( N l) F N l E I J M J · ˙ l × ˙ X = ( N l) Scalar P N l E I J M J · ˙ l × ˙ X
73 45 fveq2d N Fin R CRing R = Scalar P
74 15 73 eqtr2id N Fin R CRing Scalar P = Z
75 74 ad2antrr N Fin R CRing M D J N n N n M n = J M J l 0 N Scalar P = Z
76 75 oveqd N Fin R CRing M D J N n N n M n = J M J l 0 N ( N l) Scalar P N l E I J M J = ( N l) Z N l E I J M J
77 76 oveq1d N Fin R CRing M D J N n N n M n = J M J l 0 N ( N l) Scalar P N l E I J M J · ˙ l × ˙ X = ( N l) Z N l E I J M J · ˙ l × ˙ X
78 72 77 eqtrd N Fin R CRing M D J N n N n M n = J M J l 0 N ( N l) F N l E I J M J · ˙ l × ˙ X = ( N l) Z N l E I J M J · ˙ l × ˙ X
79 78 mpteq2dva N Fin R CRing M D J N n N n M n = J M J l 0 N ( N l) F N l E I J M J · ˙ l × ˙ X = l 0 N ( N l) Z N l E I J M J · ˙ l × ˙ X
80 79 oveq2d N Fin R CRing M D J N n N n M n = J M J P l = 0 N ( N l) F N l E I J M J · ˙ l × ˙ X = P l = 0 N ( N l) Z N l E I J M J · ˙ l × ˙ X
81 16 80 eqtrd N Fin R CRing M D J N n N n M n = J M J C M = P l = 0 N ( N l) Z N l E I J M J · ˙ l × ˙ X