Changeset ba0fc3 in git for libpolys/polys/polys1.cc


Ignore:
Timestamp:
Mar 22, 2011, 10:36:05 AM (12 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
Children:
c462b558d2bcc56ce39d2181b2f9d9cd1b82345b
Parents:
f550e863b5113c076c1fa29a44f2bde2146f14cf
git-author:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2011-03-22 10:36:05+01:00
git-committer:
Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 12:04:09+01:00
Message:
p_MinDeg, p_DegW -> p_polys.cc
File:
1 edited

Legend:

Unmodified
Added
Removed
  • libpolys/polys/polys1.cc

    rf550e86 rba0fc3  
    3232#endif
    3333
    34 
    35 int pMinDeg(poly p,intvec *w)
    36 {
    37   if(p==NULL)
    38     return -1;
    39   int d=-1;
    40   while(p!=NULL)
    41   {
    42     int d0=0;
    43     for(int j=0;j<pVariables;j++)
    44       if(w==NULL||j>=w->length())
    45         d0+=pGetExp(p,j+1);
    46       else
    47         d0+=(*w)[j]*pGetExp(p,j+1);
    48     if(d0<d||d==-1)
    49       d=d0;
    50     pIter(p);
    51   }
    52   return d;
    53 }
    5434
    5535poly pSeries(int n,poly p,poly u, intvec *w)
     
    9070  omFreeSize((ADDRESS)ww,(pVariables+1)*sizeof(short));
    9171  return v;
    92 }
    93 
    94 long pDegW(poly p, const short *w)
    95 {
    96   long r=-LONG_MAX;
    97 
    98   while (p!=NULL)
    99   {
    100     long t=totaldegreeWecart_IV(p,currRing,w);
    101     if (t>r) r=t;
    102     pIter(p);
    103   }
    104   return r;
    10572}
    10673
Note: See TracChangeset for help on using the changeset viewer.