===================================================================
RCS file: /home/cvs/OpenXM/src/kan96xx/Kan/gradedset.c,v
retrieving revision 1.6
retrieving revision 1.9
diff -u -p -r1.6 -r1.9
--- OpenXM/src/kan96xx/Kan/gradedset.c	2003/08/19 08:02:09	1.6
+++ OpenXM/src/kan96xx/Kan/gradedset.c	2005/07/03 11:08:53	1.9
@@ -1,5 +1,6 @@
-/* $OpenXM: OpenXM/src/kan96xx/Kan/gradedset.c,v 1.5 2003/07/30 09:00:52 takayama Exp $ */
+/* $OpenXM: OpenXM/src/kan96xx/Kan/gradedset.c,v 1.8 2005/06/30 08:35:07 takayama Exp $ */
 #include <stdio.h>
+#include <stdlib.h>
 #include "datatype.h"
 #include "extern2.h"
 #include "gradedset.h"
@@ -62,6 +63,8 @@ struct gradedPolySet *newGradedPolySet(n)
     errorGradedSet("No more memory.");
   g->maxGrade = 0;
   g->lim = n;
+  g->gb = 0;
+  g->reduced = 0;
   return(g);
 }
 
@@ -251,6 +254,7 @@ struct gradedPolySet *putPolyInG(g,fi,grade,index,syz,
       gnew->polys[i] = newPolySet(INITSIZE);
     }
     gnew->maxGrade = g->maxGrade;
+    gnew->gb = g->gb; gnew->reduced = g->reduced;
     g = gnew;
   }