Changeset 734b9a in git


Ignore:
Timestamp:
Mar 31, 2000, 2:15:03 PM (24 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '648d28f488f6ff08f5607ff229b9ad9e4a5b93c2')
Children:
f9385008f79db8896fcdc66f7cd9125a254bc553
Parents:
b8661e0931a0c7464712ad70a5d8bd33b423a9f7
Message:
*hannes: use TEST_OPT_...


git-svn-id: file:///usr/local/Singular/svn/trunk@4244 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
Singular
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • Singular/kbuckets.cc

    rb8661e0 r734b9a  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kbuckets.cc,v 1.12 1999-11-15 17:20:12 obachman Exp $ */
     4/* $Id: kbuckets.cc,v 1.13 2000-03-31 12:15:01 Singular Exp $ */
    55
    66#include "mod2.h"
     
    841841        if (i > strat->tl)
    842842          break;
    843         if ((!BTEST1(20)) && (ei <= (*h).ecart))
     843        if ((!TEST_OPT_REDBEST) && (ei <= (*h).ecart))
    844844          break;
    845845        if ((strat->T[i].ecart < ei) && pDivisibleBy1(strat->T[i].p,lm))
  • Singular/kstd2.cc

    rb8661e0 r734b9a  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kstd2.cc,v 1.41 2000-01-22 12:04:07 Singular Exp $ */
     4/* $Id: kstd2.cc,v 1.42 2000-03-31 12:15:01 Singular Exp $ */
    55/*
    66*  ABSTRACT -  Kernel: alg. of Buchberger
     
    226226      if (i > strat->tl)
    227227        break;
    228       if ((!BTEST1(20)) && (ei <= (*h).ecart))
     228      if ((!TEST_OPT_REDBEST) && (ei <= (*h).ecart))
    229229        break;
    230230      if ((strat->T[i].ecart < ei) &&
     
    509509 /* setting global variables ------------------- */
    510510  strat->enterS = enterSBba;
    511   if ((BTEST1(20)) && (!strat->honey))
     511  if ((TEST_OPT_REDBEST) && (!strat->honey))
    512512    strat->red = redBest;
    513513  else if (strat->honey)
  • Singular/syz0.cc

    rb8661e0 r734b9a  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: syz0.cc,v 1.28 2000-02-29 10:46:04 siebert Exp $ */
     4/* $Id: syz0.cc,v 1.29 2000-03-31 12:15:02 Singular Exp $ */
    55/*
    66* ABSTRACT: resolutions
     
    324324        ecartToRed = 1;
    325325        bestEcart = 1;
    326         if (BTEST1(6))
     326        if (TEST_OPT_DEBUG)
    327327        {
    328328          PrintS("pair: ");pWrite0(S[j]);PrintS(" ");pWrite(S[k]);
     
    339339        while (pGetComp(toRed)<=rkF)
    340340        {
    341           if (BTEST1(6))
     341          if (TEST_OPT_DEBUG)
    342342          {
    343343            PrintS("toRed: ");pWrite(toRed);
     
    621621        //the next term of the syzygy
    622622        //constructs the spoly
    623         if (BTEST1(6))
     623        if (TEST_OPT_DEBUG)
    624624        {
    625625          if (k<Fl)
     
    645645        while (toRed!=NULL)
    646646        {
    647           if (BTEST1(6))
     647          if (TEST_OPT_DEBUG)
    648648          {
    649649            PrintS("toRed: ");pWrite(toRed);
     
    692692            //the next monom of the syzygy
    693693            isNotReduced = TRUE;
    694             if (BTEST1(6))
     694            if (TEST_OPT_DEBUG)
    695695            {
    696696              PrintS("reduced with: ");pWrite(F[l]);
  • Singular/syz1.cc

    rb8661e0 r734b9a  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: syz1.cc,v 1.57 2000-03-22 08:56:05 siebert Exp $ */
     4/* $Id: syz1.cc,v 1.58 2000-03-31 12:15:02 Singular Exp $ */
    55/*
    66* ABSTRACT: resolutions
     
    10541054          res=syzstr->res[index];
    10551055        }
    1056         if (BTEST1(6))
     1056        if (TEST_OPT_DEBUG)
    10571057        {
    10581058          if ((sPairs)[i].isNotMinimal==NULL)
  • Singular/syz2.cc

    rb8661e0 r734b9a  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: syz2.cc,v 1.14 2000-02-29 10:46:06 siebert Exp $ */
     4/* $Id: syz2.cc,v 1.15 2000-03-31 12:15:03 Singular Exp $ */
    55/*
    66* ABSTRACT: resolutions
     
    881881          res=syzstr->res[1];
    882882        }
    883         if (BTEST1(6))
     883        if (TEST_OPT_DEBUG)
    884884        {
    885885          if ((sPairs)[i].isNotMinimal==NULL)
Note: See TracChangeset for help on using the changeset viewer.