Changeset cf8a274 in git

Timestamp:

Jun 15, 2022, 4:34:39 PM (23 months ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

f310c1ab923e20456d0f7eacc446c4f8b7eb8f82

Parents:

879b16c36b60be58d3260bd3cf7514bdd24ef7ae

Message:

opt: id_DelDiv_Sorted

File:

• libpolys/polys/simpleideals.cc (modified) (1 diff)

libpolys/polys/simpleideals.cc

@@ -415 +415 @@
   id_Test(id, r);
 
-  int i, j;
   int k = IDELEMS(id)-1;
-  for (i=0; i<k; i++)
+  for (int i=0; i<k; i++)
   {
     if (id->m[i] != NULL)
     {
-      for (j=i+1; j<=k; j++)
+      poly m_i=id->m[i];
+      for (int j=i+1; j<=k; j++)
       {
         if (id->m[j]!=NULL)
         {
-          if (p_LmDivisibleByNoComp(id->m[i], id->m[j],r))
+          if (p_LmDivisibleByNoComp(m_i, id->m[j],r))
           {
             p_Delete(&id->m[j],r);
-            if (j==k) k--;
-            while(id->m[k]==NULL) k--;
           }
-          else if (p_LmDivisibleByNoComp(id->m[j], id->m[i],r))
+          else if (p_LmDivisibleByNoComp(id->m[j], m_i,r))
           {
             p_Delete(&id->m[i],r);