===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/extern2.h,v
retrieving revision 1.5
retrieving revision 1.7
diff -u -p -r1.5 -r1.7
--- OpenXM/src/kan96xx/Kan/extern2.h	2003/07/17 07:33:03	1.5
+++ OpenXM/src/kan96xx/Kan/extern2.h	2003/08/20 01:39:17	1.7
@@ -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.6 2003/08/19 08:02:09 takayama Exp $ */
 /* poly.c */
 void KinitKan(void);
 MONOMIAL newMonomial(struct ring *ringp);
@@ -44,6 +44,9 @@ 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);
 
 /* poly3.c */
 void initT(void);
@@ -75,6 +78,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);