Step | Hyp | Ref
| Expression |
1 | | mp2pm2mp.a |
. . . . 5
โข ๐ด = (๐ Mat ๐
) |
2 | | mp2pm2mp.q |
. . . . 5
โข ๐ = (Poly1โ๐ด) |
3 | | mp2pm2mp.l |
. . . . 5
โข ๐ฟ = (Baseโ๐) |
4 | | mp2pm2mp.m |
. . . . 5
โข ยท = (
ยท๐ โ๐) |
5 | | mp2pm2mp.e |
. . . . 5
โข ๐ธ =
(.gโ(mulGrpโ๐)) |
6 | | mp2pm2mp.y |
. . . . 5
โข ๐ = (var1โ๐
) |
7 | | mp2pm2mp.i |
. . . . 5
โข ๐ผ = (๐ โ ๐ฟ โฆ (๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))) |
8 | 1, 2, 3, 4, 5, 6, 7 | mp2pm2mplem1 22299 |
. . . 4
โข ((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โ (๐ผโ๐) = (๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))) |
9 | 8 | oveq1d 7420 |
. . 3
โข ((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โ ((๐ผโ๐) decompPMat ๐พ) = ((๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) decompPMat ๐พ)) |
10 | 9 | adantr 481 |
. 2
โข (((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โ ((๐ผโ๐) decompPMat ๐พ) = ((๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) decompPMat ๐พ)) |
11 | | mp2pm2mplem2.p |
. . . 4
โข ๐ = (Poly1โ๐
) |
12 | | eqid 2732 |
. . . 4
โข (๐ Mat ๐) = (๐ Mat ๐) |
13 | | eqid 2732 |
. . . 4
โข
(Baseโ(๐ Mat
๐)) = (Baseโ(๐ Mat ๐)) |
14 | 1, 2, 3, 4, 5, 6, 7, 11, 12, 13 | mp2pm2mplem2 22300 |
. . 3
โข ((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โ (๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) โ (Baseโ(๐ Mat ๐))) |
15 | 12, 13 | decpmatval 22258 |
. . 3
โข (((๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) โ (Baseโ(๐ Mat ๐)) โง ๐พ โ โ0) โ ((๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) decompPMat ๐พ) = (๐ โ ๐, ๐ โ ๐ โฆ ((coe1โ(๐(๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))๐))โ๐พ))) |
16 | 14, 15 | sylan 580 |
. 2
โข (((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โ ((๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) decompPMat ๐พ) = (๐ โ ๐, ๐ โ ๐ โฆ ((coe1โ(๐(๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))๐))โ๐พ))) |
17 | | eqidd 2733 |
. . . . . . 7
โข ((((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โง ๐ โ ๐ โง ๐ โ ๐) โ (๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) = (๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))) |
18 | | oveq12 7414 |
. . . . . . . . . . 11
โข ((๐ = ๐ โง ๐ = ๐) โ (๐((coe1โ๐)โ๐)๐) = (๐((coe1โ๐)โ๐)๐)) |
19 | 18 | oveq1d 7420 |
. . . . . . . . . 10
โข ((๐ = ๐ โง ๐ = ๐) โ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)) = ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))) |
20 | 19 | mpteq2dv 5249 |
. . . . . . . . 9
โข ((๐ = ๐ โง ๐ = ๐) โ (๐ โ โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))) = (๐ โ โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))) |
21 | 20 | oveq2d 7421 |
. . . . . . . 8
โข ((๐ = ๐ โง ๐ = ๐) โ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))) = (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) |
22 | 21 | adantl 482 |
. . . . . . 7
โข
(((((๐ โ Fin
โง ๐
โ Ring โง
๐ โ ๐ฟ) โง ๐พ โ โ0) โง ๐ โ ๐ โง ๐ โ ๐) โง (๐ = ๐ โง ๐ = ๐)) โ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))) = (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) |
23 | | simp2 1137 |
. . . . . . 7
โข ((((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โง ๐ โ ๐ โง ๐ โ ๐) โ ๐ โ ๐) |
24 | | simp3 1138 |
. . . . . . 7
โข ((((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โง ๐ โ ๐ โง ๐ โ ๐) โ ๐ โ ๐) |
25 | | ovexd 7440 |
. . . . . . 7
โข ((((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โง ๐ โ ๐ โง ๐ โ ๐) โ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))) โ V) |
26 | 17, 22, 23, 24, 25 | ovmpod 7556 |
. . . . . 6
โข ((((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โง ๐ โ ๐ โง ๐ โ ๐) โ (๐(๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))๐) = (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) |
27 | 26 | fveq2d 6892 |
. . . . 5
โข ((((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โง ๐ โ ๐ โง ๐ โ ๐) โ (coe1โ(๐(๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))๐)) = (coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))) |
28 | 27 | fveq1d 6890 |
. . . 4
โข ((((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โง ๐ โ ๐ โง ๐ โ ๐) โ ((coe1โ(๐(๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))๐))โ๐พ) = ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ)) |
29 | 28 | mpoeq3dva 7482 |
. . 3
โข (((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โ (๐ โ ๐, ๐ โ ๐ โฆ ((coe1โ(๐(๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))๐))โ๐พ)) = (๐ โ ๐, ๐ โ ๐ โฆ ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ))) |
30 | | oveq1 7412 |
. . . . . . . . 9
โข (๐ = ๐ โ (๐((coe1โ๐)โ๐)๐) = (๐((coe1โ๐)โ๐)๐)) |
31 | 30 | oveq1d 7420 |
. . . . . . . 8
โข (๐ = ๐ โ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)) = ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))) |
32 | 31 | mpteq2dv 5249 |
. . . . . . 7
โข (๐ = ๐ โ (๐ โ โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))) = (๐ โ โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))) |
33 | 32 | oveq2d 7421 |
. . . . . 6
โข (๐ = ๐ โ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))) = (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) |
34 | 33 | fveq2d 6892 |
. . . . 5
โข (๐ = ๐ โ (coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) = (coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))) |
35 | 34 | fveq1d 6890 |
. . . 4
โข (๐ = ๐ โ ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ) = ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ)) |
36 | | simpl 483 |
. . . . . . . . . 10
โข ((๐ = ๐ โง ๐ โ โ0) โ ๐ = ๐) |
37 | 36 | oveq2d 7421 |
. . . . . . . . 9
โข ((๐ = ๐ โง ๐ โ โ0) โ (๐((coe1โ๐)โ๐)๐) = (๐((coe1โ๐)โ๐)๐)) |
38 | 37 | oveq1d 7420 |
. . . . . . . 8
โข ((๐ = ๐ โง ๐ โ โ0) โ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)) = ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))) |
39 | 38 | mpteq2dva 5247 |
. . . . . . 7
โข (๐ = ๐ โ (๐ โ โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))) = (๐ โ โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))) |
40 | 39 | oveq2d 7421 |
. . . . . 6
โข (๐ = ๐ โ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))) = (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) |
41 | 40 | fveq2d 6892 |
. . . . 5
โข (๐ = ๐ โ (coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐))))) = (coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))) |
42 | 41 | fveq1d 6890 |
. . . 4
โข (๐ = ๐ โ ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ) = ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ)) |
43 | 35, 42 | cbvmpov 7500 |
. . 3
โข (๐ โ ๐, ๐ โ ๐ โฆ ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ)) = (๐ โ ๐, ๐ โ ๐ โฆ ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ)) |
44 | 29, 43 | eqtrdi 2788 |
. 2
โข (((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โ (๐ โ ๐, ๐ โ ๐ โฆ ((coe1โ(๐(๐ โ ๐, ๐ โ ๐ โฆ (๐ ฮฃg (๐ โ โ0
โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))๐))โ๐พ)) = (๐ โ ๐, ๐ โ ๐ โฆ ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ))) |
45 | 10, 16, 44 | 3eqtrd 2776 |
1
โข (((๐ โ Fin โง ๐
โ Ring โง ๐ โ ๐ฟ) โง ๐พ โ โ0) โ ((๐ผโ๐) decompPMat ๐พ) = (๐ โ ๐, ๐ โ ๐ โฆ ((coe1โ(๐ ฮฃg
(๐ โ
โ0 โฆ ((๐((coe1โ๐)โ๐)๐) ยท (๐๐ธ๐)))))โ๐พ))) |