===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/extern2.h,v
retrieving revision 1.5
retrieving revision 1.9
diff -u -p -r1.5 -r1.9
--- OpenXM/src/kan96xx/Kan/extern2.h	2003/07/17 07:33:03	1.5
+++ OpenXM/src/kan96xx/Kan/extern2.h	2003/08/22 11:47:03	1.9
@@ -1,4 +1,4 @@
-/* $OpenXM: OpenXM/src/kan96xx/Kan/extern2.h,v 1.4 2003/07/10 08:20:04 takayama Exp $ */
+/* $OpenXM: OpenXM/src/kan96xx/Kan/extern2.h,v 1.8 2003/08/21 02:30:23 takayama Exp $ */
 /* poly.c */
 void KinitKan(void);
 MONOMIAL newMonomial(struct ring *ringp);
@@ -44,7 +44,12 @@ POLY modulo0(POLY f,struct ring *ringp);
 POLY modulopZ(POLY f,struct coeff *pcoeff);
 struct pairOfPOLY quotientByNumber(POLY f,struct coeff *pcoeff);
 int pLength(POLY f);
+struct coeff *gcdOfCoeff(POLY f);
+int coeffSizeMin(POLY f);
+POLY reduceContentOfPoly(POLY f,struct coeff **contp);
+int shouldReduceContent(POLY f,int ss);
 
+
 /* poly3.c */
 void initT(void);
 void makeTable(struct coeff *c,struct exps e[],struct ring *ringp);
@@ -67,6 +72,8 @@ int isHomogenized_vec(POLY f);
 int containVectorVariable(POLY f);
 POLY POLYToPrincipalPart(POLY f);
 POLY POLYToInitW(POLY f,int w[]);
+POLY POLYToInitWS(POLY f,int w[],int s[]);
+int ordWsAll(POLY f,int w[],int s[]);
 
 POLY polyGCD(POLY f,POLY g);
 int isTheSameRing(struct ring *rstack[], int rp, struct ring *newRingp);
@@ -75,6 +82,8 @@ POLY goHomogenize(POLY f,int u[],int v[],int ds[],int 
 POLY goHomogenize11(POLY f,int ds[],int dssize,int ei,int onlyS);
 POLY goHomogenize_dsIdx(POLY f,int u[],int v[],int dsIdx,int ei,int onlyS);
 POLY goHomogenize11_dsIdx(POLY f,int ds[],int dsIdx,int ei,int onlyS);
+struct ring *newRingOverFp(struct ring *rp, int p);
+int getPrime(int p);
 
 /* coeff.c */
 char *intToString(int i);