Changeset b179b1 in git

Timestamp:

Feb 16, 2001, 10:19:35 AM (23 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

584d1f1ad4878b9855984324f19d6383aa60632c

Parents:

8c16e9458bd37eb7f5ef37b409eb1b0a34b32824

Message:

*hannes: optimized kStrat


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

File:

• Singular/kutil.h (modified) (5 diffs)

Singular/kutil.h

@@ -4 +4 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: kutil.h,v 1.56 2001-02-09 17:26:00 obachman Exp $ */
+/* $Id: kutil.h,v 1.57 2001-02-16 09:19:35 Singular Exp $ */
 /*
 * ABSTRACT: kernel: utils for kStd
@@ -225 +225 @@
   pLDegProc pOrigLDeg_TailRing;
 
+  LObject P;
   ideal Shdl;
   ideal D; /*V(S) is in D(D)*/
@@ -242 +243 @@
   poly    t_kNoether;
   BOOLEAN * NotUsedAxis;
-  LObject P;
   poly tail;
   leftv kIdeal;
@@ -249 +249 @@
   // procedure for ShalloCopy from tailRing  to currRing
   pShallowCopyDeleteProc p_shallow_copy_delete;
-  BOOLEAN *pairtest;/*used for enterOnePair*/
-  // if set, pLDeg(p, l) == (pFDeg(pLast(p), pLength)
-  BOOLEAN LDegLast;
-  // if set, then L.length == L.pLength
-  BOOLEAN length_pLength;
-  // if set, then posInL does not depend on L.length
-  BOOLEAN posInLDependsOnLength;
+  // pointers to Tobjects R[i] is ith Tobject which is generated
+  TObject**  R; 
+  // S_2_R[i] yields Tobject which corresponds to S[i]
+  int*      S_2_R; 
+  ring tailRing;
+  omBin lmBin;
+  omBin tailBin;
   int cp,c3;
   int sl,mu;
@@ -277 +277 @@
   BOOLEAN posInLOldFlag;
   BOOLEAN use_buckets;
-  ring tailRing;
-  omBin lmBin;
-  omBin tailBin;
+  BOOLEAN interred_flag;
+  BOOLEAN *pairtest;/*used for enterOnePair*/
+  // if set, pLDeg(p, l) == (pFDeg(pLast(p), pLength)
+  BOOLEAN LDegLast;
+  // if set, then L.length == L.pLength
+  BOOLEAN length_pLength;
+  // if set, then posInL does not depend on L.length
+  BOOLEAN posInLDependsOnLength;
   /*FALSE, if posInL == posInL10*/
   char    redTailChange;
   char    news;
   char    newt;/*used for messageSets*/
-
-  // pointers to Tobjects R[i] is ith Tobject which is generated
-  TObject**  R; 
-  // S_2_R[i] yields Tobject which corresponds to S[i]
-  int*      S_2_R; 
   
   skStrategy();