Changeset 34a9b4f in git

Timestamp:

Mar 6, 2009, 11:14:41 AM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '5d369c3cbad1a1bf2d5c856a48fb8a30b51cec3b')

Children:

15ac1ca9c4ddde1e5e7ae4229db9244d9e470c6b

Parents:

acff7e71919841ba60543811ceda2b000dbb15d1

Message:

*hannes: opt.


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

File:

• kernel/kstd1.cc (modified) (4 diffs)

kernel/kstd1.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kstd1.cc,v 1.47 2009-03-06 09:39:29 Singular Exp $ */
+/* $Id: kstd1.cc,v 1.48 2009-03-06 10:14:41 Singular Exp $ */
 /*
 * ABSTRACT:
@@ -2282 +2282 @@
       {
         strat->P.pCleardenom();
-        if (0)
+        if (0)
         //if ((TEST_OPT_REDSB)||(TEST_OPT_REDTAIL))
         {
@@ -2292 +2292 @@
       {
         strat->P.pNorm();
-        if (0)
+        if (0)
         //if ((TEST_OPT_REDSB)||(TEST_OPT_REDTAIL))
           strat->P.p = redtailBba(&(strat->P),pos-1,strat, withT);
@@ -2370 +2370 @@
   if(rIsPluralRing(currRing)) return kInterRedOld(F,Q);
 #endif
-  if(pOrdSgn==-1) return kInterRedOld(F,Q);
-  if (rField_is_numeric(currRing)) return kInterRedOld(F,Q);
+  if ((pOrdSgn==-1)
+  || (rField_is_numeric(currRing)))
+    return kInterRedOld(F,Q);
 
   BITSET save=test;