Changeset 4f4b84 in git


Ignore:
Timestamp:
Jul 23, 2002, 2:22:40 PM (22 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'd1d239e9808fca76a9497a01fa91ad4e8db6fba5')
Children:
429ea991c9c38464a945f990c0b5725d0126f4db
Parents:
827da204896fb5eaa02be0e213393805feef8e5c
Message:
*hannes: TEST_OPT_DEGBOUND fixes


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

Legend:

Unmodified
Added
Removed
  • Singular/kutil.cc

    r827da2 r4f4b84  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kutil.cc,v 1.111 2002-06-17 16:46:54 Singular Exp $ */
     4/* $Id: kutil.cc,v 1.112 2002-07-23 12:22:40 Singular Exp $ */
    55/*
    66* ABSTRACT: kernel: utils for kStd
     
    30633063        deleteHC(&h, strat);
    30643064      }
    3065       if (TEST_OPT_DEGBOUND
    3066           && (((strat->honey) && (h.ecart+pFDeg(h.p)>Kstd1_deg))
    3067               || ((!(strat->honey)) && (pFDeg(h.p)>Kstd1_deg))))
    3068         pDelete(&h.p);
    3069       else
    3070         if (h.p!=NULL)
    3071         {
    3072           if (strat->sl==-1)
    3073             pos =0;
    3074           else
    3075           {
    3076             pos = posInS(strat,strat->sl,h.p,h.ecart);
    3077           }
    3078           h.sev = pGetShortExpVector(h.p);
    3079           strat->enterS(h,pos,strat);
    3080         }
     3065      if (h.p!=NULL)
     3066      {
     3067        if (strat->sl==-1)
     3068          pos =0;
     3069        else
     3070          pos = posInS(strat,strat->sl,h.p,h.ecart);
     3071        h.sev = pGetShortExpVector(h.p);
     3072        strat->enterS(h,pos,strat);
     3073      }
    30813074    }
    30823075  }
     
    31613154        deleteHC(&h, strat);
    31623155      }
    3163       if (TEST_OPT_DEGBOUND
    3164           && (((strat->honey) && (h.ecart+pFDeg(h.p)>Kstd1_deg))
    3165               || ((!(strat->honey)) && (pFDeg(h.p)>Kstd1_deg))))
    3166         pDelete(&h.p);
    3167       else
    3168         if (h.p!=NULL)
    3169         {
    3170           if (strat->Ll==-1)
    3171             pos =0;
    3172           else
    3173           {
     3156      if (h.p!=NULL)
     3157      {
     3158        if (strat->Ll==-1)
     3159          pos =0;
     3160        else
    31743161            pos = strat->posInL(strat->L,strat->Ll,&h,strat);
    3175           }
    3176           h.sev = pGetShortExpVector(h.p);
    3177           enterL(&strat->L,&strat->Ll,&strat->Lmax,h,pos);
    3178         }
     3162        h.sev = pGetShortExpVector(h.p);
     3163        enterL(&strat->L,&strat->Ll,&strat->Lmax,h,pos);
     3164      }
    31793165    }
    31803166  }
     
    32623248        deleteHC(&h,strat);
    32633249      }
    3264       if (TEST_OPT_DEGBOUND
    3265       && (((strat->honey) && (h.ecart+pFDeg(h.p)>Kstd1_deg))
    3266         || ((!(strat->honey)) && (pFDeg(h.p)>Kstd1_deg))))
    3267         pDelete(&h.p);
    3268       else
    32693250      if (h.p!=NULL)
    32703251      {
     
    32723253          pos =0;
    32733254        else
    3274         {
    32753255          pos = posInS(strat,strat->sl,h.p,h.ecart);
    3276         }
    32773256        h.sev = pGetShortExpVector(h.p);
    32783257        strat->enterS(h,pos,strat, strat->tl+1);
Note: See TracChangeset for help on using the changeset viewer.