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

Theorem scmatval 22005
Description: The set of ๐‘ x ๐‘ scalar matrices over (a ring) ๐‘…. (Contributed by AV, 18-Dec-2019.)
Hypotheses
Ref Expression
scmatval.k ๐พ = (Baseโ€˜๐‘…)
scmatval.a ๐ด = (๐‘ Mat ๐‘…)
scmatval.b ๐ต = (Baseโ€˜๐ด)
scmatval.1 1 = (1rโ€˜๐ด)
scmatval.t ยท = ( ยท๐‘  โ€˜๐ด)
scmatval.s ๐‘† = (๐‘ ScMat ๐‘…)
Assertion
Ref Expression
scmatval ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โ†’ ๐‘† = {๐‘š โˆˆ ๐ต โˆฃ โˆƒ๐‘ โˆˆ ๐พ ๐‘š = (๐‘ ยท 1 )})
Distinct variable groups:   ๐ต,๐‘š   ๐พ,๐‘   ๐‘,๐‘,๐‘š   ๐‘…,๐‘,๐‘š
Allowed substitution hints:   ๐ด(๐‘š,๐‘)   ๐ต(๐‘)   ๐‘†(๐‘š,๐‘)   ยท (๐‘š,๐‘)   1 (๐‘š,๐‘)   ๐พ(๐‘š)   ๐‘‰(๐‘š,๐‘)

