add isl_qpolynomial_get_dim

diff --git a/doc/user.pod b/doc/user.pod
index b183859..cbfa34f 100644 (file)
--- a/doc/user.pod
+++ b/doc/user.pod
@@ -371,11 +371,12 @@ C<isl_dim_param>, C<isl_dim_in> (only for relations),
 C<isl_dim_out> (only for relations), C<isl_dim_set>
 (only for sets) or C<isl_dim_all>.
 
-It is often useful to create sets or maps that live in the
-same space as some other set or map.  This can be accomplished
-by creating the new sets or maps
-(see L<Creating New Sets and Relations>) based on the dimension
-specification of the original set or map.
+It is often useful to create objects that live in the
+same space as some other object.  This can be accomplished
+by creating the new objects
+(see L<Creating New Sets and Relations> or
+L<Creating New (Piecewise) Quasipolynomials>) based on the dimension
+specification of the original object.
 
        #include <isl_set.h>
        __isl_give isl_dim *isl_basic_set_get_dim(
@@ -387,6 +388,12 @@ specification of the original set or map.
                __isl_keep isl_basic_map *bmap);
        __isl_give isl_dim *isl_map_get_dim(__isl_keep isl_map *map);
 
+       #include <isl_polynomial.h>
+       __isl_give isl_dim *isl_qpolynomial_get_dim(
+               __isl_keep isl_qpolynomial *qp);
+       __isl_give isl_dim *isl_pw_qpolynomial_get_dim(
+               __isl_keep isl_pw_qpolynomial *pwqp);
+
 The names of the individual dimensions may be set or read off
 using the following functions.
 

diff --git a/include/isl_polynomial.h b/include/isl_polynomial.h
index d0fea0a..02d18bf 100644 (file)
--- a/include/isl_polynomial.h
+++ b/include/isl_polynomial.h
@@ -16,6 +16,7 @@ struct isl_qpolynomial;
 typedef struct isl_qpolynomial isl_qpolynomial;
 
 isl_ctx *isl_qpolynomial_get_ctx(__isl_keep isl_qpolynomial *qp);
+__isl_give isl_dim *isl_qpolynomial_get_dim(__isl_keep isl_qpolynomial *qp);
 
 __isl_give isl_qpolynomial *isl_qpolynomial_zero(__isl_take isl_dim *dim);
 __isl_give isl_qpolynomial *isl_qpolynomial_infty(__isl_take isl_dim *dim);

diff --git a/isl_polynomial.c b/isl_polynomial.c
index d5f5972..f0c324b 100644 (file)
--- a/isl_polynomial.c
+++ b/isl_polynomial.c
@@ -311,6 +311,11 @@ isl_ctx *isl_qpolynomial_get_ctx(__isl_keep isl_qpolynomial *qp)
        return qp ? qp->dim->ctx : NULL;
 }
 
+__isl_give isl_dim *isl_qpolynomial_get_dim(__isl_keep isl_qpolynomial *qp)
+{
+       return qp ? isl_dim_copy(qp->dim) : NULL;
+}
+
 int isl_qpolynomial_is_zero(__isl_keep isl_qpolynomial *qp)
 {
        return qp ? isl_upoly_is_zero(qp->upoly) : -1;