Changeset d16f9c in git for kernel/GBEngine/kstd2.cc

Timestamp:

Jun 6, 2018, 9:44:06 AM (6 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

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

Children:

6f92b7cbfdfef2060f611906be9b7c90b34f78e2

Parents:

84bac9fa4349f7c6a1992b606fc03b1f298682ad

git-author:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2018-06-06 09:44:06+02:00

git-committer:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2018-06-06 10:35:28+02:00

Message:

fix: primdecint.lib::primdecZM

File:

• kernel/GBEngine/kstd2.cc (modified) (1 diff)

kernel/GBEngine/kstd2.cc

@@ -2242 +2242 @@
       }
       finalReduceByMon(strat);
-      for(int i = 0;i<=strat->sl;i++)
-      {
-        if(!nGreaterZero(pGetCoeff(strat->S[i])))
-        {
-          strat->S[i] = pNeg(strat->S[i]);
-        }
-      }
-    }
-    else if (rField_is_Ring(currRing))
-      finalReduceByMon(strat);
+      for(int i = 0;i<IDELEMS(strat->Shdl);i++)
+      {
+        if(!nGreaterZero(pGetCoeff(strat->Shdl->m[i])))
+        {
+          strat->S[i] = pNeg(strat->Shdl->m[i]);
+        }
+      }
+    }
+    //else if (rField_is_Ring(currRing))
+    //  finalReduceByMon(strat);
   }
 //  if (TEST_OPT_WEIGHTM)