Changeset 616e34 in git

Timestamp:

Jun 16, 2015, 3:55:55 PM (8 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')

Children:

6d1d1eb90429f666ee8004fe1ee9911bbead1dc9

Parents:

4470e259ee2a2b265d8bdc47b48ea3e4619298b5

Message:

fix: mapping needs MinPolyNormalize only for algExt

File:

• Singular/maps_ip.cc (modified) (3 diffs)

Singular/maps_ip.cc

@@ -80 +80 @@
 #endif
         res->rtyp=POLY_CMD;
-        if (nCoeff_is_Extension(currRing->cf))
+        if (nCoeff_is_algExt(currRing->cf))
           res->data=(void *)p_MinPolyNormalize((poly)res->data, currRing);
         pTest((poly) res->data);
@@ -89 +89 @@
 
         number a = nMap((number)data, preimage_r->cf, currRing->cf);
-
-
         if (nCoeff_is_Extension(currRing->cf))
         {
-          n_Normalize(a, currRing->cf); // ???
+          n_Normalize(a, currRing->cf);
 /*
           number a = (number)res->data;
@@ -270 +268 @@
         n_Delete(&d, currRing); d = NULL;
       }
-       else if (!p_IsConstant((poly)NUM((fraction)d), R))
+      else if (!p_IsConstant((poly)NUM((fraction)d), R))
       {
         WarnS("ignoring denominators of coefficients...");