Changeset 1e579c6 in git for kernel/polys1.cc

Timestamp:

Jun 20, 2007, 11:39:25 AM (17 years ago)

Author:

Oliver Wienand <wienand@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

07e8ae3b1877436cb95506c90d799438d558c703

Parents:

f7aaec31bd73e9e5b3b2bd84ee5ff4fab2de4691

Message:

kutil.cc:
* use nExtGcd, nIsUnit
* extended spolys only for non-domains

numbers.cc, numbers.h, structs.h:
* new Functions: nIsUnit, nGetUnit, nExtGcd
* new Field: the Integers

polys.cc, polys.h:
* nGetUnit hack removed
* minor memory glitch

polys1.cc:
* no pContent for Integers

ring.h:
new rField methos for Integers and p^n

rintegers.*:
implementation of the whole numbers using gmp

rmodulo*:
added funcs: nIsUnit, nGetUnit, nExtGcd


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

File:

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

kernel/polys1.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: polys1.cc,v 1.28 2007-05-23 07:47:30 wienand Exp $ */
+/* $Id: polys1.cc,v 1.29 2007-06-20 09:39:24 wienand Exp $ */
 
 /*
@@ -483 +483 @@
 #ifdef HAVE_RINGS
   if (rField_is_Ring(currRing)) {
-    if (ph!=NULL)
+    if ((ph!=NULL) && rField_has_Units(currRing))
     {
       number k = nGetUnit(pGetCoeff(ph));