Users' Mathboxes Mathbox for metakunt < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  deg1pow Structured version   Visualization version   GIF version

Theorem deg1pow 42833
Description: Exact degree of a power of a polynomial in an integral domain. (Contributed by metakunt, 6-May-2025.)
Hypotheses
Ref Expression
deg1pow.1 (𝜑𝑅 ∈ IDomn)
deg1pow.2 (𝜑𝐹 ∈ (Base‘(Poly1𝑅)))
deg1pow.3 (𝜑𝐹 ≠ (0g‘(Poly1𝑅)))
deg1pow.4 (𝜑𝐴 ∈ ℕ0)
deg1pow.5 = (.g‘(mulGrp‘(Poly1𝑅)))
deg1pow.6 𝐷 = (deg1𝑅)
Assertion
Ref Expression
deg1pow (𝜑 → (𝐷‘(𝐴 𝐹)) = (𝐴 · (𝐷𝐹)))

Proof of Theorem deg1pow
Dummy variables 𝑥 𝑦 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 deg1pow.4 . 2 (𝜑𝐴 ∈ ℕ0)
2 fvoveq1 7434 . . . . 5 (𝑥 = 0 → (𝐷‘(𝑥 𝐹)) = (𝐷‘(0 𝐹)))
3 oveq1 7418 . . . . 5 (𝑥 = 0 → (𝑥 · (𝐷𝐹)) = (0 · (𝐷𝐹)))
42, 3eqeq12d 2785 . . . 4 (𝑥 = 0 → ((𝐷‘(𝑥 𝐹)) = (𝑥 · (𝐷𝐹)) ↔ (𝐷‘(0 𝐹)) = (0 · (𝐷𝐹))))
5 fvoveq1 7434 . . . . 5 (𝑥 = 𝑦 → (𝐷‘(𝑥 𝐹)) = (𝐷‘(𝑦 𝐹)))
6 oveq1 7418 . . . . 5 (𝑥 = 𝑦 → (𝑥 · (𝐷𝐹)) = (𝑦 · (𝐷𝐹)))
75, 6eqeq12d 2785 . . . 4 (𝑥 = 𝑦 → ((𝐷‘(𝑥 𝐹)) = (𝑥 · (𝐷𝐹)) ↔ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))))
8 fvoveq1 7434 . . . . 5 (𝑥 = (𝑦 + 1) → (𝐷‘(𝑥 𝐹)) = (𝐷‘((𝑦 + 1) 𝐹)))
9 oveq1 7418 . . . . 5 (𝑥 = (𝑦 + 1) → (𝑥 · (𝐷𝐹)) = ((𝑦 + 1) · (𝐷𝐹)))
108, 9eqeq12d 2785 . . . 4 (𝑥 = (𝑦 + 1) → ((𝐷‘(𝑥 𝐹)) = (𝑥 · (𝐷𝐹)) ↔ (𝐷‘((𝑦 + 1) 𝐹)) = ((𝑦 + 1) · (𝐷𝐹))))
11 fvoveq1 7434 . . . . 5 (𝑥 = 𝐴 → (𝐷‘(𝑥 𝐹)) = (𝐷‘(𝐴 𝐹)))
12 oveq1 7418 . . . . 5 (𝑥 = 𝐴 → (𝑥 · (𝐷𝐹)) = (𝐴 · (𝐷𝐹)))
1311, 12eqeq12d 2785 . . . 4 (𝑥 = 𝐴 → ((𝐷‘(𝑥 𝐹)) = (𝑥 · (𝐷𝐹)) ↔ (𝐷‘(𝐴 𝐹)) = (𝐴 · (𝐷𝐹))))
14 deg1pow.2 . . . . . . . 8 (𝜑𝐹 ∈ (Base‘(Poly1𝑅)))
15 eqid 2769 . . . . . . . . . 10 (mulGrp‘(Poly1𝑅)) = (mulGrp‘(Poly1𝑅))
16 eqid 2769 . . . . . . . . . 10 (Base‘(Poly1𝑅)) = (Base‘(Poly1𝑅))
1715, 16mgpbas 20221 . . . . . . . . 9 (Base‘(Poly1𝑅)) = (Base‘(mulGrp‘(Poly1𝑅)))
18 eqid 2769 . . . . . . . . . 10 (1r‘(Poly1𝑅)) = (1r‘(Poly1𝑅))
1915, 18ringidval 20265 . . . . . . . . 9 (1r‘(Poly1𝑅)) = (0g‘(mulGrp‘(Poly1𝑅)))
20 deg1pow.5 . . . . . . . . 9 = (.g‘(mulGrp‘(Poly1𝑅)))
2117, 19, 20mulg0 19140 . . . . . . . 8 (𝐹 ∈ (Base‘(Poly1𝑅)) → (0 𝐹) = (1r‘(Poly1𝑅)))
2214, 21syl 18 . . . . . . 7 (𝜑 → (0 𝐹) = (1r‘(Poly1𝑅)))
2322fveq2d 6886 . . . . . 6 (𝜑 → (𝐷‘(0 𝐹)) = (𝐷‘(1r‘(Poly1𝑅))))
24 deg1pow.1 . . . . . . . . . . 11 (𝜑𝑅 ∈ IDomn)
25 isidom 20809 . . . . . . . . . . . . 13 (𝑅 ∈ IDomn ↔ (𝑅 ∈ CRing ∧ 𝑅 ∈ Domn))
2625simprbi 502 . . . . . . . . . . . 12 (𝑅 ∈ IDomn → 𝑅 ∈ Domn)
27 domnring 20792 . . . . . . . . . . . 12 (𝑅 ∈ Domn → 𝑅 ∈ Ring)
2826, 27syl 18 . . . . . . . . . . 11 (𝑅 ∈ IDomn → 𝑅 ∈ Ring)
2924, 28syl 18 . . . . . . . . . 10 (𝜑𝑅 ∈ Ring)
30 eqid 2769 . . . . . . . . . . 11 (Poly1𝑅) = (Poly1𝑅)
31 eqid 2769 . . . . . . . . . . 11 (algSc‘(Poly1𝑅)) = (algSc‘(Poly1𝑅))
32 eqid 2769 . . . . . . . . . . 11 (1r𝑅) = (1r𝑅)
3330, 31, 32, 18ply1scl1 22422 . . . . . . . . . 10 (𝑅 ∈ Ring → ((algSc‘(Poly1𝑅))‘(1r𝑅)) = (1r‘(Poly1𝑅)))
3429, 33syl 18 . . . . . . . . 9 (𝜑 → ((algSc‘(Poly1𝑅))‘(1r𝑅)) = (1r‘(Poly1𝑅)))
3534eqcomd 2775 . . . . . . . 8 (𝜑 → (1r‘(Poly1𝑅)) = ((algSc‘(Poly1𝑅))‘(1r𝑅)))
3635fveq2d 6886 . . . . . . 7 (𝜑 → (𝐷‘(1r‘(Poly1𝑅))) = (𝐷‘((algSc‘(Poly1𝑅))‘(1r𝑅))))
37 eqid 2769 . . . . . . . . . 10 (Base‘𝑅) = (Base‘𝑅)
3837, 32ringidcl 20348 . . . . . . . . 9 (𝑅 ∈ Ring → (1r𝑅) ∈ (Base‘𝑅))
3929, 38syl 18 . . . . . . . 8 (𝜑 → (1r𝑅) ∈ (Base‘𝑅))
4024, 26syl 18 . . . . . . . . . 10 (𝜑𝑅 ∈ Domn)
41 domnnzr 20791 . . . . . . . . . 10 (𝑅 ∈ Domn → 𝑅 ∈ NzRing)
4240, 41syl 18 . . . . . . . . 9 (𝜑𝑅 ∈ NzRing)
43 eqid 2769 . . . . . . . . . 10 (0g𝑅) = (0g𝑅)
4432, 43nzrnz 20598 . . . . . . . . 9 (𝑅 ∈ NzRing → (1r𝑅) ≠ (0g𝑅))
4542, 44syl 18 . . . . . . . 8 (𝜑 → (1r𝑅) ≠ (0g𝑅))
46 deg1pow.6 . . . . . . . . 9 𝐷 = (deg1𝑅)
4746, 30, 37, 31, 43deg1scl 26239 . . . . . . . 8 ((𝑅 ∈ Ring ∧ (1r𝑅) ∈ (Base‘𝑅) ∧ (1r𝑅) ≠ (0g𝑅)) → (𝐷‘((algSc‘(Poly1𝑅))‘(1r𝑅))) = 0)
4829, 39, 45, 47syl3anc 1396 . . . . . . 7 (𝜑 → (𝐷‘((algSc‘(Poly1𝑅))‘(1r𝑅))) = 0)
4936, 48eqtrd 2804 . . . . . 6 (𝜑 → (𝐷‘(1r‘(Poly1𝑅))) = 0)
5023, 49eqtrd 2804 . . . . 5 (𝜑 → (𝐷‘(0 𝐹)) = 0)
51 deg1pow.3 . . . . . . . . 9 (𝜑𝐹 ≠ (0g‘(Poly1𝑅)))
52 eqid 2769 . . . . . . . . . 10 (0g‘(Poly1𝑅)) = (0g‘(Poly1𝑅))
5346, 30, 52, 16deg1nn0cl 26214 . . . . . . . . 9 ((𝑅 ∈ Ring ∧ 𝐹 ∈ (Base‘(Poly1𝑅)) ∧ 𝐹 ≠ (0g‘(Poly1𝑅))) → (𝐷𝐹) ∈ ℕ0)
5429, 14, 51, 53syl3anc 1396 . . . . . . . 8 (𝜑 → (𝐷𝐹) ∈ ℕ0)
5554nn0cnd 12567 . . . . . . 7 (𝜑 → (𝐷𝐹) ∈ ℂ)
5655mul02d 11408 . . . . . 6 (𝜑 → (0 · (𝐷𝐹)) = 0)
5756eqcomd 2775 . . . . 5 (𝜑 → 0 = (0 · (𝐷𝐹)))
5850, 57eqtrd 2804 . . . 4 (𝜑 → (𝐷‘(0 𝐹)) = (0 · (𝐷𝐹)))
5930ply1idom 26251 . . . . . . . . . . . 12 (𝑅 ∈ IDomn → (Poly1𝑅) ∈ IDomn)
6024, 59syl 18 . . . . . . . . . . 11 (𝜑 → (Poly1𝑅) ∈ IDomn)
6160idomringd 20812 . . . . . . . . . 10 (𝜑 → (Poly1𝑅) ∈ Ring)
6261adantr 485 . . . . . . . . 9 ((𝜑𝑦 ∈ ℕ0) → (Poly1𝑅) ∈ Ring)
6362adantr 485 . . . . . . . 8 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (Poly1𝑅) ∈ Ring)
6415ringmgp 20321 . . . . . . . 8 ((Poly1𝑅) ∈ Ring → (mulGrp‘(Poly1𝑅)) ∈ Mnd)
6563, 64syl 18 . . . . . . 7 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (mulGrp‘(Poly1𝑅)) ∈ Mnd)
66 simplr 780 . . . . . . 7 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → 𝑦 ∈ ℕ0)
6714ad2antrr 738 . . . . . . 7 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → 𝐹 ∈ (Base‘(Poly1𝑅)))
68 eqid 2769 . . . . . . . 8 (+g‘(mulGrp‘(Poly1𝑅))) = (+g‘(mulGrp‘(Poly1𝑅)))
6917, 20, 68mulgnn0p1 19151 . . . . . . 7 (((mulGrp‘(Poly1𝑅)) ∈ Mnd ∧ 𝑦 ∈ ℕ0𝐹 ∈ (Base‘(Poly1𝑅))) → ((𝑦 + 1) 𝐹) = ((𝑦 𝐹)(+g‘(mulGrp‘(Poly1𝑅)))𝐹))
7065, 66, 67, 69syl3anc 1396 . . . . . 6 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → ((𝑦 + 1) 𝐹) = ((𝑦 𝐹)(+g‘(mulGrp‘(Poly1𝑅)))𝐹))
7170fveq2d 6886 . . . . 5 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (𝐷‘((𝑦 + 1) 𝐹)) = (𝐷‘((𝑦 𝐹)(+g‘(mulGrp‘(Poly1𝑅)))𝐹)))
72 eqid 2769 . . . . . . . . 9 (.r‘(Poly1𝑅)) = (.r‘(Poly1𝑅))
7315, 72mgpplusg 20220 . . . . . . . 8 (.r‘(Poly1𝑅)) = (+g‘(mulGrp‘(Poly1𝑅)))
7473eqcomi 2778 . . . . . . 7 (+g‘(mulGrp‘(Poly1𝑅))) = (.r‘(Poly1𝑅))
7524idomdomd 20810 . . . . . . . . 9 (𝜑𝑅 ∈ Domn)
7675adantr 485 . . . . . . . 8 ((𝜑𝑦 ∈ ℕ0) → 𝑅 ∈ Domn)
7776adantr 485 . . . . . . 7 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → 𝑅 ∈ Domn)
7817, 20, 65, 66, 67mulgnn0cld 19161 . . . . . . 7 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (𝑦 𝐹) ∈ (Base‘(Poly1𝑅)))
7960adantr 485 . . . . . . . . 9 ((𝜑𝑦 ∈ ℕ0) → (Poly1𝑅) ∈ IDomn)
8079adantr 485 . . . . . . . 8 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (Poly1𝑅) ∈ IDomn)
8151ad2antrr 738 . . . . . . . 8 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → 𝐹 ≠ (0g‘(Poly1𝑅)))
8280, 67, 81, 66, 20idomnnzpownz 42824 . . . . . . 7 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (𝑦 𝐹) ≠ (0g‘(Poly1𝑅)))
8346, 30, 16, 74, 52, 77, 78, 82, 67, 81deg1mul 26241 . . . . . 6 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (𝐷‘((𝑦 𝐹)(+g‘(mulGrp‘(Poly1𝑅)))𝐹)) = ((𝐷‘(𝑦 𝐹)) + (𝐷𝐹)))
84 simpr 489 . . . . . . . 8 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹)))
8584oveq1d 7426 . . . . . . 7 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → ((𝐷‘(𝑦 𝐹)) + (𝐷𝐹)) = ((𝑦 · (𝐷𝐹)) + (𝐷𝐹)))
8666nn0cnd 12567 . . . . . . . . 9 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → 𝑦 ∈ ℂ)
8755ad2antrr 738 . . . . . . . . 9 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (𝐷𝐹) ∈ ℂ)
8886, 87adddirp1d 11235 . . . . . . . 8 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → ((𝑦 + 1) · (𝐷𝐹)) = ((𝑦 · (𝐷𝐹)) + (𝐷𝐹)))
8988eqcomd 2775 . . . . . . 7 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → ((𝑦 · (𝐷𝐹)) + (𝐷𝐹)) = ((𝑦 + 1) · (𝐷𝐹)))
9085, 89eqtrd 2804 . . . . . 6 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → ((𝐷‘(𝑦 𝐹)) + (𝐷𝐹)) = ((𝑦 + 1) · (𝐷𝐹)))
9183, 90eqtrd 2804 . . . . 5 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (𝐷‘((𝑦 𝐹)(+g‘(mulGrp‘(Poly1𝑅)))𝐹)) = ((𝑦 + 1) · (𝐷𝐹)))
9271, 91eqtrd 2804 . . . 4 (((𝜑𝑦 ∈ ℕ0) ∧ (𝐷‘(𝑦 𝐹)) = (𝑦 · (𝐷𝐹))) → (𝐷‘((𝑦 + 1) 𝐹)) = ((𝑦 + 1) · (𝐷𝐹)))
934, 7, 10, 13, 58, 92nn0indd 12693 . . 3 ((𝜑𝐴 ∈ ℕ0) → (𝐷‘(𝐴 𝐹)) = (𝐴 · (𝐷𝐹)))
9493ex 417 . 2 (𝜑 → (𝐴 ∈ ℕ0 → (𝐷‘(𝐴 𝐹)) = (𝐴 · (𝐷𝐹))))
951, 94mpd 16 1 (𝜑 → (𝐷‘(𝐴 𝐹)) = (𝐴 · (𝐷𝐹)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 400   = wceq 1567  wcel 2149  wne 2964  cfv 6537  (class class class)co 7411  cc 11098  0cc0 11100  1c1 11101   + caddc 11103   · cmul 11105  0cn0 12504  Basecbs 17269  +gcplusg 17310  .rcmulr 17311  0gc0g 17492  Mndcmnd 18792  .gcmg 19133  mulGrpcmgp 20216  1rcur 20263  Ringcrg 20315  CRingccrg 20316  NzRingcnzr 20595  Domncdomn 20777  IDomncidom 20778  algSccascl 21971  Poly1cpl1 22306  deg1cdg1 26180
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1822  ax-4 1836  ax-5 1937  ax-6 1994  ax-7 2035  ax-8 2151  ax-9 2159  ax-10 2182  ax-11 2198  ax-12 2219  ax-ext 2741  ax-rep 5240  ax-sep 5259  ax-nul 5271  ax-pow 5337  ax-pr 5405  ax-un 7733  ax-cnex 11156  ax-resscn 11157  ax-1cn 11158  ax-icn 11159  ax-addcl 11160  ax-addrcl 11161  ax-mulcl 11162  ax-mulrcl 11163  ax-mulcom 11164  ax-addass 11165  ax-mulass 11166  ax-distr 11167  ax-i2m1 11168  ax-1ne0 11169  ax-1rid 11170  ax-rnegex 11171  ax-rrecex 11172  ax-cnre 11173  ax-pre-lttri 11174  ax-pre-lttrn 11175  ax-pre-ltadd 11176  ax-pre-mulgt0 11177  ax-pre-sup 11178  ax-addf 11179
This theorem depends on definitions:  df-bi 210  df-an 401  df-or 861  df-3or 1102  df-3an 1103  df-tru 1570  df-fal 1580  df-ex 1807  df-nf 1811  df-sb 2098  df-mo 2573  df-eu 2603  df-clab 2748  df-cleq 2761  df-clel 2844  df-nfc 2918  df-ne 2965  df-nel 3071  df-ral 3086  df-rex 3096  df-rmo 3375  df-reu 3376  df-rab 3423  df-v 3463  df-sbc 3752  df-csb 3860  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-pss 3931  df-nul 4293  df-if 4491  df-pw 4567  df-sn 4593  df-pr 4595  df-tp 4597  df-op 4599  df-uni 4875  df-int 4915  df-iun 4960  df-iin 4961  df-br 5112  df-opab 5176  df-mpt 5195  df-tr 5221  df-id 5557  df-eprel 5562  df-po 5570  df-so 5571  df-fr 5615  df-se 5616  df-we 5617  df-xp 5668  df-rel 5669  df-cnv 5670  df-co 5671  df-dm 5672  df-rn 5673  df-res 5674  df-ima 5675  df-pred 6303  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6493  df-fun 6539  df-fn 6540  df-f 6541  df-f1 6542  df-fo 6543  df-f1o 6544  df-fv 6545  df-isom 6546  df-riota 7368  df-ov 7414  df-oprab 7415  df-mpo 7416  df-of 7675  df-ofr 7676  df-om 7863  df-1st 7986  df-2nd 7987  df-supp 8157  df-frecs 8278  df-wrecs 8309  df-recs 8358  df-rdg 8397  df-1o 8453  df-2o 8454  df-er 8694  df-map 8826  df-pm 8827  df-ixp 8896  df-en 8944  df-dom 8945  df-sdom 8946  df-fin 8947  df-fsupp 9322  df-sup 9402  df-oi 9472  df-card 9925  df-pnf 11245  df-mnf 11246  df-xr 11247  df-ltxr 11248  df-le 11249  df-sub 11443  df-neg 11444  df-nn 12234  df-2 12303  df-3 12304  df-4 12305  df-5 12306  df-6 12307  df-7 12308  df-8 12309  df-9 12310  df-n0 12505  df-z 12592  df-dec 12712  df-uz 12863  df-fz 13536  df-fzo 13683  df-seq 14038  df-hash 14367  df-struct 17207  df-sets 17224  df-slot 17242  df-ndx 17254  df-base 17270  df-ress 17291  df-plusg 17323  df-mulr 17324  df-starv 17325  df-sca 17326  df-vsca 17327  df-ip 17328  df-tset 17329  df-ple 17330  df-ds 17332  df-unif 17333  df-hom 17334  df-cco 17335  df-0g 17494  df-gsum 17495  df-prds 17500  df-pws 17502  df-mre 17638  df-mrc 17639  df-acs 17641  df-mgm 18698  df-sgrp 18777  df-mnd 18793  df-mhm 18841  df-submnd 18842  df-grp 19003  df-minusg 19004  df-sbg 19005  df-mulg 19134  df-subg 19189  df-ghm 19284  df-cntz 19387  df-cmn 19852  df-abl 19853  df-mgp 20217  df-rng 20231  df-ur 20264  df-ring 20317  df-cring 20318  df-nzr 20596  df-subrng 20631  df-subrg 20655  df-rlreg 20779  df-domn 20780  df-idom 20781  df-lmod 20961  df-lss 21031  df-cnfld 21492  df-ascl 21974  df-psr 22028  df-mvr 22029  df-mpl 22030  df-opsr 22032  df-psr1 22309  df-vr1 22310  df-ply1 22311  df-coe1 22312  df-mdeg 26181  df-deg1 26182
This theorem is referenced by:  aks6d1c6lem1  42862
  Copyright terms: Public domain W3C validator