Changeset 9c98c2 in git for factory/FLINTconvert.cc

Timestamp:

Feb 17, 2012, 11:12:16 AM (11 years ago)

Author:

Martin Lee <martinlee84@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '0604212ebb110535022efecad887940825b97c3f')

Children:

e785e9081044da918572223fdfab379044387182

Parents:

c2aeb9aa4f5b5bc845c3d83ce3c7ab67db049358

git-author:

Martin Lee <martinlee84@web.de>2012-02-17 11:12:16+01:00

git-committer:

Martin Lee <martinlee84@web.de>2012-04-04 14:42:26+02:00

Message:

chg: added conversion for univariate polys over Z/p for non word size p

File:

• factory/FLINTconvert.cc (modified) (3 diffs)

factory/FLINTconvert.cc

@@ -16 +16 @@
 
 #include "canonicalform.h"
+#include "fac_util.h"
 #include "cf_iter.h"
 #include "cf_factory.h"
@@ -35 +36 @@
 #include <fmpq.h>
 #include <fmpz_poly.h>
+#include <fmpz_mod_poly.h>
 #include <nmod_poly.h>
 #include <fmpq_poly.h>
@@ -270 +272 @@
 }
 
-#endif
-
-
+void
+convertFacCF2Fmpz_mod_poly_t (fmpz_mod_poly_t result, const CanonicalForm& f,
+                              const fmpz_t p)
+{
+  fmpz_mod_poly_init2 (result, p, degree (f) + 1);
+  fmpz_poly_t buf;
+  convertFacCF2Fmpz_poly_t (buf, f);
+  fmpz_mod_poly_set_fmpz_poly (result, buf);
+  fmpz_poly_clear (buf);
+}
+
+CanonicalForm
+convertFmpz_mod_poly_t2FacCF (fmpz_mod_poly_t poly, const Variable& x,
+                              const modpk& b)
+{
+  fmpz_poly_t buf;
+  fmpz_poly_init (buf);
+  fmpz_mod_poly_get_fmpz_poly (buf, poly);
+  CanonicalForm result= convertFmpz_poly_t2FacCF (buf, x);
+  fmpz_poly_clear (buf);
+  return b (result);
+}
+
+#endif
+
+