Changeset 521349 in git for kernel/kstd2.cc

Timestamp:

Jul 7, 2008, 3:18:57 PM (15 years ago)

Author:

Oliver Wienand <wienand@…>

Branches:

(u'spielwiese', 'ec94ef7a30b928574c0c3daf41f6804dff5f6b69')

Children:

b547dc098c643d2e47143c81e0a51e711b5b10ff

Parents:

d351d85cc90334b89306247371fbd1761ed311b7

Message:

pNorm nicht für Ringe


git-svn-id: file:///usr/local/Singular/svn/trunk@10840 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.66 2008-04-04 10:30:09 Singular Exp $ */
+/* $Id: kstd2.cc,v 1.67 2008-07-07 13:18:56 wienand Exp $ */
 /*
 *  ABSTRACT -  Kernel: alg. of Buchberger
@@ -1163 +1163 @@
 
       // reduce the tail and normalize poly
-      if (TEST_OPT_INTSTRATEGY)
+      // in the ring case we cannot expect LC(f) = 1,
+      // therefore we call pContent instead of pNorm
+      if ((TEST_OPT_INTSTRATEGY) || (rField_is_Ring(currRing)))
       {
         strat->P.pCleardenom();