Changeset af378f7 in git for kernel/polys.cc

Timestamp:

Jan 30, 2008, 7:49:43 PM (15 years ago)

Author:

Oliver Wienand <wienand@…>

Branches:

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

Children:

2f959e83f22c8e788ce3941f4ac3eb2fb1df74c1

Parents:

12ea9df042d8c883f3d3c722b2388c0424347a88

Message:

anpassungen an gmp


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

File:

• kernel/polys.cc (modified) (3 diffs)

kernel/polys.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: polys.cc,v 1.26 2007-07-24 12:29:31 Singular Exp $ */
+/* $Id: polys.cc,v 1.27 2008-01-30 18:49:43 wienand Exp $ */
 
 /*
@@ -730 +730 @@
       if (!nIsOne(k))
       {
-        c = nDiv(pGetCoeff(p1), k);
+        k = nInvers(k);
+        c = nMult(pGetCoeff(p1), k);  
         nDelete(&pGetCoeff(p1));
         pSetCoeff0(p1, c);
@@ -736 +737 @@
         while (h != NULL)
         {
-          c = nDiv(pGetCoeff(h), k);
+          c = nMult(pGetCoeff(h), k);
           nDelete(&pGetCoeff(h));
           pSetCoeff0(h, c);