Changeset 5d8302 in git

Timestamp:

Apr 7, 1998, 7:54:20 PM (25 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '00e2e9c41af3fde1273eb3633f4c0c7c3db2579d')

Children:

d86e64ab96a8a8f265a4d1b473857a697f643276

Parents:

0077d9d4f8548ae476182f46352ceef170588689

Message:

* hannes: cleanup kstd1.cc


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

File:

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

Singular/kstd1.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kstd1.cc,v 1.18 1998-04-06 17:59:29 obachman Exp $ */
+/* $Id: kstd1.cc,v 1.19 1998-04-07 17:54:20 Singular Exp $ */
 /*
 * ABSTRACT:
@@ -1226 +1226 @@
   {
     pEnlargeSet(&strat->S,IDELEMS(strat->Shdl),setmax);
-    strat->ecartS = (intset) ReAlloc(strat->ecartS,IDELEMS(strat->Shdl)*sizeof(int),
+    strat->ecartS = (intset) ReAlloc(strat->ecartS,
+                                     IDELEMS(strat->Shdl)*sizeof(int),
                                      (IDELEMS(strat->Shdl)+setmax)*sizeof(int));
     if (strat->fromQ)
     {
-      strat->fromQ = (intset)ReAlloc(strat->fromQ,IDELEMS(strat->Shdl)*sizeof(int),
+      strat->fromQ = (intset)ReAlloc(strat->fromQ,
+                                    IDELEMS(strat->Shdl)*sizeof(int),
                                     (IDELEMS(strat->Shdl)+setmax)*sizeof(int));
     }
@@ -1310 +1312 @@
   {
     pEnlargeSet(&strat->S,IDELEMS(strat->Shdl),setmax);
-    strat->ecartS = (intset) ReAlloc(strat->ecartS,IDELEMS(strat->Shdl)*sizeof(intset),
-                                     (IDELEMS(strat->Shdl)+setmax)*sizeof(intset));
+    strat->ecartS=(intset)ReAlloc(strat->ecartS,
+                                  IDELEMS(strat->Shdl)*sizeof(intset),
+                                  (IDELEMS(strat->Shdl)+setmax)*sizeof(intset));
     IDELEMS(strat->Shdl) += setmax;
     strat->Shdl->m=strat->S;
@@ -1336 +1339 @@
 
   strat->NotUsedAxis = (BOOLEAN *)Alloc((pVariables+1)*sizeof(BOOLEAN));
-  for (j=1; j<=pVariables; j++) strat->NotUsedAxis[j] = TRUE;
+  for (j=pVariables; j>0; j--) strat->NotUsedAxis[j] = TRUE;
   strat->enterS = enterSMora;
   strat->initEcartPair = initEcartPairMora; /*- ecart approximation -*/
@@ -2204 +2207 @@
   initBuchMoraCrit(strat);
   strat->NotUsedAxis = (BOOLEAN *)Alloc((pVariables+1)*sizeof(BOOLEAN));
-  for (j=1; j<=pVariables; j++) strat->NotUsedAxis[j] = TRUE;
+  for (j=pVariables; j>0; j--) strat->NotUsedAxis[j] = TRUE;
   strat->enterS      = enterSBba;
   strat->posInT      = posInT0;