From 12486598afff31cd6210d6e5a980d466a9c9fc74 Mon Sep 17 00:00:00 2001
From: Sven Verdoolaege <skimo@kotnet.org>
Date: Wed, 5 Sep 2007 11:48:35 +0200
Subject: [PATCH] fix type of evalue_polynomial argument

---
 barvinok/evalue.h | 2 +-
 evalue.c          | 8 +++++++-
 2 files changed, 8 insertions(+), 2 deletions(-)

diff --git a/barvinok/evalue.h b/barvinok/evalue.h
index d19eb3e..97c4b56 100644
--- a/barvinok/evalue.h
+++ b/barvinok/evalue.h
@@ -121,7 +121,7 @@ void evalue_extract_affine(const evalue *e, Value *coeff, Value *cst, Value *d);
 evalue *affine2evalue(Value *coeff, Value denom, int nvar);
 void evalue_substitute(evalue *e, evalue **subs);
 void evalue_backsubstitute(evalue *e, Matrix *CP, unsigned MaxRays);
-evalue *evalue_polynomial(Vector *c, evalue* X);
+evalue *evalue_polynomial(Vector *c, const evalue* X);
 
 #if defined(__cplusplus)
 }
diff --git a/evalue.c b/evalue.c
index 28cca74..4b3c9b7 100644
--- a/evalue.c
+++ b/evalue.c
@@ -4210,7 +4210,13 @@ void evalue_backsubstitute(evalue *e, Matrix *CP, unsigned MaxRays)
     Matrix_Free(inv);
 }
 
-evalue *evalue_polynomial(Vector *c, evalue* X)
+/* Computes
+ *
+ *	\sum_{i=0}^n c_i/d X^i
+ *
+ * where d is the last element in the vector c.
+ */
+evalue *evalue_polynomial(Vector *c, const evalue* X)
 {
     unsigned dim = c->Size-2;
     evalue EC;
-- 
2.11.4.GIT