Changeset ab9672 in git for Singular/kstd1.cc

Timestamp:

Nov 6, 2000, 3:47:36 PM (24 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '38dfc5131670d387a89455159ed1e071997eec94')

Children:

764e0c23470afd33233b29dcadf3244456e39279

Parents:

d7dcee21af33990fe117bd4e5bf9702e20188d99

Message:

* as we go along: strat->R introduced


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

File:

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

Singular/kstd1.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kstd1.cc,v 1.59 2000-11-03 14:50:17 obachman Exp $ */
+/* $Id: kstd1.cc,v 1.60 2000-11-06 14:47:34 obachman Exp $ */
 /*
 * ABSTRACT:
@@ -842 +842 @@
         strat->T[j+1]=strat->T[j];
         strat->sevT[j+1]=strat->sevT[j];
-        strat->R[strat->T[j+1].r] = &(strat->T[j+1]);
+        strat->R[strat->T[j+1].i_r] = &(strat->T[j+1]);
       }
       strat->T[at+1]=p;
       strat->sevT[at+1] = sev;
-      strat->R[p.r] = &(strat->T[at+1]);
+      strat->R[p.i_r] = &(strat->T[at+1]);
     }
   }