Changeset d2fb9b7 in git for kernel/polys.cc

Timestamp:

Feb 21, 2009, 6:05:51 PM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

a794e7f15c7e36410e1311fcc983b20a6404c7b5

Parents:

146c74966f02eca9e5b7c4b055337e0327e11718

Message:

*hannes: minor opt. in pHasNotCF


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

File:

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

kernel/polys.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: polys.cc,v 1.35 2009-01-15 10:33:24 Singular Exp $ */
+/* $Id: polys.cc,v 1.36 2009-02-21 17:05:51 Singular Exp $ */
 
 /*
@@ -716 +716 @@
       return FALSE;
   }
-  int i = 1;
+  int i = pVariables;
   loop
   {
     if ((pGetExp(p1, i) > 0) && (pGetExp(p2, i) > 0))   return FALSE;
-    if (i == pVariables)                                return TRUE;
-    i++;
+    i--;
+    if (i == 0)                                         return TRUE;
   }
 }