Proof of Theorem scmatval
Dummy variables ๐‘› ๐‘Ÿ ๐‘Ž are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 scmatval.s . 2 ๐‘† = (๐‘ ScMat ๐‘…)
2 df-scmat 21992 . . . 4 ScMat = (๐‘› โˆˆ Fin, ๐‘Ÿ โˆˆ V โ†ฆ โฆ‹(๐‘› Mat ๐‘Ÿ) / ๐‘ŽโฆŒ{๐‘š โˆˆ (Baseโ€˜๐‘Ž) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜๐‘Ž)(1rโ€˜๐‘Ž))})
32a1i 11 . . 3 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โ†’ ScMat = (๐‘› โˆˆ Fin, ๐‘Ÿ โˆˆ V โ†ฆ โฆ‹(๐‘› Mat ๐‘Ÿ) / ๐‘ŽโฆŒ{๐‘š โˆˆ (Baseโ€˜๐‘Ž) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜๐‘Ž)(1rโ€˜๐‘Ž))}))
4 ovexd 7443 . . . . 5 (((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โˆง (๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…)) โ†’ (๐‘› Mat ๐‘Ÿ) โˆˆ V)
5 fveq2 6891 . . . . . . 7 (๐‘Ž = (๐‘› Mat ๐‘Ÿ) โ†’ (Baseโ€˜๐‘Ž) = (Baseโ€˜(๐‘› Mat ๐‘Ÿ)))
6 fveq2 6891 . . . . . . . . . 10 (๐‘Ž = (๐‘› Mat ๐‘Ÿ) โ†’ ( ยท๐‘  โ€˜๐‘Ž) = ( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ)))
7 eqidd 2733 . . . . . . . . . 10 (๐‘Ž = (๐‘› Mat ๐‘Ÿ) โ†’ ๐‘ = ๐‘)
8 fveq2 6891 . . . . . . . . . 10 (๐‘Ž = (๐‘› Mat ๐‘Ÿ) โ†’ (1rโ€˜๐‘Ž) = (1rโ€˜(๐‘› Mat ๐‘Ÿ)))
96, 7, 8oveq123d 7429 . . . . . . . . 9 (๐‘Ž = (๐‘› Mat ๐‘Ÿ) โ†’ (๐‘( ยท๐‘  โ€˜๐‘Ž)(1rโ€˜๐‘Ž)) = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ))))
109eqeq2d 2743 . . . . . . . 8 (๐‘Ž = (๐‘› Mat ๐‘Ÿ) โ†’ (๐‘š = (๐‘( ยท๐‘  โ€˜๐‘Ž)(1rโ€˜๐‘Ž)) โ†” ๐‘š = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ)))))
1110rexbidv 3178 . . . . . . 7 (๐‘Ž = (๐‘› Mat ๐‘Ÿ) โ†’ (โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜๐‘Ž)(1rโ€˜๐‘Ž)) โ†” โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ)))))
125, 11rabeqbidv 3449 . . . . . 6 (๐‘Ž = (๐‘› Mat ๐‘Ÿ) โ†’ {๐‘š โˆˆ (Baseโ€˜๐‘Ž) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜๐‘Ž)(1rโ€˜๐‘Ž))} = {๐‘š โˆˆ (Baseโ€˜(๐‘› Mat ๐‘Ÿ)) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ)))})
1312adantl 482 . . . . 5 ((((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โˆง (๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…)) โˆง ๐‘Ž = (๐‘› Mat ๐‘Ÿ)) โ†’ {๐‘š โˆˆ (Baseโ€˜๐‘Ž) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜๐‘Ž)(1rโ€˜๐‘Ž))} = {๐‘š โˆˆ (Baseโ€˜(๐‘› Mat ๐‘Ÿ)) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ)))})
144, 13csbied 3931 . . . 4 (((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โˆง (๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…)) โ†’ โฆ‹(๐‘› Mat ๐‘Ÿ) / ๐‘ŽโฆŒ{๐‘š โˆˆ (Baseโ€˜๐‘Ž) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜๐‘Ž)(1rโ€˜๐‘Ž))} = {๐‘š โˆˆ (Baseโ€˜(๐‘› Mat ๐‘Ÿ)) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ)))})
15 oveq12 7417 . . . . . . . 8 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ (๐‘› Mat ๐‘Ÿ) = (๐‘ Mat ๐‘…))
1615fveq2d 6895 . . . . . . 7 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ (Baseโ€˜(๐‘› Mat ๐‘Ÿ)) = (Baseโ€˜(๐‘ Mat ๐‘…)))
17 scmatval.b . . . . . . . 8 ๐ต = (Baseโ€˜๐ด)
18 scmatval.a . . . . . . . . 9 ๐ด = (๐‘ Mat ๐‘…)
1918fveq2i 6894 . . . . . . . 8 (Baseโ€˜๐ด) = (Baseโ€˜(๐‘ Mat ๐‘…))
2017, 19eqtri 2760 . . . . . . 7 ๐ต = (Baseโ€˜(๐‘ Mat ๐‘…))
2116, 20eqtr4di 2790 . . . . . 6 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ (Baseโ€˜(๐‘› Mat ๐‘Ÿ)) = ๐ต)
22 fveq2 6891 . . . . . . . . 9 (๐‘Ÿ = ๐‘… โ†’ (Baseโ€˜๐‘Ÿ) = (Baseโ€˜๐‘…))
23 scmatval.k . . . . . . . . 9 ๐พ = (Baseโ€˜๐‘…)
2422, 23eqtr4di 2790 . . . . . . . 8 (๐‘Ÿ = ๐‘… โ†’ (Baseโ€˜๐‘Ÿ) = ๐พ)
2524adantl 482 . . . . . . 7 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ (Baseโ€˜๐‘Ÿ) = ๐พ)
2615fveq2d 6895 . . . . . . . . . 10 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ ( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ)) = ( ยท๐‘  โ€˜(๐‘ Mat ๐‘…)))
27 scmatval.t . . . . . . . . . . 11 ยท = ( ยท๐‘  โ€˜๐ด)
2818fveq2i 6894 . . . . . . . . . . 11 ( ยท๐‘  โ€˜๐ด) = ( ยท๐‘  โ€˜(๐‘ Mat ๐‘…))
2927, 28eqtri 2760 . . . . . . . . . 10 ยท = ( ยท๐‘  โ€˜(๐‘ Mat ๐‘…))
3026, 29eqtr4di 2790 . . . . . . . . 9 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ ( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ)) = ยท )
31 eqidd 2733 . . . . . . . . 9 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ ๐‘ = ๐‘)
3215fveq2d 6895 . . . . . . . . . 10 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ (1rโ€˜(๐‘› Mat ๐‘Ÿ)) = (1rโ€˜(๐‘ Mat ๐‘…)))
33 scmatval.1 . . . . . . . . . . 11 1 = (1rโ€˜๐ด)
3418fveq2i 6894 . . . . . . . . . . 11 (1rโ€˜๐ด) = (1rโ€˜(๐‘ Mat ๐‘…))
3533, 34eqtri 2760 . . . . . . . . . 10 1 = (1rโ€˜(๐‘ Mat ๐‘…))
3632, 35eqtr4di 2790 . . . . . . . . 9 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ (1rโ€˜(๐‘› Mat ๐‘Ÿ)) = 1 )
3730, 31, 36oveq123d 7429 . . . . . . . 8 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ))) = (๐‘ ยท 1 ))
3837eqeq2d 2743 . . . . . . 7 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ (๐‘š = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ))) โ†” ๐‘š = (๐‘ ยท 1 )))
3925, 38rexeqbidv 3343 . . . . . 6 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ (โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ))) โ†” โˆƒ๐‘ โˆˆ ๐พ ๐‘š = (๐‘ ยท 1 )))
4021, 39rabeqbidv 3449 . . . . 5 ((๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…) โ†’ {๐‘š โˆˆ (Baseโ€˜(๐‘› Mat ๐‘Ÿ)) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ)))} = {๐‘š โˆˆ ๐ต โˆฃ โˆƒ๐‘ โˆˆ ๐พ ๐‘š = (๐‘ ยท 1 )})
4140adantl 482 . . . 4 (((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โˆง (๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…)) โ†’ {๐‘š โˆˆ (Baseโ€˜(๐‘› Mat ๐‘Ÿ)) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜(๐‘› Mat ๐‘Ÿ))(1rโ€˜(๐‘› Mat ๐‘Ÿ)))} = {๐‘š โˆˆ ๐ต โˆฃ โˆƒ๐‘ โˆˆ ๐พ ๐‘š = (๐‘ ยท 1 )})
4214, 41eqtrd 2772 . . 3 (((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โˆง (๐‘› = ๐‘ โˆง ๐‘Ÿ = ๐‘…)) โ†’ โฆ‹(๐‘› Mat ๐‘Ÿ) / ๐‘ŽโฆŒ{๐‘š โˆˆ (Baseโ€˜๐‘Ž) โˆฃ โˆƒ๐‘ โˆˆ (Baseโ€˜๐‘Ÿ)๐‘š = (๐‘( ยท๐‘  โ€˜๐‘Ž)(1rโ€˜๐‘Ž))} = {๐‘š โˆˆ ๐ต โˆฃ โˆƒ๐‘ โˆˆ ๐พ ๐‘š = (๐‘ ยท 1 )})
43 simpl 483 . . 3 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โ†’ ๐‘ โˆˆ Fin)
44 elex 3492 . . . 4 (๐‘… โˆˆ ๐‘‰ โ†’ ๐‘… โˆˆ V)
4544adantl 482 . . 3 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โ†’ ๐‘… โˆˆ V)
4617fvexi 6905 . . . . 5 ๐ต โˆˆ V
4746rabex 5332 . . . 4 {๐‘š โˆˆ ๐ต โˆฃ โˆƒ๐‘ โˆˆ ๐พ ๐‘š = (๐‘ ยท 1 )} โˆˆ V
4847a1i 11 . . 3 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โ†’ {๐‘š โˆˆ ๐ต โˆฃ โˆƒ๐‘ โˆˆ ๐พ ๐‘š = (๐‘ ยท 1 )} โˆˆ V)
493, 42, 43, 45, 48ovmpod 7559 . 2 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โ†’ (๐‘ ScMat ๐‘…) = {๐‘š โˆˆ ๐ต โˆฃ โˆƒ๐‘ โˆˆ ๐พ ๐‘š = (๐‘ ยท 1 )})
501, 49eqtrid 2784 1 ((๐‘ โˆˆ Fin โˆง ๐‘… โˆˆ ๐‘‰) โ†’ ๐‘† = {๐‘š โˆˆ ๐ต โˆฃ โˆƒ๐‘ โˆˆ ๐พ ๐‘š = (๐‘ ยท 1 )})
Colors of variables: wff setvar class
Syntax hints:   โ†’ wi 4   โˆง wa 396   = wceq 1541   โˆˆ wcel 2106  โˆƒwrex 3070  {crab 3432  Vcvv 3474  โฆ‹csb 3893  โ€˜cfv 6543  (class class class)co 7408   โˆˆ cmpo 7410  Fincfn 8938  Basecbs 17143   ยท๐‘  cvsca 17200  1rcur 20003   Mat cmat 21906   ScMat cscmat 21990
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-sep 5299  ax-nul 5306  ax-pr 5427
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-ral 3062  df-rex 3071  df-rab 3433  df-v 3476  df-sbc 3778  df-csb 3894  df-dif 3951  df-un 3953  df-in 3955  df-ss 3965  df-nul 4323  df-if 4529  df-sn 4629  df-pr 4631  df-op 4635  df-uni 4909  df-br 5149  df-opab 5211  df-id 5574  df-xp 5682  df-rel 5683  df-cnv 5684  df-co 5685  df-dm 5686  df-iota 6495  df-fun 6545  df-fv 6551  df-ov 7411  df-oprab 7412  df-mpo 7413  df-scmat 21992
This theorem is referenced by:  scmatel  22006  scmatmats  22012  scmatlss  22026
  Copyright terms: Public domain W3C validator