===================================================================
RCS file: /home/cvs/OpenXM/src/k097/debug/toric0.k,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -p -r1.2 -r1.3
--- OpenXM/src/k097/debug/toric0.k	2001/01/05 11:14:27	1.2
+++ OpenXM/src/k097/debug/toric0.k	2001/01/08 05:26:52	1.3
@@ -214,7 +214,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);