Changeset 471858 in git for libpolys/polys/sparsmat.cc

Timestamp:

Mar 10, 2017, 3:22:39 PM (7 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'e7cc1ebecb61be8b9ca6c18016352af89940b21a')

Children:

b1ec60dda21b72f562a931d4da936be98e0bec19

Parents:

75e126f231b0425bbf4812858e05812ee8493adf

Message:

code cleanup: sparmat

File:

• libpolys/polys/sparsmat.cc (modified) (3 diffs)

libpolys/polys/sparsmat.cc

@@ -7 +7 @@
 */
 
-
-
-
 #include <misc/auxiliary.h>
 
@@ -26 +23 @@
 
 #include "simpleideals.h"
-
 
 #include "sparsmat.h"
@@ -211 +207 @@
       k = p_GetComp(p, currRing)-1;
       kr = r[k];
-      for (j=rVar(currRing);j>0;j--)
-      {
-        if(p_GetExp(p,j, currRing)>kc)
-          kc=p_GetExp(p,j, currRing);
-        if(p_GetExp(p,j, currRing)>kr)
-          kr=p_GetExp(p,j, currRing);
+      for (j=currRing->N;j>0;j--)
+      {
+        long t=p_GetExp(p,j, currRing);
+        if(t /*p_GetExp(p,j, currRing)*/ >kc)
+          kc=t; /*p_GetExp(p,j, currRing);*/
+        if(t /*p_GetExp(p,j, currRing)s*/ >kr)
+          kr=t; /*p_GetExp(p,j, currRing);*/
       }
       r[k] = kr;