add isl_seq_fdiv_r

diff --git a/include/isl_seq.h b/include/isl_seq.h
index 459bc4b..b49879d 100644 (file)
--- a/include/isl_seq.h
+++ b/include/isl_seq.h
@@ -13,6 +13,7 @@ void isl_seq_submul(isl_int *dst, isl_int f, isl_int *src, unsigned len);
 void isl_seq_swp_or_cpy(isl_int *dst, isl_int *src, unsigned len);
 void isl_seq_scale(isl_int *dst, isl_int *src, isl_int f, unsigned len);
 void isl_seq_scale_down(isl_int *dst, isl_int *src, isl_int f, unsigned len);
+void isl_seq_fdiv_r(isl_int *dst, isl_int *src, isl_int m, unsigned len);
 void isl_seq_combine(isl_int *dst, isl_int m1, isl_int *src1,
                        isl_int m2, isl_int *src2, unsigned len);
 void isl_seq_elim(isl_int *dst, isl_int *src, unsigned pos, unsigned len,

diff --git a/isl_seq.c b/isl_seq.c
index a67c0e9..4ab3172 100644 (file)
--- a/isl_seq.c
+++ b/isl_seq.c
@@ -49,6 +49,13 @@ void isl_seq_scale_down(isl_int *dst, isl_int *src, isl_int m, unsigned len)
                isl_int_divexact(dst[i], src[i], m);
 }
 
+void isl_seq_fdiv_r(isl_int *dst, isl_int *src, isl_int m, unsigned len)
+{
+       int i;
+       for (i = 0; i < len; ++i)
+               isl_int_fdiv_r(dst[i], src[i], m);
+}
+
 void isl_seq_combine(isl_int *dst, isl_int m1, isl_int *src1,
                        isl_int m2, isl_int *src2, unsigned len)
 {