===================================================================
RCS file: /home/cvs/OpenXM/src/k097/debug/ahg2.k,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -p -r1.2 -r1.3
--- OpenXM/src/k097/debug/ahg2.k	2001/01/05 11:14:27	1.2
+++ OpenXM/src/k097/debug/ahg2.k	2001/01/08 05:26:51	1.3
@@ -224,7 +224,7 @@ def zindicial0(input,n,m) {
 def zrho(f,n) {
   local ans,i,top,w,rz;
   ans = 0;
-  rz = Ringp(f);
+  rz = GetRing(f);
   while(true) {
     if ( f == Poly("0")) sm1(" exit ");
     top = Init(f);