===================================================================
RCS file: /home/cvs/OpenXM_contrib2/asir2000/include/ca.h,v
retrieving revision 1.68
retrieving revision 1.75
diff -u -p -r1.68 -r1.75
--- OpenXM_contrib2/asir2000/include/ca.h	2007/02/15 02:06:20	1.68
+++ OpenXM_contrib2/asir2000/include/ca.h	2009/02/05 08:37:02	1.75
@@ -45,7 +45,7 @@
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *
- * $OpenXM: OpenXM_contrib2/asir2000/include/ca.h,v 1.67 2007/01/30 03:25:52 saito Exp $ 
+ * $OpenXM: OpenXM_contrib2/asir2000/include/ca.h,v 1.74 2009/01/05 01:47:30 noro Exp $ 
 */
 #include <stdio.h>
 #include <stdlib.h>
@@ -625,6 +625,7 @@ struct order_spec {
 	int id;
 	Obj obj;
 	int nv;
+	int ispot; /* 1 means Position over Term (Pos then Term) */
 	union {
 		int simple;
 		struct {
@@ -1426,6 +1427,8 @@ LUM LUMALLOC(int, int);
 BM BMALLOC(int, int);
 Obj ToAlg(Num);
 UM *berlemain(register int, UM, UM *);
+void Risa_GC_set_adj(int,int);
+void Risa_GC_get_adj(int *,int *);
 void *Risa_GC_malloc(size_t);
 void *Risa_GC_malloc_atomic(size_t);
 void *Risa_GC_realloc(void *,size_t);
@@ -2642,3 +2645,8 @@ void addnbp(VL vl,NBP p1,NBP p2, NBP *rp);
 void mulnbp(VL vl,NBP p1,NBP p2, NBP *rp);
 void pwrnbp(VL vl,NBP p1,Q n, NBP *rp);
 int compnbp(VL vl,NBP p1,NBP p2);
+
+#if defined(PARI23) 
+#define prec precreal
+#define mppgcd(a,b)  (gcdii((a),(b)))
+#endif