===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/datatype.h,v
retrieving revision 1.2
retrieving revision 1.12
diff -u -p -r1.2 -r1.12
--- OpenXM/src/kan96xx/Kan/datatype.h	2000/01/16 07:55:38	1.2
+++ OpenXM/src/kan96xx/Kan/datatype.h	2006/12/21 05:29:49	1.12
@@ -1,4 +1,4 @@
-/* $OpenXM$ */
+/* $OpenXM: OpenXM/src/kan96xx/Kan/datatype.h,v 1.11 2005/06/16 06:54:55 takayama Exp $ */
 #include "gmp.h"
 
 /* GC */
@@ -29,6 +29,7 @@ void KSstop();
 			must be larger than AGLIMIT. They are automatically
 			determined by the value of AGLIMIT. */
 
+#define LARGE_NEGATIVE_NUMBER (-0x7fffffff)  /* for 32 bit */
 
 typedef struct listPoly *   POLY;
 typedef struct monomial *   MONOMIAL;
@@ -63,6 +64,7 @@ struct ring {
   int cc;
   char **x;
   char **D;
+  char **Dsmall;
   int *order;   /* [i][j] ---> [i*2*N+j] */
   int orderMatrixSize;
   int *from;
@@ -73,6 +75,15 @@ struct ring {
   void *gbListTower;
   int *outputOrder;
   char *name;
+  int weightedHomogenization;
+  int degreeShiftSize;
+  int degreeShiftN;
+  int *degreeShift;
+  int partialEcart;
+  int *partialEcartGlobalVarX;
+
+/* To be used. */
+  void *ringInInputForm;
 };
 
 
@@ -156,7 +167,10 @@ struct polySet {
   int *mark;          /* if (mark[i]), then syz[i] is simplified. */
   int *serial;        /* serial[i]=k ===> g[i] is input[k] */
   int size;           /* size of this set. i.e., g[0], g[1], ..., g[size-1] */
-  int lim;       
+  int lim;
+  POLY *gh;           /* gh[i] = homogenize(g[i]) for ecart division */
+  int *gen;           /* gen[i] == 1 --> given generators */
+  POLY *gmod;         /* gmod = g mod p for TraceLift. */
 };
 
 struct pair {
@@ -174,6 +188,8 @@ struct gradedPolySet {
   struct polySet **polys;  /* polys[0]: grade=0, polys[1]:grade=1, ... */
   int maxGrade;            /* maximal grade in this set */
   int lim;
+  int gb;  /* it is gb or not. */
+  int reduced; /* it is reduced gb or not. */
 };
 
 struct gradedPairs {