Changeset ca0d043 in git

Timestamp:

Mar 9, 2011, 4:41:24 PM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b4f17ed1d25f93d46dbe29e4b499baecc2fd51bb')

Children:

93fdaea282c6e9d53a9eafe710ced85f7285647f

Parents:

528f5b7b3ceb19836379fc4ff7686f811093c001

Message:

fix tr. 317

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

File:

• Singular/maps_ip.cc (modified) (1 diff)

Singular/maps_ip.cc

@@ -69 +69 @@
         {
           number a=(number)res->data;
-          nNormalize(a);
-          res->data=(void *)a;
+          number one=nInit(1);
+          number product = nMult(a,one );
+          nDelete(&one);
+          nDelete(&a);
+          res->data=(void *)product;
         }
         #ifdef LDEBUG