Changeset b27c7b7 in git for Singular/iparith.cc

Timestamp:

Jan 15, 2001, 10:41:08 AM (23 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

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

Children:

840745d41bf2d20adbdd5cbd37a530633ba681ea

Parents:

4ee700919d4a2c6339cf4c4678715d6669aeb753

Message:

*hannes: size(r)


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

File:

• Singular/iparith.cc (modified) (2 diffs)

Singular/iparith.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: iparith.cc,v 1.248 2001-01-12 12:38:26 Singular Exp $ */
+/* $Id: iparith.cc,v 1.249 2001-01-15 09:41:08 Singular Exp $ */
 
 /*
@@ -2588 +2588 @@
   else if (rField_is_Zp_a(r) && (r->minpoly!=NULL))
   {
-    elems=rInternalChar(r)*naParDeg(r->minpoly);
+    elems=ABS(rInternalChar(r)*naParDeg(r->minpoly));
   }
   res->data = (char *)elems;