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

Theorem chfacfscmul0 21150
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 ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝐾 ∈ (ℤ‘(𝑠 + 2))) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 )
Distinct variable groups:   𝐵,𝑛   𝑛,𝑀   𝑛,𝑁   𝑅,𝑛   𝑛,𝑌   𝑛,𝑏   𝑛,𝑠,𝐵   𝑛,𝐾   0 ,𝑛
Allowed substitution hints:   𝐴(𝑛,𝑠,𝑏)   𝐵(𝑏)   𝑃(𝑛,𝑠,𝑏)   𝑅(𝑠,𝑏)   𝑇(𝑛,𝑠,𝑏)   · (𝑛,𝑠,𝑏)   × (𝑛,𝑠,𝑏)   (𝑛,𝑠,𝑏)   𝐺(𝑛,𝑠,𝑏)   𝐾(𝑠,𝑏)   𝑀(𝑠,𝑏)   (𝑛,𝑠,𝑏)   𝑁(𝑠,𝑏)   𝑋(𝑛,𝑠,𝑏)   𝑌(𝑠,𝑏)   0 (𝑠,𝑏)

Proof of Theorem chfacfscmul0
StepHypRef Expression
1 eluz2 12099 . . . . . 6 (𝐾 ∈ (ℤ‘(𝑠 + 2)) ↔ ((𝑠 + 2) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ (𝑠 + 2) ≤ 𝐾))
2 simpll 763 . . . . . . . . . . . 12 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → 𝐾 ∈ ℤ)
3 nngt0 11516 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ℕ → 0 < 𝑠)
4 nnre 11493 . . . . . . . . . . . . . . . . . . . . 21 (𝑠 ∈ ℕ → 𝑠 ∈ ℝ)
54adantl 482 . . . . . . . . . . . . . . . . . . . 20 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 𝑠 ∈ ℝ)
6 2rp 12244 . . . . . . . . . . . . . . . . . . . . 21 2 ∈ ℝ+
76a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 2 ∈ ℝ+)
85, 7ltaddrpd 12314 . . . . . . . . . . . . . . . . . . 19 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 𝑠 < (𝑠 + 2))
9 0red 10490 . . . . . . . . . . . . . . . . . . . 20 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 0 ∈ ℝ)
10 2re 11559 . . . . . . . . . . . . . . . . . . . . . 22 2 ∈ ℝ
1110a1i 11 . . . . . . . . . . . . . . . . . . . . 21 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 2 ∈ ℝ)
125, 11readdcld 10516 . . . . . . . . . . . . . . . . . . . 20 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (𝑠 + 2) ∈ ℝ)
13 lttr 10564 . . . . . . . . . . . . . . . . . . . 20 ((0 ∈ ℝ ∧ 𝑠 ∈ ℝ ∧ (𝑠 + 2) ∈ ℝ) → ((0 < 𝑠𝑠 < (𝑠 + 2)) → 0 < (𝑠 + 2)))
149, 5, 12, 13syl3anc 1364 . . . . . . . . . . . . . . . . . . 19 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((0 < 𝑠𝑠 < (𝑠 + 2)) → 0 < (𝑠 + 2)))
158, 14mpan2d 690 . . . . . . . . . . . . . . . . . 18 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (0 < 𝑠 → 0 < (𝑠 + 2)))
1615ex 413 . . . . . . . . . . . . . . . . 17 (𝐾 ∈ ℤ → (𝑠 ∈ ℕ → (0 < 𝑠 → 0 < (𝑠 + 2))))
1716com13 88 . . . . . . . . . . . . . . . 16 (0 < 𝑠 → (𝑠 ∈ ℕ → (𝐾 ∈ ℤ → 0 < (𝑠 + 2))))
183, 17mpcom 38 . . . . . . . . . . . . . . 15 (𝑠 ∈ ℕ → (𝐾 ∈ ℤ → 0 < (𝑠 + 2)))
1918impcom 408 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 0 < (𝑠 + 2))
20 zre 11833 . . . . . . . . . . . . . . . 16 (𝐾 ∈ ℤ → 𝐾 ∈ ℝ)
2120adantr 481 . . . . . . . . . . . . . . 15 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → 𝐾 ∈ ℝ)
22 ltleletr 10580 . . . . . . . . . . . . . . 15 ((0 ∈ ℝ ∧ (𝑠 + 2) ∈ ℝ ∧ 𝐾 ∈ ℝ) → ((0 < (𝑠 + 2) ∧ (𝑠 + 2) ≤ 𝐾) → 0 ≤ 𝐾))
239, 12, 21, 22syl3anc 1364 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((0 < (𝑠 + 2) ∧ (𝑠 + 2) ≤ 𝐾) → 0 ≤ 𝐾))
2419, 23mpand 691 . . . . . . . . . . . . 13 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 2) ≤ 𝐾 → 0 ≤ 𝐾))
2524imp 407 . . . . . . . . . . . 12 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → 0 ≤ 𝐾)
26 elnn0z 11842 . . . . . . . . . . . 12 (𝐾 ∈ ℕ0 ↔ (𝐾 ∈ ℤ ∧ 0 ≤ 𝐾))
272, 25, 26sylanbrc 583 . . . . . . . . . . 11 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → 𝐾 ∈ ℕ0)
28 nncn 11494 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℕ → 𝑠 ∈ ℂ)
29 add1p1 11736 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℂ → ((𝑠 + 1) + 1) = (𝑠 + 2))
3028, 29syl 17 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ℕ → ((𝑠 + 1) + 1) = (𝑠 + 2))
3130adantl 482 . . . . . . . . . . . . . . 15 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 1) + 1) = (𝑠 + 2))
3231eqcomd 2801 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (𝑠 + 2) = ((𝑠 + 1) + 1))
3332breq1d 4972 . . . . . . . . . . . . 13 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 2) ≤ 𝐾 ↔ ((𝑠 + 1) + 1) ≤ 𝐾))
34 nnz 11853 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℕ → 𝑠 ∈ ℤ)
3534peano2zd 11939 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℤ)
3635anim2i 616 . . . . . . . . . . . . . . 15 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (𝐾 ∈ ℤ ∧ (𝑠 + 1) ∈ ℤ))
3736ancomd 462 . . . . . . . . . . . . . 14 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 1) ∈ ℤ ∧ 𝐾 ∈ ℤ))
38 zltp1le 11881 . . . . . . . . . . . . . . 15 (((𝑠 + 1) ∈ ℤ ∧ 𝐾 ∈ ℤ) → ((𝑠 + 1) < 𝐾 ↔ ((𝑠 + 1) + 1) ≤ 𝐾))
3938bicomd 224 . . . . . . . . . . . . . 14 (((𝑠 + 1) ∈ ℤ ∧ 𝐾 ∈ ℤ) → (((𝑠 + 1) + 1) ≤ 𝐾 ↔ (𝑠 + 1) < 𝐾))
4037, 39syl 17 . . . . . . . . . . . . 13 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → (((𝑠 + 1) + 1) ≤ 𝐾 ↔ (𝑠 + 1) < 𝐾))
4133, 40bitrd 280 . . . . . . . . . . . 12 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 2) ≤ 𝐾 ↔ (𝑠 + 1) < 𝐾))
4241biimpa 477 . . . . . . . . . . 11 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → (𝑠 + 1) < 𝐾)
4327, 42jca 512 . . . . . . . . . 10 (((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) ∧ (𝑠 + 2) ≤ 𝐾) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾))
4443ex 413 . . . . . . . . 9 ((𝐾 ∈ ℤ ∧ 𝑠 ∈ ℕ) → ((𝑠 + 2) ≤ 𝐾 → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
4544impancom 452 . . . . . . . 8 ((𝐾 ∈ ℤ ∧ (𝑠 + 2) ≤ 𝐾) → (𝑠 ∈ ℕ → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
46453adant1 1123 . . . . . . 7 (((𝑠 + 2) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ (𝑠 + 2) ≤ 𝐾) → (𝑠 ∈ ℕ → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
4746com12 32 . . . . . 6 (𝑠 ∈ ℕ → (((𝑠 + 2) ∈ ℤ ∧ 𝐾 ∈ ℤ ∧ (𝑠 + 2) ≤ 𝐾) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
481, 47syl5bi 243 . . . . 5 (𝑠 ∈ ℕ → (𝐾 ∈ (ℤ‘(𝑠 + 2)) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
4948adantr 481 . . . 4 ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝐾 ∈ (ℤ‘(𝑠 + 2)) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
5049adantl 482 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝐾 ∈ (ℤ‘(𝑠 + 2)) → (𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾)))
51 chfacfisf.g . . . . . . 7 𝐺 = (𝑛 ∈ ℕ0 ↦ if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))))
52 0red 10490 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 0 ∈ ℝ)
53 peano2re 10660 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ ℝ → (𝑠 + 1) ∈ ℝ)
544, 53syl 17 . . . . . . . . . . . . . . . . 17 (𝑠 ∈ ℕ → (𝑠 + 1) ∈ ℝ)
5554adantr 481 . . . . . . . . . . . . . . . 16 ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → (𝑠 + 1) ∈ ℝ)
5655adantl 482 . . . . . . . . . . . . . . 15 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝑠 + 1) ∈ ℝ)
5756ad2antrr 722 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → (𝑠 + 1) ∈ ℝ)
58 nn0re 11754 . . . . . . . . . . . . . . 15 (𝐾 ∈ ℕ0𝐾 ∈ ℝ)
5958ad2antlr 723 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 𝐾 ∈ ℝ)
60 nnnn0 11752 . . . . . . . . . . . . . . . . . 18 (𝑠 ∈ ℕ → 𝑠 ∈ ℕ0)
6160adantr 481 . . . . . . . . . . . . . . . . 17 ((𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) → 𝑠 ∈ ℕ0)
6261ad2antlr 723 . . . . . . . . . . . . . . . 16 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 𝑠 ∈ ℕ0)
63 nn0p1gt0 11774 . . . . . . . . . . . . . . . 16 (𝑠 ∈ ℕ0 → 0 < (𝑠 + 1))
6462, 63syl 17 . . . . . . . . . . . . . . 15 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 0 < (𝑠 + 1))
6564adantr 481 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 0 < (𝑠 + 1))
66 simpr 485 . . . . . . . . . . . . . 14 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → (𝑠 + 1) < 𝐾)
6752, 57, 59, 65, 66lttrd 10648 . . . . . . . . . . . . 13 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 0 < 𝐾)
6867gt0ne0d 11052 . . . . . . . . . . . 12 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 𝐾 ≠ 0)
6968neneqd 2989 . . . . . . . . . . 11 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ¬ 𝐾 = 0)
7069adantr 481 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ¬ 𝐾 = 0)
71 eqeq1 2799 . . . . . . . . . . . 12 (𝑛 = 𝐾 → (𝑛 = 0 ↔ 𝐾 = 0))
7271notbid 319 . . . . . . . . . . 11 (𝑛 = 𝐾 → (¬ 𝑛 = 0 ↔ ¬ 𝐾 = 0))
7372adantl 482 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → (¬ 𝑛 = 0 ↔ ¬ 𝐾 = 0))
7470, 73mpbird 258 . . . . . . . . 9 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ¬ 𝑛 = 0)
7574iffalsed 4392 . . . . . . . 8 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))))
7655ad2antlr 723 . . . . . . . . . . . . 13 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (𝑠 + 1) ∈ ℝ)
77 ltne 10584 . . . . . . . . . . . . 13 (((𝑠 + 1) ∈ ℝ ∧ (𝑠 + 1) < 𝐾) → 𝐾 ≠ (𝑠 + 1))
7876, 77sylan 580 . . . . . . . . . . . 12 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 𝐾 ≠ (𝑠 + 1))
7978neneqd 2989 . . . . . . . . . . 11 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ¬ 𝐾 = (𝑠 + 1))
8079adantr 481 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ¬ 𝐾 = (𝑠 + 1))
81 eqeq1 2799 . . . . . . . . . . . 12 (𝑛 = 𝐾 → (𝑛 = (𝑠 + 1) ↔ 𝐾 = (𝑠 + 1)))
8281notbid 319 . . . . . . . . . . 11 (𝑛 = 𝐾 → (¬ 𝑛 = (𝑠 + 1) ↔ ¬ 𝐾 = (𝑠 + 1)))
8382adantl 482 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → (¬ 𝑛 = (𝑠 + 1) ↔ ¬ 𝐾 = (𝑠 + 1)))
8480, 83mpbird 258 . . . . . . . . 9 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ¬ 𝑛 = (𝑠 + 1))
8584iffalsed 4392 . . . . . . . 8 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛)))))) = if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))
86 simplr 765 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → (𝑠 + 1) < 𝐾)
87 breq2 4966 . . . . . . . . . . 11 (𝑛 = 𝐾 → ((𝑠 + 1) < 𝑛 ↔ (𝑠 + 1) < 𝐾))
8887adantl 482 . . . . . . . . . 10 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → ((𝑠 + 1) < 𝑛 ↔ (𝑠 + 1) < 𝐾))
8986, 88mpbird 258 . . . . . . . . 9 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → (𝑠 + 1) < 𝑛)
9089iftrued 4389 . . . . . . . 8 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))) = 0 )
9175, 85, 903eqtrd 2835 . . . . . . 7 ((((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) ∧ 𝑛 = 𝐾) → if(𝑛 = 0, ( 0 ((𝑇𝑀) × (𝑇‘(𝑏‘0)))), if(𝑛 = (𝑠 + 1), (𝑇‘(𝑏𝑠)), if((𝑠 + 1) < 𝑛, 0 , ((𝑇‘(𝑏‘(𝑛 − 1))) ((𝑇𝑀) × (𝑇‘(𝑏𝑛))))))) = 0 )
92 simplr 765 . . . . . . 7 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 𝐾 ∈ ℕ0)
93 chfacfisf.0 . . . . . . . . 9 0 = (0g𝑌)
9493fvexi 6552 . . . . . . . 8 0 ∈ V
9594a1i 11 . . . . . . 7 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → 0 ∈ V)
9651, 91, 92, 95fvmptd2 6642 . . . . . 6 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → (𝐺𝐾) = 0 )
9796oveq2d 7032 . . . . 5 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ((𝐾 𝑋) · (𝐺𝐾)) = ((𝐾 𝑋) · 0 ))
98 crngring 18998 . . . . . . . . . . 11 (𝑅 ∈ CRing → 𝑅 ∈ Ring)
99 chfacfisf.p . . . . . . . . . . . 12 𝑃 = (Poly1𝑅)
100 chfacfisf.y . . . . . . . . . . . 12 𝑌 = (𝑁 Mat 𝑃)
10199, 100pmatlmod 20986 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ Ring) → 𝑌 ∈ LMod)
10298, 101sylan2 592 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → 𝑌 ∈ LMod)
1031023adant3 1125 . . . . . . . . 9 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑌 ∈ LMod)
104103ad2antrr 722 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 𝑌 ∈ LMod)
10599ply1ring 20099 . . . . . . . . . . . . . 14 (𝑅 ∈ Ring → 𝑃 ∈ Ring)
10698, 105syl 17 . . . . . . . . . . . . 13 (𝑅 ∈ CRing → 𝑃 ∈ Ring)
1071063ad2ant2 1127 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑃 ∈ Ring)
108 eqid 2795 . . . . . . . . . . . . 13 (mulGrp‘𝑃) = (mulGrp‘𝑃)
109108ringmgp 18993 . . . . . . . . . . . 12 (𝑃 ∈ Ring → (mulGrp‘𝑃) ∈ Mnd)
110107, 109syl 17 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (mulGrp‘𝑃) ∈ Mnd)
111110ad2antrr 722 . . . . . . . . . 10 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (mulGrp‘𝑃) ∈ Mnd)
112 simpr 485 . . . . . . . . . 10 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 𝐾 ∈ ℕ0)
113983ad2ant2 1127 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑅 ∈ Ring)
114 chfacfscmulcl.x . . . . . . . . . . . . 13 𝑋 = (var1𝑅)
115 eqid 2795 . . . . . . . . . . . . 13 (Base‘𝑃) = (Base‘𝑃)
116114, 99, 115vr1cl 20068 . . . . . . . . . . . 12 (𝑅 ∈ Ring → 𝑋 ∈ (Base‘𝑃))
117113, 116syl 17 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑋 ∈ (Base‘𝑃))
118117ad2antrr 722 . . . . . . . . . 10 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → 𝑋 ∈ (Base‘𝑃))
119108, 115mgpbas 18935 . . . . . . . . . . 11 (Base‘𝑃) = (Base‘(mulGrp‘𝑃))
120 chfacfscmulcl.e . . . . . . . . . . 11 = (.g‘(mulGrp‘𝑃))
121119, 120mulgnn0cl 17999 . . . . . . . . . 10 (((mulGrp‘𝑃) ∈ Mnd ∧ 𝐾 ∈ ℕ0𝑋 ∈ (Base‘𝑃)) → (𝐾 𝑋) ∈ (Base‘𝑃))
122111, 112, 118, 121syl3anc 1364 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (𝐾 𝑋) ∈ (Base‘𝑃))
12399ply1crng 20049 . . . . . . . . . . . . . . . 16 (𝑅 ∈ CRing → 𝑃 ∈ CRing)
124123anim2i 616 . . . . . . . . . . . . . . 15 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
1251243adant3 1125 . . . . . . . . . . . . . 14 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (𝑁 ∈ Fin ∧ 𝑃 ∈ CRing))
126100matsca2 20713 . . . . . . . . . . . . . 14 ((𝑁 ∈ Fin ∧ 𝑃 ∈ CRing) → 𝑃 = (Scalar‘𝑌))
127125, 126syl 17 . . . . . . . . . . . . 13 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → 𝑃 = (Scalar‘𝑌))
128127eqcomd 2801 . . . . . . . . . . . 12 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (Scalar‘𝑌) = 𝑃)
129128fveq2d 6542 . . . . . . . . . . 11 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → (Base‘(Scalar‘𝑌)) = (Base‘𝑃))
130129eleq2d 2868 . . . . . . . . . 10 ((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) → ((𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌)) ↔ (𝐾 𝑋) ∈ (Base‘𝑃)))
131130ad2antrr 722 . . . . . . . . 9 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → ((𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌)) ↔ (𝐾 𝑋) ∈ (Base‘𝑃)))
132122, 131mpbird 258 . . . . . . . 8 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌)))
133104, 132jca 512 . . . . . . 7 ((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) → (𝑌 ∈ LMod ∧ (𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌))))
134133adantr 481 . . . . . 6 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → (𝑌 ∈ LMod ∧ (𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌))))
135 eqid 2795 . . . . . . 7 (Scalar‘𝑌) = (Scalar‘𝑌)
136 chfacfscmulcl.m . . . . . . 7 · = ( ·𝑠𝑌)
137 eqid 2795 . . . . . . 7 (Base‘(Scalar‘𝑌)) = (Base‘(Scalar‘𝑌))
138135, 136, 137, 93lmodvs0 19358 . . . . . 6 ((𝑌 ∈ LMod ∧ (𝐾 𝑋) ∈ (Base‘(Scalar‘𝑌))) → ((𝐾 𝑋) · 0 ) = 0 )
139134, 138syl 17 . . . . 5 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ((𝐾 𝑋) · 0 ) = 0 )
14097, 139eqtrd 2831 . . . 4 (((((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) ∧ 𝐾 ∈ ℕ0) ∧ (𝑠 + 1) < 𝐾) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 )
141140expl 458 . . 3 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → ((𝐾 ∈ ℕ0 ∧ (𝑠 + 1) < 𝐾) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 ))
14250, 141syld 47 . 2 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠)))) → (𝐾 ∈ (ℤ‘(𝑠 + 2)) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 ))
1431423impia 1110 1 (((𝑁 ∈ Fin ∧ 𝑅 ∈ CRing ∧ 𝑀𝐵) ∧ (𝑠 ∈ ℕ ∧ 𝑏 ∈ (𝐵𝑚 (0...𝑠))) ∧ 𝐾 ∈ (ℤ‘(𝑠 + 2))) → ((𝐾 𝑋) · (𝐺𝐾)) = 0 )
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396  w3a 1080   = wceq 1522  wcel 2081  wne 2984  Vcvv 3437  ifcif 4381   class class class wbr 4962  cmpt 5041  cfv 6225  (class class class)co 7016  𝑚 cmap 8256  Fincfn 8357  cc 10381  cr 10382  0cc0 10383  1c1 10384   + caddc 10386   < clt 10521  cle 10522  cmin 10717  cn 11486  2c2 11540  0cn0 11745  cz 11829  cuz 12093  +crp 12239  ...cfz 12742  Basecbs 16312  .rcmulr 16395  Scalarcsca 16397   ·𝑠 cvsca 16398  0gc0g 16542  Mndcmnd 17733  -gcsg 17863  .gcmg 17981  mulGrpcmgp 18929  Ringcrg 18987  CRingccrg 18988  LModclmod 19324  var1cv1 20027  Poly1cpl1 20028   Mat cmat 20700   matToPolyMat cmat2pmat 20996
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1777  ax-4 1791  ax-5 1888  ax-6 1947  ax-7 1992  ax-8 2083  ax-9 2091  ax-10 2112  ax-11 2126  ax-12 2141  ax-13 2344  ax-ext 2769  ax-rep 5081  ax-sep 5094  ax-nul 5101  ax-pow 5157  ax-pr 5221  ax-un 7319  ax-cnex 10439  ax-resscn 10440  ax-1cn 10441  ax-icn 10442  ax-addcl 10443  ax-addrcl 10444  ax-mulcl 10445  ax-mulrcl 10446  ax-mulcom 10447  ax-addass 10448  ax-mulass 10449  ax-distr 10450  ax-i2m1 10451  ax-1ne0 10452  ax-1rid 10453  ax-rnegex 10454  ax-rrecex 10455  ax-cnre 10456  ax-pre-lttri 10457  ax-pre-lttrn 10458  ax-pre-ltadd 10459  ax-pre-mulgt0 10460
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 843  df-3or 1081  df-3an 1082  df-tru 1525  df-ex 1762  df-nf 1766  df-sb 2043  df-mo 2576  df-eu 2612  df-clab 2776  df-cleq 2788  df-clel 2863  df-nfc 2935  df-ne 2985  df-nel 3091  df-ral 3110  df-rex 3111  df-reu 3112  df-rmo 3113  df-rab 3114  df-v 3439  df-sbc 3707  df-csb 3812  df-dif 3862  df-un 3864  df-in 3866  df-ss 3874  df-pss 3876  df-nul 4212  df-if 4382  df-pw 4455  df-sn 4473  df-pr 4475  df-tp 4477  df-op 4479  df-ot 4481  df-uni 4746  df-int 4783  df-iun 4827  df-iin 4828  df-br 4963  df-opab 5025  df-mpt 5042  df-tr 5064  df-id 5348  df-eprel 5353  df-po 5362  df-so 5363  df-fr 5402  df-se 5403  df-we 5404  df-xp 5449  df-rel 5450  df-cnv 5451  df-co 5452  df-dm 5453  df-rn 5454  df-res 5455  df-ima 5456  df-pred 6023  df-ord 6069  df-on 6070  df-lim 6071  df-suc 6072  df-iota 6189  df-fun 6227  df-fn 6228  df-f 6229  df-f1 6230  df-fo 6231  df-f1o 6232  df-fv 6233  df-isom 6234  df-riota 6977  df-ov 7019  df-oprab 7020  df-mpo 7021  df-of 7267  df-ofr 7268  df-om 7437  df-1st 7545  df-2nd 7546  df-supp 7682  df-wrecs 7798  df-recs 7860  df-rdg 7898  df-1o 7953  df-2o 7954  df-oadd 7957  df-er 8139  df-map 8258  df-pm 8259  df-ixp 8311  df-en 8358  df-dom 8359  df-sdom 8360  df-fin 8361  df-fsupp 8680  df-sup 8752  df-oi 8820  df-card 9214  df-pnf 10523  df-mnf 10524  df-xr 10525  df-ltxr 10526  df-le 10527  df-sub 10719  df-neg 10720  df-nn 11487  df-2 11548  df-3 11549  df-4 11550  df-5 11551  df-6 11552  df-7 11553  df-8 11554  df-9 11555  df-n0 11746  df-z 11830  df-dec 11948  df-uz 12094  df-rp 12240  df-fz 12743  df-fzo 12884  df-seq 13220  df-hash 13541  df-struct 16314  df-ndx 16315  df-slot 16316  df-base 16318  df-sets 16319  df-ress 16320  df-plusg 16407  df-mulr 16408  df-sca 16410  df-vsca 16411  df-ip 16412  df-tset 16413  df-ple 16414  df-ds 16416  df-hom 16418  df-cco 16419  df-0g 16544  df-gsum 16545  df-prds 16550  df-pws 16552  df-mre 16686  df-mrc 16687  df-acs 16689  df-mgm 17681  df-sgrp 17723  df-mnd 17734  df-mhm 17774  df-submnd 17775  df-grp 17864  df-minusg 17865  df-sbg 17866  df-mulg 17982  df-subg 18030  df-ghm 18097  df-cntz 18188  df-cmn 18635  df-abl 18636  df-mgp 18930  df-ur 18942  df-ring 18989  df-cring 18990  df-subrg 19223  df-lmod 19326  df-lss 19394  df-sra 19634  df-rgmod 19635  df-psr 19824  df-mvr 19825  df-mpl 19826  df-opsr 19828  df-psr1 20031  df-vr1 20032  df-ply1 20033  df-dsmm 20558  df-frlm 20573  df-mat 20701
This theorem is referenced by:  chfacfscmulfsupp  21151  chfacfscmulgsum  21152
  Copyright terms: Public domain W3C validator