Changeset d768c6 in git for Singular/iparith.cc

Timestamp:

Dec 18, 2000, 7:26:31 PM (23 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

e64eae538cf7898915202e90301f665c8dce8c91

Parents:

32f3203b5e5825801ca5fd2f384dc3624bfa7b4a

Message:

*hannes: more imap-tests


git-svn-id: file:///usr/local/Singular/svn/trunk@4937 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/iparith.cc (modified) (2 diffs)

Singular/iparith.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: iparith.cc,v 1.242 2000-12-18 15:44:40 obachman Exp $ */
+/* $Id: iparith.cc,v 1.243 2000-12-18 18:26:31 Singular Exp $ */
 
 /*
@@ -1679 +1679 @@
     {
       int i;
-      for(i=1;i<=min(r->N,pVariables);i++)
-      {
-        Print("// var nr %d: %s -> %s\n",i,r->names[i+1],currRing->names[i+1]);
-      }
-      for(i=1;i<=min(rPar(r),rPar(currRing));i++) // possibly empty loop
+      for(i=0;i<min(r->N,pVariables);i++)
+      {
+        Print("// var nr %d: %s -> %s\n",i,r->names[i],currRing->names[i]);
+      }
+      for(i=0;i<min(rPar(r),rPar(currRing));i++) // possibly empty loop
       {
         Print("// par nr %d: %s -> %s\n",
-              i,r->parameter[i+1],currRing->parameter[i+1]);
+              i,r->parameter[i],currRing->parameter[i]);
       }
     }