Changeset ba0fc3 in git for libpolys/polys/monomials/p_polys.cc

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:

• libpolys/polys/monomials/p_polys.cc (modified) (2 diffs)

libpolys/polys/monomials/p_polys.cc

@@ -518 +518 @@
   }
   return  j;
+}
+
+long p_DegW(poly p, const short *w, const ring R)
+{
+  long r=~0L;
+
+  while (p!=NULL)
+  {
+    long t=totaldegreeWecart_IV(p,R,w);
+    if (t>r) r=t;
+    pIter(p);
+  }
+  return r;
 }
 
@@ -3428 +3441 @@
 }
 
+/*************************************************************/
+int p_MinDeg(poly p,intvec *w, const ring R)
+{
+  if(p==NULL)
+    return -1;
+  int d=-1;
+  while(p!=NULL)
+  {
+    int d0=0;
+    for(int j=0;j<rVar(R);j++)
+      if(w==NULL||j>=w->length())
+        d0+=p_GetExp(p,j+1,R);
+      else
+        d0+=(*w)[j]*p_GetExp(p,j+1,R);
+    if(d0<d||d==-1)
+      d=d0;
+    pIter(p);
+  }
+  return d;
+}
+
 /***************************************************************
  *