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

Theorem scmatval 20512
 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 20499 . . . 4 ScMat = (𝑛 ∈ Fin, 𝑟 ∈ V ↦ (𝑛 Mat 𝑟) / 𝑎{𝑚 ∈ (Base‘𝑎) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠𝑎)(1r𝑎))})
32a1i 11 . . 3 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → ScMat = (𝑛 ∈ Fin, 𝑟 ∈ V ↦ (𝑛 Mat 𝑟) / 𝑎{𝑚 ∈ (Base‘𝑎) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠𝑎)(1r𝑎))}))
4 ovexd 6843 . . . . 5 (((𝑁 ∈ Fin ∧ 𝑅𝑉) ∧ (𝑛 = 𝑁𝑟 = 𝑅)) → (𝑛 Mat 𝑟) ∈ V)
5 fveq2 6352 . . . . . . 7 (𝑎 = (𝑛 Mat 𝑟) → (Base‘𝑎) = (Base‘(𝑛 Mat 𝑟)))
6 fveq2 6352 . . . . . . . . . 10 (𝑎 = (𝑛 Mat 𝑟) → ( ·𝑠𝑎) = ( ·𝑠 ‘(𝑛 Mat 𝑟)))
7 eqidd 2761 . . . . . . . . . 10 (𝑎 = (𝑛 Mat 𝑟) → 𝑐 = 𝑐)
8 fveq2 6352 . . . . . . . . . 10 (𝑎 = (𝑛 Mat 𝑟) → (1r𝑎) = (1r‘(𝑛 Mat 𝑟)))
96, 7, 8oveq123d 6834 . . . . . . . . 9 (𝑎 = (𝑛 Mat 𝑟) → (𝑐( ·𝑠𝑎)(1r𝑎)) = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟))))
109eqeq2d 2770 . . . . . . . 8 (𝑎 = (𝑛 Mat 𝑟) → (𝑚 = (𝑐( ·𝑠𝑎)(1r𝑎)) ↔ 𝑚 = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟)))))
1110rexbidv 3190 . . . . . . 7 (𝑎 = (𝑛 Mat 𝑟) → (∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠𝑎)(1r𝑎)) ↔ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟)))))
125, 11rabeqbidv 3335 . . . . . 6 (𝑎 = (𝑛 Mat 𝑟) → {𝑚 ∈ (Base‘𝑎) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠𝑎)(1r𝑎))} = {𝑚 ∈ (Base‘(𝑛 Mat 𝑟)) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟)))})
1312adantl 473 . . . . 5 ((((𝑁 ∈ Fin ∧ 𝑅𝑉) ∧ (𝑛 = 𝑁𝑟 = 𝑅)) ∧ 𝑎 = (𝑛 Mat 𝑟)) → {𝑚 ∈ (Base‘𝑎) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠𝑎)(1r𝑎))} = {𝑚 ∈ (Base‘(𝑛 Mat 𝑟)) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟)))})
144, 13csbied 3701 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅𝑉) ∧ (𝑛 = 𝑁𝑟 = 𝑅)) → (𝑛 Mat 𝑟) / 𝑎{𝑚 ∈ (Base‘𝑎) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠𝑎)(1r𝑎))} = {𝑚 ∈ (Base‘(𝑛 Mat 𝑟)) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟)))})
15 oveq12 6822 . . . . . . . 8 ((𝑛 = 𝑁𝑟 = 𝑅) → (𝑛 Mat 𝑟) = (𝑁 Mat 𝑅))
1615fveq2d 6356 . . . . . . 7 ((𝑛 = 𝑁𝑟 = 𝑅) → (Base‘(𝑛 Mat 𝑟)) = (Base‘(𝑁 Mat 𝑅)))
17 scmatval.b . . . . . . . 8 𝐵 = (Base‘𝐴)
18 scmatval.a . . . . . . . . 9 𝐴 = (𝑁 Mat 𝑅)
1918fveq2i 6355 . . . . . . . 8 (Base‘𝐴) = (Base‘(𝑁 Mat 𝑅))
2017, 19eqtri 2782 . . . . . . 7 𝐵 = (Base‘(𝑁 Mat 𝑅))
2116, 20syl6eqr 2812 . . . . . 6 ((𝑛 = 𝑁𝑟 = 𝑅) → (Base‘(𝑛 Mat 𝑟)) = 𝐵)
22 fveq2 6352 . . . . . . . . 9 (𝑟 = 𝑅 → (Base‘𝑟) = (Base‘𝑅))
23 scmatval.k . . . . . . . . 9 𝐾 = (Base‘𝑅)
2422, 23syl6eqr 2812 . . . . . . . 8 (𝑟 = 𝑅 → (Base‘𝑟) = 𝐾)
2524adantl 473 . . . . . . 7 ((𝑛 = 𝑁𝑟 = 𝑅) → (Base‘𝑟) = 𝐾)
2615fveq2d 6356 . . . . . . . . . 10 ((𝑛 = 𝑁𝑟 = 𝑅) → ( ·𝑠 ‘(𝑛 Mat 𝑟)) = ( ·𝑠 ‘(𝑁 Mat 𝑅)))
27 scmatval.t . . . . . . . . . . 11 · = ( ·𝑠𝐴)
2818fveq2i 6355 . . . . . . . . . . 11 ( ·𝑠𝐴) = ( ·𝑠 ‘(𝑁 Mat 𝑅))
2927, 28eqtri 2782 . . . . . . . . . 10 · = ( ·𝑠 ‘(𝑁 Mat 𝑅))
3026, 29syl6eqr 2812 . . . . . . . . 9 ((𝑛 = 𝑁𝑟 = 𝑅) → ( ·𝑠 ‘(𝑛 Mat 𝑟)) = · )
31 eqidd 2761 . . . . . . . . 9 ((𝑛 = 𝑁𝑟 = 𝑅) → 𝑐 = 𝑐)
3215fveq2d 6356 . . . . . . . . . 10 ((𝑛 = 𝑁𝑟 = 𝑅) → (1r‘(𝑛 Mat 𝑟)) = (1r‘(𝑁 Mat 𝑅)))
33 scmatval.1 . . . . . . . . . . 11 1 = (1r𝐴)
3418fveq2i 6355 . . . . . . . . . . 11 (1r𝐴) = (1r‘(𝑁 Mat 𝑅))
3533, 34eqtri 2782 . . . . . . . . . 10 1 = (1r‘(𝑁 Mat 𝑅))
3632, 35syl6eqr 2812 . . . . . . . . 9 ((𝑛 = 𝑁𝑟 = 𝑅) → (1r‘(𝑛 Mat 𝑟)) = 1 )
3730, 31, 36oveq123d 6834 . . . . . . . 8 ((𝑛 = 𝑁𝑟 = 𝑅) → (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟))) = (𝑐 · 1 ))
3837eqeq2d 2770 . . . . . . 7 ((𝑛 = 𝑁𝑟 = 𝑅) → (𝑚 = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟))) ↔ 𝑚 = (𝑐 · 1 )))
3925, 38rexeqbidv 3292 . . . . . 6 ((𝑛 = 𝑁𝑟 = 𝑅) → (∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟))) ↔ ∃𝑐𝐾 𝑚 = (𝑐 · 1 )))
4021, 39rabeqbidv 3335 . . . . 5 ((𝑛 = 𝑁𝑟 = 𝑅) → {𝑚 ∈ (Base‘(𝑛 Mat 𝑟)) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟)))} = {𝑚𝐵 ∣ ∃𝑐𝐾 𝑚 = (𝑐 · 1 )})
4140adantl 473 . . . 4 (((𝑁 ∈ Fin ∧ 𝑅𝑉) ∧ (𝑛 = 𝑁𝑟 = 𝑅)) → {𝑚 ∈ (Base‘(𝑛 Mat 𝑟)) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠 ‘(𝑛 Mat 𝑟))(1r‘(𝑛 Mat 𝑟)))} = {𝑚𝐵 ∣ ∃𝑐𝐾 𝑚 = (𝑐 · 1 )})
4214, 41eqtrd 2794 . . 3 (((𝑁 ∈ Fin ∧ 𝑅𝑉) ∧ (𝑛 = 𝑁𝑟 = 𝑅)) → (𝑛 Mat 𝑟) / 𝑎{𝑚 ∈ (Base‘𝑎) ∣ ∃𝑐 ∈ (Base‘𝑟)𝑚 = (𝑐( ·𝑠𝑎)(1r𝑎))} = {𝑚𝐵 ∣ ∃𝑐𝐾 𝑚 = (𝑐 · 1 )})
43 simpl 474 . . 3 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → 𝑁 ∈ Fin)
44 elex 3352 . . . 4 (𝑅𝑉𝑅 ∈ V)
4544adantl 473 . . 3 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → 𝑅 ∈ V)
46 fvex 6362 . . . . . 6 (Base‘𝐴) ∈ V
4717, 46eqeltri 2835 . . . . 5 𝐵 ∈ V
4847rabex 4964 . . . 4 {𝑚𝐵 ∣ ∃𝑐𝐾 𝑚 = (𝑐 · 1 )} ∈ V
4948a1i 11 . . 3 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → {𝑚𝐵 ∣ ∃𝑐𝐾 𝑚 = (𝑐 · 1 )} ∈ V)
503, 42, 43, 45, 49ovmpt2d 6953 . 2 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → (𝑁 ScMat 𝑅) = {𝑚𝐵 ∣ ∃𝑐𝐾 𝑚 = (𝑐 · 1 )})
511, 50syl5eq 2806 1 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → 𝑆 = {𝑚𝐵 ∣ ∃𝑐𝐾 𝑚 = (𝑐 · 1 )})
 Colors of variables: wff setvar class Syntax hints:   → wi 4   ∧ wa 383   = wceq 1632   ∈ wcel 2139  ∃wrex 3051  {crab 3054  Vcvv 3340  ⦋csb 3674  ‘cfv 6049  (class class class)co 6813   ↦ cmpt2 6815  Fincfn 8121  Basecbs 16059   ·𝑠 cvsca 16147  1rcur 18701   Mat cmat 20415   ScMat cscmat 20497 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 1988  ax-6 2054  ax-7 2090  ax-9 2148  ax-10 2168  ax-11 2183  ax-12 2196  ax-13 2391  ax-ext 2740  ax-sep 4933  ax-nul 4941  ax-pr 5055 This theorem depends on definitions:  df-bi 197  df-or 384  df-an 385  df-3an 1074  df-tru 1635  df-ex 1854  df-nf 1859  df-sb 2047  df-eu 2611  df-mo 2612  df-clab 2747  df-cleq 2753  df-clel 2756  df-nfc 2891  df-ral 3055  df-rex 3056  df-rab 3059  df-v 3342  df-sbc 3577  df-csb 3675  df-dif 3718  df-un 3720  df-in 3722  df-ss 3729  df-nul 4059  df-if 4231  df-sn 4322  df-pr 4324  df-op 4328  df-uni 4589  df-br 4805  df-opab 4865  df-id 5174  df-xp 5272  df-rel 5273  df-cnv 5274  df-co 5275  df-dm 5276  df-iota 6012  df-fun 6051  df-fv 6057  df-ov 6816  df-oprab 6817  df-mpt2 6818  df-scmat 20499 This theorem is referenced by:  scmatel  20513  scmatmats  20519  scmatlss  20533
 Copyright terms: Public domain W3C validator