Changeset ba0fc3 in git for libpolys/polys/polys1.cc
- Timestamp:
- Mar 22, 2011, 10:36:05 AM (12 years ago)
- 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
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libpolys/polys/polys1.cc
rf550e86 rba0fc3 32 32 #endif 33 33 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 else47 d0+=(*w)[j]*pGetExp(p,j+1);48 if(d0<d||d==-1)49 d=d0;50 pIter(p);51 }52 return d;53 }54 34 55 35 poly pSeries(int n,poly p,poly u, intvec *w) … … 90 70 omFreeSize((ADDRESS)ww,(pVariables+1)*sizeof(short)); 91 71 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;105 72 } 106 73
Note: See TracChangeset
for help on using the changeset viewer.