Changeset b547dc in git for kernel/polys.cc

Timestamp:

Jul 7, 2008, 3:22:39 PM (15 years ago)

Author:

Oliver Wienand <wienand@…>

Branches:

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

Children:

9d249b2bd6e53779def56a0139a8157d70ec75c1

Parents:

5213495c7848b41c2054e3b3f459b68bb4b7de04

Message:

pDivideM: wenn Einheit, dann erst invertieren und dann multiplizieren, sonst jeden Koeffizienten einzeln dividieren


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

File:

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

kernel/polys.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: polys.cc,v 1.30 2008-07-07 13:18:57 wienand Exp $ */
+/* $Id: polys.cc,v 1.31 2008-07-07 13:22:39 wienand Exp $ */
 
 /*
@@ -174 +174 @@
   }
 #ifdef HAVE_RINGS
-  pDiv_nn(result,inv);
+  if (nIsUnit(inv))
+  {
+    pMult_nn(result,inv);
+    nDelete(&inv);
+  }
+  else
+  {
+    pDiv_nn(result,inv);
+  }
 #else
   pMult_nn(result,inv);