Changeset 975db18 in git for libpolys/polys/monomials/p_polys.cc

Timestamp:

Jul 17, 2012, 9:30:21 PM (11 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'c987db42cd2ec943b97ac5746c99892ceddf909c')

Children:

de883715f1ef141b4db21091c8e3dafa32942d5b

Parents:

98474f69bc5c570dd7cb85f5f8a0b2164abccb91

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-07-17 21:30:21+02:00

git-committer:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-07-17 21:33:55+02:00

Message:

implementing PolyCoeffsEnumerator: enumerator for simple iteration over coefficients of a (non-zero) polynomial.

add: added dummy stubs for calling n_ClearContent and n_ClearDenominators from p_Content and p_Cleardenom

File:

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

libpolys/polys/monomials/p_polys.cc

@@ -21 +21 @@
 #include <coeffs/longrat.h> // ???
 #include <coeffs/ffields.h>
+
+#include <polys/PolyEnumerator.h>
 
 #define TRANSEXT_PRIVATES
@@ -2021 +2023 @@
 void p_Content(poly ph, const ring r)
 {
+#if 0
+  if( ph != NULL )
+  {
+    CPolyCoeffsEnumerator itr(ph);
+    n_ClearContent(itr, r->cf);
+//    return;
+  }
+#endif
+
+  
 #ifdef HAVE_RINGS
   if (rField_is_Ring(r))
@@ -2428 +2440 @@
 {
   poly start=ph;
+
+#if 0
+  if( ph != NULL )
+  {
+    CPolyCoeffsEnumerator itr(ph);
+    n_ClearDenominators(itr, r->cf);
+    //  return start;
+  }
+#endif
+
   number d, h;
   poly p;
@@ -2552 +2574 @@
 void p_Cleardenom_n(poly ph,const ring r,number &c)
 {
+#if 0
+  if( ph != NULL )
+  {
+    CPolyCoeffsEnumerator itr(ph);
+    n_ClearDenominators(itr, c, r->cf);
+//    return;
+  }
+#endif
+  
   number d, h;
   poly p;