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

Theorem chfacfscmul0 21470
 Description: A scaled value of the "characteristic factor function" is zero almost always. (Contributed by AV, 9-Nov-2019.)
Hypotheses
Ref Expression
chfacfisf.a 𝐴 = (𝑁 Mat 𝑅)
chfacfisf.b 𝐵 = (Base‘𝐴)
chfacfisf.p 𝑃 = (Poly1𝑅)
chfacfisf.y 𝑌 = (𝑁 Mat 𝑃)
chfacfisf.r × = (.r𝑌)
chfacfisf.s = (-g𝑌)
chfacfisf.0 0 = (0g𝑌)
chfacfisf.t 𝑇 = (𝑁 matToPolyMat 𝑅)
chfacfisf.g 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))))
chfacfscmulcl.x 𝑋 = (var1𝑅)
chfacfscmulcl.m · = ( ·𝑠𝑌)
chfacfscmulcl.e = (.g‘(mulGrp‘𝑃))
Assertion
Ref Expression
chfacfscmul0 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠))) ∧ 𝐾 ∈ (ℤ‘(𝑠 + 2))) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 )
Distinct variable groups:   𝐵,𝑛   𝑛,𝑀   𝑛,𝑁   𝑅,𝑛   𝑛,𝑌   𝑛,𝑏   𝑛,𝑠,𝐵   𝑛,𝐾   0 ,𝑛
Allowed substitution hints:   𝐴(𝑛,𝑠,𝑏)   𝐵(𝑏)   𝑃(𝑛,𝑠,𝑏)   𝑅(𝑠,𝑏)   𝑇(𝑛,𝑠,𝑏)   · (𝑛,𝑠,𝑏)   × (𝑛,𝑠,𝑏)   (𝑛,𝑠,𝑏)   𝐺(𝑛,𝑠,𝑏)   𝐾(𝑠,𝑏)   𝑀(𝑠,𝑏)   (𝑛,𝑠,𝑏)   𝑁(𝑠,𝑏)   𝑋(𝑛,𝑠,𝑏)   𝑌(𝑠,𝑏)   0 (𝑠,𝑏)

