Changeset 2bf04b in git for kernel/combinatorics

Timestamp:

Nov 12, 2015, 2:39:46 PM (9 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '38dfc5131670d387a89455159ed1e071997eec94')

Children:

6da2d6765f8866f8426131bf3a097a5c051e956e

Parents:

412c61b77c65fd4adca8f6576d7f1a597459552e

Message:

format

File:

• kernel/combinatorics/hdegree.cc (modified) (1 diff)

kernel/combinatorics/hdegree.cc

@@ -1014 +1014 @@
   {
     //consider just monic generators (over rings with zero-divisors)
-    ideal SS=id_Copy(S,tailRing); 
+    ideal SS=id_Copy(S,tailRing);
     for(i=0;i<=idElem(S);i++)
     {
-        if(p_IsPurePower(SS->m[i],tailRing)==0)
-                {  
-                  p_Delete(&SS->m[i],tailRing);
-                }
-        }
-        S=id_Copy(SS,tailRing);
-        idSkipZeroes(S);
+      if(p_IsPurePower(SS->m[i],tailRing)==0)
+      {
+        p_Delete(&SS->m[i],tailRing);
+      }
+    }
+    S=id_Copy(SS,tailRing);
+    idSkipZeroes(S);
   }
   #if 0