Changeset 015bba in git for kernel/kstd2.cc

Timestamp:

Jul 24, 2007, 1:20:32 PM (17 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

2f0941897d4f1406c4c4e8071399248a0e0b6e1c

Parents:

1b42f8ee7cb0099770b3a0d6220176a29fdc4165

Message:

*hannes: NF/normalize


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

File:

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

kernel/kstd2.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kstd2.cc,v 1.48 2007-07-23 10:50:02 Singular Exp $ */
+/* $Id: kstd2.cc,v 1.49 2007-07-24 11:20:32 Singular Exp $ */
 /*
 *  ABSTRACT -  Kernel: alg. of Buchberger
@@ -1357 +1357 @@
   int max_ind;
   p = redNF(pCopy(q),max_ind,strat);
-  if ((p!=NULL)&&(lazyReduce==0))
+  if ((p!=NULL)&&((lazyReduce & 1)==0))
   {
     BITSET save=test;
     test &= ~Sy_bit(OPT_INTSTRATEGY);
     if (TEST_OPT_PROT) { PrintS("t"); mflush(); }
-    p = redtailBba(p,max_ind,strat);
+    p = redtailBba(p,max_ind,strat,(lazyReduce & 4)==0);
     test=save;
   }
@@ -1411 +1411 @@
       if (TEST_OPT_PROT) { PrintS("r");mflush(); }
       p = redNF(pCopy(q->m[i]),max_ind,strat);
-      if ((p!=NULL)&&(lazyReduce==0))
+      if ((p!=NULL)&&((lazyReduce & 1)==0))
       {
         BITSET save=test;
         test &= ~Sy_bit(OPT_INTSTRATEGY);
         if (TEST_OPT_PROT) { PrintS("t"); mflush(); }
-        p = redtailBba(p,max_ind,strat);
+        p = redtailBba(p,max_ind,strat,(lazyReduce & 4)==0);
         test=save;
       }