Changeset 1f414c8 in git for libpolys/polys/monomials/p_polys.cc

Timestamp:

Aug 12, 2011, 4:19:06 PM (13 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

6637ee55dc87d61e2d841f88a872b6f3e2d2e402

Parents:

7fccc79116395e52484b519fc379d165d8cf6bc2

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2011-08-12 16:19:06+02:00

git-committer:

Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 13:21:28+01:00

Message:

CHG: cleaning up Frank's code for alg./trans. extensions + hiding private details

File:

• libpolys/polys/monomials/p_polys.cc (modified) (5 diffs)

libpolys/polys/monomials/p_polys.cc

@@ -2064 +2064 @@
       p=ph;
       Werror("longalg missing 1");
-      #if 0
+#if 0
       while (p!=NULL)
       { // each monom: coeff in Q_a
@@ -2128 +2128 @@
       }
       nlDelete(&h,r->extRing->cf);
-      #endif
+#endif
     }
   }
@@ -3404 +3404 @@
       qq=p_One(dst);
       WerrorS("longalg missing 2");
-      #if 0
+#if 0
       aq=naPermNumber(pGetCoeff(p),par_perm,OldPar, oldRing);
       if ((!rMinpolyIsNULL(dst))
       && ((rField_is_Zp_a(dst)) || (rField_is_Q_a(dst))))
       {
-        p_Normalize(aq,dst);
+        p_Normalize(aq,dst);
         if (aq==NULL)
-          p_SetCoeff(qq,n_Init(0,dst->cf),dst);
+          p_SetCoeff(qq,n_Init(0,dst->cf),dst);
       }
       p_Test(aq,dst);
-      #endif
+#endif
     }
     if (rRing_has_Comp(dst)) p_SetComp(qq, p_GetComp(p,oldRing),dst);
@@ -3450 +3450 @@
             {
               WerrorS("longalg missing 3");
-              #if 0
+#if 0
               lnumber c=(lnumber)pGetCoeff(qq);
               if (c->z->next==NULL)
@@ -3464 +3464 @@
               }
               mapped_to_par=1;
-              #endif
+#endif
             }
           }