Changeset 08f2a1f in git for libpolys/polys

Timestamp:

Sep 1, 2020, 4:17:50 PM (4 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b4f17ed1d25f93d46dbe29e4b499baecc2fd51bb')

Children:

40632978ce2cb84dae846b23a573eee15545abcc

Parents:

20bab7d91a9351cbc13245eeb4da8a9ec894b6d2

Message:

removed: p_IsConstantPoly (->p_IsConstant)

Location:

libpolys/polys

Files:

• clapconv.cc (modified) (2 diffs)
• clapsing.cc (modified) (2 diffs)
• monomials/p_polys.h (modified) (1 diff)
• nc/old.gring.cc (modified) (1 diff)
• simpleideals.cc (modified) (1 diff)

libpolys/polys/clapconv.cc

@@ -325 +325 @@
 
     // test if denominator is constant
-    if (!errorreported && !p_IsConstantPoly(DEN ((fraction)p_GetCoeff (p,r)),r->cf->extRing))
+    if (!errorreported && !p_IsConstant(DEN ((fraction)p_GetCoeff (p,r)),r->cf->extRing))
       WerrorS("conversion error: denominator!= 1");
 
@@ -357 +357 @@
 
     // test if denominator is constant
-    if (!p_IsConstantPoly(DEN ((fraction)p_GetCoeff (p,r)),r->cf->extRing))
+    if (!p_IsConstant(DEN ((fraction)p_GetCoeff (p,r)),r->cf->extRing))
       return FALSE;
     pIter(p);

libpolys/polys/clapsing.cc

@@ -826 +826 @@
   p_Test(fac,r);
   int e=0;
-  if (!p_IsConstantPoly(fac,r))
+  if (!p_IsConstant(fac,r))
   {
 #ifdef FACTORIZE2_DEBUG
@@ -1141 +1141 @@
         prune (a);
 #ifndef SING_NDEBUG
-    if ((r->cf->extRing!=NULL) && (!p_IsConstantPoly(ff,r)))
+    if ((r->cf->extRing!=NULL) && (!p_IsConstant(ff,r)))
     {
       singclap_factorize_retry++;

libpolys/polys/monomials/p_polys.h

@@ -1983 +1983 @@
 }
 
-static inline BOOLEAN p_IsConstantPoly(const poly p, const ring r)
-{
-  p_Test(p, r);
-  poly pp=p;
-  while(pp!=NULL)
-  {
-    if (! p_LmIsConstantComp(pp, r))
-      return FALSE;
-    pIter(pp);
-  }
-  return TRUE;
-}
+#define p_IsConstantPoly(p,r) p_IsConstant(p,r)
 
 static inline BOOLEAN p_IsUnit(const poly p, const ring r)

libpolys/polys/nc/old.gring.cc

@@ -3361 +3361 @@
 
   int *perm=(int *)omAlloc0((Rop->N+1)*sizeof(int));
-  if (!p_IsConstantPoly(p, Rop))
+  if (!p_IsConstant(p, Rop))
   {
     /* we know perm exactly */

libpolys/polys/simpleideals.cc

@@ -404 +404 @@
   for (int k = IDELEMS(id)-1; k>=0; k--)
   {
-    if (!p_IsConstantPoly(id->m[k],r))
+    if (!p_IsConstant(id->m[k],r))
       return FALSE;
   }