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

Theorem cpmat 22730
Description: Value of the constructor of the set of all constant polynomial matrices, i.e. the set of all 𝑁 x 𝑁 matrices of polynomials over a ring 𝑅. (Contributed by AV, 15-Nov-2019.)
Hypotheses
Ref Expression
cpmat.s 𝑆 = (𝑁 ConstPolyMat 𝑅)
cpmat.p 𝑃 = (Poly1𝑅)
cpmat.c 𝐶 = (𝑁 Mat 𝑃)
cpmat.b 𝐵 = (Base‘𝐶)
Assertion
Ref Expression
cpmat ((𝑁 ∈ Fin ∧ 𝑅𝑉) → 𝑆 = {𝑚𝐵 ∣ ∀𝑖𝑁𝑗𝑁𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)})
Distinct variable groups:   𝐵,𝑚   𝑖,𝑁,𝑗,𝑘,𝑚   𝑅,𝑖,𝑗,𝑘,𝑚
Allowed substitution hints:   𝐵(𝑖,𝑗,𝑘)   𝐶(𝑖,𝑗,𝑘,𝑚)   𝑃(𝑖,𝑗,𝑘,𝑚)   𝑆(𝑖,𝑗,𝑘,𝑚)   𝑉(𝑖,𝑗,𝑘,𝑚)

