Changeset 4378bb in git


Ignore:
Timestamp:
Nov 12, 2008, 5:07:20 PM (16 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'fc741b6502fd8a97288eaa3eba6e5220f3c3df87')
Children:
6ba61462da1bbd769df3d51f1714e8e370942645
Parents:
6bd405f611d9e3d1ccbd34fdf122aa98e8474bc6
Message:
*hannes/gp: interred


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

Legend:

Unmodified
Added
Removed
  • kernel/kstd1.cc

    r6bd405 r4378bb  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kstd1.cc,v 1.39 2008-09-16 12:35:32 Singular Exp $ */
     4/* $Id: kstd1.cc,v 1.40 2008-11-12 16:07:20 Singular Exp $ */
    55/*
    66* ABSTRACT:
     
    22312231    else
    22322232    {
     2233      int deg_before=olddeg;
    22332234      if (TEST_OPT_PROT)
    2234         message((strat->honey ? strat->P.ecart : 0) + strat->P.pFDeg(),
     2235        message(strat->P.pFDeg(),
    22352236                &olddeg,&reduc,strat, red_result);
    22362237
     
    22562257      {
    22572258        strat->P.pCleardenom();
    2258         if ((TEST_OPT_REDSB)||(TEST_OPT_REDTAIL))
     2259        if (0)
     2260        //if ((TEST_OPT_REDSB)||(TEST_OPT_REDTAIL))
    22592261        {
    22602262          strat->P.p = redtailBba(&(strat->P),pos-1,strat, withT);
     
    22652267      {
    22662268        strat->P.pNorm();
    2267         if ((TEST_OPT_REDSB)||(TEST_OPT_REDTAIL))
     2269        if (0)
     2270        //if ((TEST_OPT_REDSB)||(TEST_OPT_REDTAIL))
    22682271          strat->P.p = redtailBba(&(strat->P),pos-1,strat, withT);
    22692272      }
     
    23002303  /* complete reduction of the standard basis--------- */
    23012304
    2302   //if (TEST_OPT_REDSB)
    2303   if(need_retry==0)
     2305  if((need_retry==0) && (TEST_OPT_REDSB))
    23042306  {
    23052307    completeReduce(strat);
     
    23452347  if(pOrdSgn==-1) return kInterRedOld(F,Q);
    23462348
     2349  BITSET save=test;
     2350  //test|=Sy_bit(OPT_NOT_SUGAR);
     2351  test|=Sy_bit(OPT_REDTHROUGH);
     2352  //test&= ~Sy_bit(OPT_REDTAIL);
     2353  //test&= ~Sy_bit(OPT_REDSB);
     2354  //extern char * showOption() ;
     2355  //Print("%s\n",showOption());
     2356
    23472357  int need_retry;
    23482358  int counter=3;
     
    23582368    res = res1;
    23592369  }
     2370  test=save;
    23602371  idSkipZeroes(res);
    23612372  return res;
Note: See TracChangeset for help on using the changeset viewer.