Proof of Theorem chfacfscmul0
StepHypRef Expression
1 eluz2 12239 . . . . . 6 (𝐾 ∈ (ℤ‘(𝑠 + 2)) ↔ ((𝑠 + 2) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ (𝑠 + 2) ≤ 𝐾))
2 simpll 766 . . . . . . . . . . . 12 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → 𝐾 ∈ ℤ)
3 nngt0 11658 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ℕ → 0 < 𝑠)
4 nnre 11634 . . . . . . . . . . . . . . . . . . . . 21 (𝑠 ∈ ℕ → 𝑠 ∈ ℝ)
54adantl 485 . . . . . . . . . . . . . . . . . . . 20 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 𝑠 ∈ ℝ)
6 2rp 12384 . . . . . . . . . . . . . . . . . . . . 21 2 ∈ ℝ+
76a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 2 ∈ ℝ+)
85, 7ltaddrpd 12454 . . . . . . . . . . . . . . . . . . 19 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 𝑠 < (𝑠 + 2))
9 0red 10635 . . . . . . . . . . . . . . . . . . . 20 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 0 ∈ ℝ)
10 2re 11701 . . . . . . . . . . . . . . . . . . . . . 22 2 ∈ ℝ
1110a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 2 ∈ ℝ)
125, 11readdcld 10661 . . . . . . . . . . . . . . . . . . . 20 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (𝑠 + 2) ∈ ℝ)
13 lttr 10708 . . . . . . . . . . . . . . . . . . . 20 ((0 ∈ ℝ ∧ 𝑠 ∈ ℝ ∧ (𝑠 + 2) ∈ ℝ) → ((0 < 𝑠𝑠 < (𝑠 + 2)) → 0 < (𝑠 + 2)))
149, 5, 12, 13syl3anc 1368 . . . . . . . . . . . . . . . . . . 19 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((0 < 𝑠𝑠 < (𝑠 + 2)) → 0 < (𝑠 + 2)))
158, 14mpan2d 693 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (0 < 𝑠 → 0 < (𝑠 + 2)))
1615ex 416 . . . . . . . . . . . . . . . . 17 (𝐾 ∈ ℤ → (𝑠 ∈ ℕ → (0 < 𝑠 → 0 < (𝑠 + 2))))
1716com13 88 . . . . . . . . . . . . . . . 16 (0 < 𝑠 → (𝑠 ∈ ℕ → (𝐾 ∈ ℤ → 0 < (𝑠 + 2))))
183, 17mpcom 38 . . . . . . . . . . . . . . 15 (𝑠 ∈ ℕ → (𝐾 ∈ ℤ → 0 < (𝑠 + 2)))
1918impcom 411 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 0 < (𝑠 + 2))
20 zre 11975 . . . . . . . . . . . . . . . 16 (𝐾 ∈ ℤ → 𝐾 ∈ ℝ)
2120adantr 484 . . . . . . . . . . . . . . 15 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 𝐾 ∈ ℝ)
22 ltleletr 10724 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ (𝑠 + 2) ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((0 < (𝑠 + 2) ∧ (𝑠 + 2) ≤ 𝐾) → 0 ≤ 𝐾))
239, 12, 21, 22syl3anc 1368 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((0 < (𝑠 + 2) ∧ (𝑠 + 2) ≤ 𝐾) → 0 ≤ 𝐾))
2419, 23mpand 694 . . . . . . . . . . . . 13 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 2) ≤ 𝐾 → 0 ≤ 𝐾))
2524imp 410 . . . . . . . . . . . 12 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → 0 ≤ 𝐾)
26 elnn0z 11984 . . . . . . . . . . . 12 (𝐾 ∈ ℕ0 ↔ (𝐾 ∈ ℤ ∧ 0 ≤ 𝐾))
272, 25, 26sylanbrc 586 . . . . . . . . . . 11 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → 𝐾 ∈ ℕ0)
28 nncn 11635 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℕ → 𝑠 ∈ ℂ)
29 add1p1 11878 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℂ → ((𝑠 + 1) + 1) = (𝑠 + 2))
3028, 29syl 17 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ℕ → ((𝑠 + 1) + 1) = (𝑠 + 2))
3130adantl 485 . . . . . . . . . . . . . . 15 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 1) + 1) = (𝑠 + 2))
3231eqcomd 2804 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (𝑠 + 2) = ((𝑠 + 1) + 1))
3332breq1d 5040 . . . . . . . . . . . . 13 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 2) ≤ 𝐾 ↔ ((𝑠 + 1) + 1) ≤ 𝐾))
34 nnz 11994 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℕ → 𝑠 ∈ ℤ)
3534peano2zd 12080 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℤ)
3635anim2i 619 . . . . . . . . . . . . . . 15 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (𝐾 ∈ ℤ ∧ (𝑠 + 1) ∈ ℤ))
3736ancomd 465 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 1) ∈ ℤ ∧ 𝐾 ∈ ℤ))
38 zltp1le 12022 . . . . . . . . . . . . . . 15 (((𝑠 + 1) ∈ ℤ ∧ 𝐾 ∈ ℤ) → ((𝑠 + 1) < 𝐾 ↔ ((𝑠 + 1) + 1) ≤ 𝐾))
3938bicomd 226 . . . . . . . . . . . . . 14 (((𝑠 + 1) ∈ ℤ ∧ 𝐾 ∈ ℤ) → (((𝑠 + 1) + 1) ≤ 𝐾 ↔ (𝑠 + 1) < 𝐾))
4037, 39syl 17 . . . . . . . . . . . . 13 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (((𝑠 + 1) + 1) ≤ 𝐾 ↔ (𝑠 + 1) < 𝐾))
4133, 40bitrd 282 . . . . . . . . . . . 12 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 2) ≤ 𝐾 ↔ (𝑠 + 1) < 𝐾))
4241biimpa 480 . . . . . . . . . . 11 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → (𝑠 + 1) < 𝐾)
4327, 42jca 515 . . . . . . . . . 10 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾))
4443ex 416 . . . . . . . . 9 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 2) ≤ 𝐾 → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
4544impancom 455 . . . . . . . 8 ((𝐾 ∈ ℤ ∧ (𝑠 + 2) ≤ 𝐾) → (𝑠 ∈ ℕ → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
46453adant1 1127 . . . . . . 7 (((𝑠 + 2) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ (𝑠 + 2) ≤ 𝐾) → (𝑠 ∈ ℕ → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
4746com12 32 . . . . . 6 (𝑠 ∈ ℕ → (((𝑠 + 2) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ (𝑠 + 2) ≤ 𝐾) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
481, 47syl5bi 245 . . . . 5 (𝑠 ∈ ℕ → (𝐾 ∈ (ℤ‘(𝑠 + 2)) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
4948adantr 484 . . . 4 ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠))) → (𝐾 ∈ (ℤ‘(𝑠 + 2)) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
5049adantl 485 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) → (𝐾 ∈ (ℤ‘(𝑠 + 2)) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
51 chfacfisf.g . . . . . . 7 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))))
52 0red 10635 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 0 ∈ ℝ)
53 peano2re 10804 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ ℝ → (𝑠 + 1) ∈ ℝ)
544, 53syl 17 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℝ)
5554adantr 484 . . . . . . . . . . . . . . . 16 ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠))) → (𝑠 + 1) ∈ ℝ)
5655adantl 485 . . . . . . . . . . . . . . 15 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) → (𝑠 + 1) ∈ ℝ)
5756ad2antrr 725 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → (𝑠 + 1) ∈ ℝ)
58 nn0re 11896 . . . . . . . . . . . . . . 15 (𝐾 ∈ ℕ0𝐾 ∈ ℝ)
5958ad2antlr 726 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 𝐾 ∈ ℝ)
60 nnnn0 11894 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ ℕ → 𝑠 ∈ ℕ0)
6160adantr 484 . . . . . . . . . . . . . . . . 17 ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠))) → 𝑠 ∈ ℕ0)
6261ad2antlr 726 . . . . . . . . . . . . . . . 16 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 𝑠 ∈ ℕ0)
63 nn0p1gt0 11916 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ℕ0 → 0 < (𝑠 + 1))
6462, 63syl 17 . . . . . . . . . . . . . . 15 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 0 < (𝑠 + 1))
6564adantr 484 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 0 < (𝑠 + 1))
66 simpr 488 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → (𝑠 + 1) < 𝐾)
6752, 57, 59, 65, 66lttrd 10792 . . . . . . . . . . . . 13 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 0 < 𝐾)
6867gt0ne0d 11195 . . . . . . . . . . . 12 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 𝐾 ≠ 0)
6968neneqd 2992 . . . . . . . . . . 11 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ¬ 𝐾 = 0)
7069adantr 484 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ¬ 𝐾 = 0)
71 eqeq1 2802 . . . . . . . . . . . 12 (𝑛 = 𝐾 → (𝑛 = 0 ↔ 𝐾 = 0))
7271notbid 321 . . . . . . . . . . 11 (𝑛 = 𝐾 → (¬ 𝑛 = 0 ↔ ¬ 𝐾 = 0))
7372adantl 485 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → (¬ 𝑛 = 0 ↔ ¬ 𝐾 = 0))
7470, 73mpbird 260 . . . . . . . . 9 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ¬ 𝑛 = 0)
7574iffalsed 4436 . . . . . . . 8 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))))
7655ad2antlr 726 . . . . . . . . . . . . 13 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (𝑠 + 1) ∈ ℝ)
77 ltne 10728 . . . . . . . . . . . . 13 (((𝑠 + 1) ∈ ℝ ∧ (𝑠 + 1) < 𝐾) → 𝐾 ≠ (𝑠 + 1))
7876, 77sylan 583 . . . . . . . . . . . 12 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 𝐾 ≠ (𝑠 + 1))
7978neneqd 2992 . . . . . . . . . . 11 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ¬ 𝐾 = (𝑠 + 1))
8079adantr 484 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ¬ 𝐾 = (𝑠 + 1))
81 eqeq1 2802 . . . . . . . . . . . 12 (𝑛 = 𝐾 → (𝑛 = (𝑠 + 1) ↔ 𝐾 = (𝑠 + 1)))
8281notbid 321 . . . . . . . . . . 11 (𝑛 = 𝐾 → (¬ 𝑛 = (𝑠 + 1) ↔ ¬ 𝐾 = (𝑠 + 1)))
8382adantl 485 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → (¬ 𝑛 = (𝑠 + 1) ↔ ¬ 𝐾 = (𝑠 + 1)))
8480, 83mpbird 260 . . . . . . . . 9 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ¬ 𝑛 = (𝑠 + 1))
8584iffalsed 4436 . . . . . . . 8 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))) = if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))
86 simplr 768 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → (𝑠 + 1) < 𝐾)
87 breq2 5034 . . . . . . . . . . 11 (𝑛 = 𝐾 → ((𝑠 + 1) < 𝑛 ↔ (𝑠 + 1) < 𝐾))
8887adantl 485 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ((𝑠 + 1) < 𝑛 ↔ (𝑠 + 1) < 𝐾))
8986, 88mpbird 260 . . . . . . . . 9 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → (𝑠 + 1) < 𝑛)
9089iftrued 4433 . . . . . . . 8 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))) = 0 )
9175, 85, 903eqtrd 2837 . . . . . . 7 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = 0 )
92 simplr 768 . . . . . . 7 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 𝐾 ∈ ℕ0)
93 chfacfisf.0 . . . . . . . . 9 0 = (0g𝑌)
9493fvexi 6659 . . . . . . . 8 0 ∈ V
9594a1i 11 . . . . . . 7 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 0 ∈ V)
9651, 91, 92, 95fvmptd2 6753 . . . . . 6 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → (𝐺𝐾) = 0 )
9796oveq2d 7151 . . . . 5 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ((𝐾 𝑋) · (𝐺𝐾)) = ((𝐾 𝑋) · 0 ))
98 crngring 19305 . . . . . . . . . . 11 (𝑅 ∈ CRing → 𝑅 ∈ Ring)
99 chfacfisf.p . . . . . . . . . . . 12 𝑃 = (Poly1𝑅)
100 chfacfisf.y . . . . . . . . . . . 12 𝑌 = (𝑁 Mat 𝑃)
10199, 100pmatlmod 21305 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ LMod)
10298, 101sylan2 595 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ LMod)
1031023adant3 1129 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ LMod)
104103ad2antrr 725 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 𝑌 ∈ LMod)
10599ply1ring 20884 . . . . . . . . . . . . . 14 (𝑅 ∈ Ring → 𝑃 ∈ Ring)
10698, 105syl 17 . . . . . . . . . . . . 13 (𝑅 ∈ CRing → 𝑃 ∈ Ring)
1071063ad2ant2 1131 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑃 ∈ Ring)
108 eqid 2798 . . . . . . . . . . . . 13 (mulGrp‘𝑃) = (mulGrp‘𝑃)
109108ringmgp 19299 . . . . . . . . . . . 12 (𝑃 ∈ Ring → (mulGrp‘𝑃) ∈ Mnd)
110107, 109syl 17 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (mulGrp‘𝑃) ∈ Mnd)
111110ad2antrr 725 . . . . . . . . . 10 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (mulGrp‘𝑃) ∈ Mnd)
112 simpr 488 . . . . . . . . . 10 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 𝐾 ∈ ℕ0)
113983ad2ant2 1131 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑅 ∈ Ring)
114 chfacfscmulcl.x . . . . . . . . . . . . 13 𝑋 = (var1𝑅)
115 eqid 2798 . . . . . . . . . . . . 13 (Base‘𝑃) = (Base‘𝑃)
116114, 99, 115vr1cl 20853 . . . . . . . . . . . 12 (𝑅 ∈ Ring → 𝑋 ∈ (Base‘𝑃))
117113, 116syl 17 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑋 ∈ (Base‘𝑃))
118117ad2antrr 725 . . . . . . . . . 10 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 𝑋 ∈ (Base‘𝑃))
119108, 115mgpbas 19241 . . . . . . . . . . 11 (Base‘𝑃) = (Base‘(mulGrp‘𝑃))
120 chfacfscmulcl.e . . . . . . . . . . 11 = (.g‘(mulGrp‘𝑃))
121119, 120mulgnn0cl 18239 . . . . . . . . . 10 (((mulGrp‘𝑃) ∈ Mnd ∧ 𝐾 ∈ ℕ0𝑋 ∈ (Base‘𝑃)) → (𝐾 𝑋) ∈ (Base‘𝑃))
122111, 112, 118, 121syl3anc 1368 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (𝐾 𝑋) ∈ (Base‘𝑃))
12399ply1crng 20834 . . . . . . . . . . . . . . . 16 (𝑅 ∈ CRing → 𝑃 ∈ CRing)
124123anim2i 619 . . . . . . . . . . . . . . 15 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
1251243adant3 1129 . . . . . . . . . . . . . 14 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
126100matsca2 21032 . . . . . . . . . . . . . 14 ((𝑁 ∈ Fin ∧ 𝑃 ∈ CRing) → 𝑃 = (Scalar‘𝑌))
127125, 126syl 17 . . . . . . . . . . . . 13 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑃 = (Scalar‘𝑌))
128127eqcomd 2804 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (Scalar‘𝑌) = 𝑃)
129128fveq2d 6649 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (Base‘(Scalar‘𝑌)) = (Base‘𝑃))
130129eleq2d 2875 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → ((𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌)) ↔ (𝐾 𝑋) ∈ (Base‘𝑃)))
131130ad2antrr 725 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → ((𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌)) ↔ (𝐾 𝑋) ∈ (Base‘𝑃)))
132122, 131mpbird 260 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌)))
133104, 132jca 515 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (𝑌 ∈ LMod ∧ (𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌))))
134133adantr 484 . . . . . 6 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → (𝑌 ∈ LMod ∧ (𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌))))
135 eqid 2798 . . . . . . 7 (Scalar‘𝑌) = (Scalar‘𝑌)
136 chfacfscmulcl.m . . . . . . 7 · = ( ·𝑠𝑌)
137 eqid 2798 . . . . . . 7 (Base‘(Scalar‘𝑌)) = (Base‘(Scalar‘𝑌))
138135, 136, 137, 93lmodvs0 19664 . . . . . 6 ((𝑌 ∈ LMod ∧ (𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌))) → ((𝐾 𝑋) · 0 ) = 0 )
139134, 138syl 17 . . . . 5 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ((𝐾 𝑋) · 0 ) = 0 )
14097, 139eqtrd 2833 . . . 4 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 )
141140expl 461 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) → ((𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 ))
14250, 141syld 47 . 2 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠)))) → (𝐾 ∈ (ℤ‘(𝑠 + 2)) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 ))
1431423impia 1114 1 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵m (0...𝑠))) ∧ 𝐾 ∈ (ℤ‘(𝑠 + 2))) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 )
 Colors of variables: wff setvar class Syntax hints:  ¬ wn 3   → wi 4   ↔ wb 209   ∧ wa 399   ∧ w3a 1084   = wceq 1538   ∈ wcel 2111   ≠ wne 2987  Vcvv 3441  ifcif 4425   class class class wbr 5030   ↦ cmpt 5110  ‘cfv 6324  (class class class)co 7135   ↑m cmap 8391  Fincfn 8494  ℂcc 10526  ℝcr 10527  0cc0 10528  1c1 10529   + caddc 10531   < clt 10666   ≤ cle 10667   − cmin 10861  ℕcn 11627  2c2 11682  ℕ0cn0 11887  ℤcz 11971  ℤ≥cuz 12233  ℝ+crp 12379  ...cfz 12887  Basecbs 16477  .rcmulr 16560  Scalarcsca 16562   ·𝑠 cvsca 16563  0gc0g 16707  Mndcmnd 17905  -gcsg 18099  .gcmg 18219  mulGrpcmgp 19235  Ringcrg 19293  CRingccrg 19294  LModclmod 19630  var1cv1 20812  Poly1cpl1 20813   Mat cmat 21019   matToPolyMat cmat2pmat 21316 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 1911  ax-6 1970  ax-7 2015  ax-8 2113  ax-9 2121  ax-10 2142  ax-11 2158  ax-12 2175  ax-ext 2770  ax-rep 5154  ax-sep 5167  ax-nul 5174  ax-pow 5231  ax-pr 5295  ax-un 7443  ax-cnex 10584  ax-resscn 10585  ax-1cn 10586  ax-icn 10587  ax-addcl 10588  ax-addrcl 10589  ax-mulcl 10590  ax-mulrcl 10591  ax-mulcom 10592  ax-addass 10593  ax-mulass 10594  ax-distr 10595  ax-i2m1 10596  ax-1ne0 10597  ax-1rid 10598  ax-rnegex 10599  ax-rrecex 10600  ax-cnre 10601  ax-pre-lttri 10602  ax-pre-lttrn 10603  ax-pre-ltadd 10604  ax-pre-mulgt0 10605 This theorem depends on definitions:  df-bi 210  df-an 400  df-or 845  df-3or 1085  df-3an 1086  df-tru 1541  df-ex 1782  df-nf 1786  df-sb 2070  df-mo 2598  df-eu 2629  df-clab 2777  df-cleq 2791  df-clel 2870  df-nfc 2938  df-ne 2988  df-nel 3092  df-ral 3111  df-rex 3112  df-reu 3113  df-rmo 3114  df-rab 3115  df-v 3443  df-sbc 3721  df-csb 3829  df-dif 3884  df-un 3886  df-in 3888  df-ss 3898  df-pss 3900  df-nul 4244  df-if 4426  df-pw 4499  df-sn 4526  df-pr 4528  df-tp 4530  df-op 4532  df-ot 4534  df-uni 4801  df-int 4839  df-iun 4883  df-iin 4884  df-br 5031  df-opab 5093  df-mpt 5111  df-tr 5137  df-id 5425  df-eprel 5430  df-po 5438  df-so 5439  df-fr 5478  df-se 5479  df-we 5480  df-xp 5525  df-rel 5526  df-cnv 5527  df-co 5528  df-dm 5529  df-rn 5530  df-res 5531  df-ima 5532  df-pred 6116  df-ord 6162  df-on 6163  df-lim 6164  df-suc 6165  df-iota 6283  df-fun 6326  df-fn 6327  df-f 6328  df-f1 6329  df-fo 6330  df-f1o 6331  df-fv 6332  df-isom 6333  df-riota 7093  df-ov 7138  df-oprab 7139  df-mpo 7140  df-of 7390  df-ofr 7391  df-om 7563  df-1st 7673  df-2nd 7674  df-supp 7816  df-wrecs 7932  df-recs 7993  df-rdg 8031  df-1o 8087  df-2o 8088  df-oadd 8091  df-er 8274  df-map 8393  df-pm 8394  df-ixp 8447  df-en 8495  df-dom 8496  df-sdom 8497  df-fin 8498  df-fsupp 8820  df-sup 8892  df-oi 8960  df-card 9354  df-pnf 10668  df-mnf 10669  df-xr 10670  df-ltxr 10671  df-le 10672  df-sub 10863  df-neg 10864  df-nn 11628  df-2 11690  df-3 11691  df-4 11692  df-5 11693  df-6 11694  df-7 11695  df-8 11696  df-9 11697  df-n0 11888  df-z 11972  df-dec 12089  df-uz 12234  df-rp 12380  df-fz 12888  df-fzo 13031  df-seq 13367  df-hash 13689  df-struct 16479  df-ndx 16480  df-slot 16481  df-base 16483  df-sets 16484  df-ress 16485  df-plusg 16572  df-mulr 16573  df-sca 16575  df-vsca 16576  df-ip 16577  df-tset 16578  df-ple 16579  df-ds 16581  df-hom 16583  df-cco 16584  df-0g 16709  df-gsum 16710  df-prds 16715  df-pws 16717  df-mre 16851  df-mrc 16852  df-acs 16854  df-mgm 17846  df-sgrp 17895  df-mnd 17906  df-mhm 17950  df-submnd 17951  df-grp 18100  df-minusg 18101  df-sbg 18102  df-mulg 18220  df-subg 18271  df-ghm 18351  df-cntz 18442  df-cmn 18903  df-abl 18904  df-mgp 19236  df-ur 19248  df-ring 19295  df-cring 19296  df-subrg 19529  df-lmod 19632  df-lss 19700  df-sra 19940  df-rgmod 19941  df-dsmm 20425  df-frlm 20440  df-psr 20598  df-mvr 20599  df-mpl 20600  df-opsr 20602  df-psr1 20816  df-vr1 20817  df-ply1 20818  df-mat 21020 This theorem is referenced by:  chfacfscmulfsupp  21471  chfacfscmulgsum  21472
 Copyright terms: Public domain W3C validator