Changeset a8ef67 in git

Timestamp:

Jul 12, 2010, 7:38:35 PM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

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

Children:

42dbf1aca7d981b8a292be33943dc8b0a568578e

Parents:

e519c5c94f685f1ea03a21b72bddde0ea0d5f7f3

Message:

handling of 0 in idChinRem

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

File:

• kernel/ideals.cc (modified) (1 diff)

kernel/ideals.cc

@@ -4072 +4072 @@
         x[j]=NULL; // nlInit(0...) takes no memory
       }
-      pSetCoeff(h,n);
-      //Print("new mon:");pWrite(h);
-      res_p=pAdd(res_p,h);
+      if (nlIsZero(n)) pDelete(&h);
+      else
+      {
+        pSetCoeff(h,n);
+        //Print("new mon:");pWrite(h);
+        res_p=pAdd(res_p,h);
+      }
     }
     result->m[i]=res_p;