Changeset 1863d8 in git for kernel/kstd2.cc

Timestamp:

Feb 28, 2009, 3:32:26 PM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

c9193a7b24bb3467ad3f2a44a6c2d358c98db0f3

Parents:

177059491524ddbfbf5f5be938da20faa8f4ece6

Message:

*hannes: need pNormalize in redNF


git-svn-id: file:///usr/local/Singular/svn/trunk@11500 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• kernel/kstd2.cc (modified) (2 diffs)

kernel/kstd2.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kstd2.cc,v 1.82 2009-02-28 11:49:05 Singular Exp $ */
+/* $Id: kstd2.cc,v 1.83 2009-02-28 14:32:26 Singular Exp $ */
 /*
 *  ABSTRACT -  Kernel: alg. of Buchberger
@@ -833 +833 @@
           }
         }
-        if (!nonorm && !nIsOne(pGetCoeff(strat->S[j])))
+        if ((nonorm==0) && (!nIsOne(pGetCoeff(strat->S[j]))))
         {
           pNorm(strat->S[j]);