Changeset 9aefaf in git

Timestamp:

Jul 9, 2013, 5:54:51 PM (11 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

fe2e01ff5d2ee7a642d4a93d187fda61a3204007

Parents:

600f62a7cca4e7071da2c2a2730e323b0a961fcf

Message:

fix: id_Normalize for matrix

from master

File:

• libpolys/polys/simpleideals.cc (modified) (1 diff)

libpolys/polys/simpleideals.cc

@@ -1616 +1616 @@
 }
 
-void id_Normalize(ideal I,const ring r)
+void id_Normalize(ideal I,const ring r) /* for ideal/matrix */
 {
   if (rField_has_simple_inverse(r)) return; /* Z/p, GF(p,n), R, long R/C */
   int i;
-  for(i=IDELEMS(I)-1;i>=0;i--)
+  for(i=I->nrows*I->ncols-1;i>=0;i--)
   {
     p_Normalize(I->m[i],r);