Proof of Theorem cpmat
Dummy variables 𝑛 𝑟 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 cpmat.s . 2 𝑆 = (𝑁 ConstPolyMat 𝑅)
2 df-cpmat 22727 . . . 4 ConstPolyMat = (𝑛 ∈ Fin, 𝑟 ∈ V ↦ {𝑚 ∈ (Base‘(𝑛 Mat (Poly1𝑟))) ∣ ∀𝑖𝑛𝑗𝑛𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑟)})
32a1i 11 . . 3 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → ConstPolyMat = (𝑛 ∈ Fin, 𝑟 ∈ V ↦ {𝑚 ∈ (Base‘(𝑛 Mat (Poly1𝑟))) ∣ ∀𝑖𝑛𝑗𝑛𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑟)}))
4 simpl 482 . . . . . . . 8 ((𝑛 = 𝑁𝑟 = 𝑅) → 𝑛 = 𝑁)
5 fveq2 6906 . . . . . . . . 9 (𝑟 = 𝑅 → (Poly1𝑟) = (Poly1𝑅))
65adantl 481 . . . . . . . 8 ((𝑛 = 𝑁𝑟 = 𝑅) → (Poly1𝑟) = (Poly1𝑅))
74, 6oveq12d 7448 . . . . . . 7 ((𝑛 = 𝑁𝑟 = 𝑅) → (𝑛 Mat (Poly1𝑟)) = (𝑁 Mat (Poly1𝑅)))
87fveq2d 6910 . . . . . 6 ((𝑛 = 𝑁𝑟 = 𝑅) → (Base‘(𝑛 Mat (Poly1𝑟))) = (Base‘(𝑁 Mat (Poly1𝑅))))
9 cpmat.b . . . . . . 7 𝐵 = (Base‘𝐶)
10 cpmat.c . . . . . . . . 9 𝐶 = (𝑁 Mat 𝑃)
11 cpmat.p . . . . . . . . . 10 𝑃 = (Poly1𝑅)
1211oveq2i 7441 . . . . . . . . 9 (𝑁 Mat 𝑃) = (𝑁 Mat (Poly1𝑅))
1310, 12eqtri 2762 . . . . . . . 8 𝐶 = (𝑁 Mat (Poly1𝑅))
1413fveq2i 6909 . . . . . . 7 (Base‘𝐶) = (Base‘(𝑁 Mat (Poly1𝑅)))
159, 14eqtri 2762 . . . . . 6 𝐵 = (Base‘(𝑁 Mat (Poly1𝑅)))
168, 15eqtr4di 2792 . . . . 5 ((𝑛 = 𝑁𝑟 = 𝑅) → (Base‘(𝑛 Mat (Poly1𝑟))) = 𝐵)
17 fveq2 6906 . . . . . . . . . 10 (𝑟 = 𝑅 → (0g𝑟) = (0g𝑅))
1817adantl 481 . . . . . . . . 9 ((𝑛 = 𝑁𝑟 = 𝑅) → (0g𝑟) = (0g𝑅))
1918eqeq2d 2745 . . . . . . . 8 ((𝑛 = 𝑁𝑟 = 𝑅) → (((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑟) ↔ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)))
2019ralbidv 3175 . . . . . . 7 ((𝑛 = 𝑁𝑟 = 𝑅) → (∀𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑟) ↔ ∀𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)))
214, 20raleqbidv 3343 . . . . . 6 ((𝑛 = 𝑁𝑟 = 𝑅) → (∀𝑗𝑛𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑟) ↔ ∀𝑗𝑁𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)))
224, 21raleqbidv 3343 . . . . 5 ((𝑛 = 𝑁𝑟 = 𝑅) → (∀𝑖𝑛𝑗𝑛𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑟) ↔ ∀𝑖𝑁𝑗𝑁𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)))
2316, 22rabeqbidv 3451 . . . 4 ((𝑛 = 𝑁𝑟 = 𝑅) → {𝑚 ∈ (Base‘(𝑛 Mat (Poly1𝑟))) ∣ ∀𝑖𝑛𝑗𝑛𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑟)} = {𝑚𝐵 ∣ ∀𝑖𝑁𝑗𝑁𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)})
2423adantl 481 . . 3 (((𝑁 ∈ Fin ∧ 𝑅𝑉) ∧ (𝑛 = 𝑁𝑟 = 𝑅)) → {𝑚 ∈ (Base‘(𝑛 Mat (Poly1𝑟))) ∣ ∀𝑖𝑛𝑗𝑛𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑟)} = {𝑚𝐵 ∣ ∀𝑖𝑁𝑗𝑁𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)})
25 simpl 482 . . 3 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → 𝑁 ∈ Fin)
26 elex 3498 . . . 4 (𝑅𝑉𝑅 ∈ V)
2726adantl 481 . . 3 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → 𝑅 ∈ V)
289fvexi 6920 . . . 4 𝐵 ∈ V
29 rabexg 5342 . . . 4 (𝐵 ∈ V → {𝑚𝐵 ∣ ∀𝑖𝑁𝑗𝑁𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)} ∈ V)
3028, 29mp1i 13 . . 3 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → {𝑚𝐵 ∣ ∀𝑖𝑁𝑗𝑁𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)} ∈ V)
313, 24, 25, 27, 30ovmpod 7584 . 2 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → (𝑁 ConstPolyMat 𝑅) = {𝑚𝐵 ∣ ∀𝑖𝑁𝑗𝑁𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)})
321, 31eqtrid 2786 1 ((𝑁 ∈ Fin ∧ 𝑅𝑉) → 𝑆 = {𝑚𝐵 ∣ ∀𝑖𝑁𝑗𝑁𝑘 ∈ ℕ ((coe1‘(𝑖𝑚𝑗))‘𝑘) = (0g𝑅)})
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 395   = wceq 1536  wcel 2105  wral 3058  {crab 3432  Vcvv 3477  cfv 6562  (class class class)co 7430  cmpo 7432  Fincfn 8983  cn 12263  Basecbs 17244  0gc0g 17485  Poly1cpl1 22193  coe1cco1 22194   Mat cmat 22426   ConstPolyMat ccpmat 22724
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1791  ax-4 1805  ax-5 1907  ax-6 1964  ax-7 2004  ax-8 2107  ax-9 2115  ax-10 2138  ax-11 2154  ax-12 2174  ax-ext 2705  ax-sep 5301  ax-nul 5311  ax-pr 5437
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3an 1088  df-tru 1539  df-fal 1549  df-ex 1776  df-nf 1780  df-sb 2062  df-mo 2537  df-eu 2566  df-clab 2712  df-cleq 2726  df-clel 2813  df-nfc 2889  df-ne 2938  df-ral 3059  df-rex 3068  df-rab 3433  df-v 3479  df-sbc 3791  df-dif 3965  df-un 3967  df-in 3969  df-ss 3979  df-nul 4339  df-if 4531  df-pw 4606  df-sn 4631  df-pr 4633  df-op 4637  df-uni 4912  df-br 5148  df-opab 5210  df-id 5582  df-xp 5694  df-rel 5695  df-cnv 5696  df-co 5697  df-dm 5698  df-iota 6515  df-fun 6564  df-fv 6570  df-ov 7433  df-oprab 7434  df-mpo 7435  df-cpmat 22727
This theorem is referenced by:  cpmatpmat  22731  cpmatel  22732  cpmatsubgpmat  22741
  Copyright terms: Public domain W3C validator