Changeset fab2cca in git

Timestamp:

May 23, 2011, 6:00:49 PM (12 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '00e2e9c41af3fde1273eb3633f4c0c7c3db2579d')

Children:

2024f6a924721dabadabb00eba442d9999dd3b89

Parents:

f6c50d15094fcdfe9d9f134bb3b061760aa62b3e

Message:

additional fixes to map of alg.ext.

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

File:

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

kernel/longtrans.cc

@@ -1009 +1009 @@
           pDelete(&p);
       }
-      pTest(p);
-      res=pAdd(res,p);
+      nNormalize(pGetCoeff(p));
+      if (nIsZero(pGetCoeff(p)))
+        pDelete(&p);
+      else
+      {
+        pTest(p);
+        res=pAdd(res,p);
+      }
     }
     pIter(za);