Changeset 59b9fdb in git
- Timestamp:
- Mar 8, 2018, 5:08:15 PM (5 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a657104b677b4c461d018cbf3204d72d34ad66a9')
- Children:
- 239d735990d1f7ad5e27ad2ce28f8305525c418d9a03c2dc812de8eeadb5ea846b85d1b21c1d247f
- Parents:
- 0d5959cf283bcd6d174bfef558dd97713320de46
- Location:
- kernel/GBEngine
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/GBEngine/kstd2.cc
r0d5959c r59b9fdb 91 91 const TSet T=strat->T; 92 92 const unsigned long* sevT=strat->sevT; 93 const ring r=currRing; 94 const BOOLEAN is_Ring=rField_is_Ring(r); 93 95 if (L->p!=NULL) 94 96 { 95 const ring r=currRing;96 97 const poly p=L->p; 97 98 98 99 pAssume(~not_sev == p_GetShortExpVector(p, r)); 99 100 100 if( rField_is_Ring(r))101 if(is_Ring) 101 102 { 102 103 loop … … 145 146 const poly p=L->t_p; 146 147 const ring r=strat->tailRing; 147 if( rField_is_Ring(r))148 if(is_Ring) 148 149 { 149 150 loop … … 200 201 201 202 pAssume(~not_sev == p_GetShortExpVector(p, currRing)); 203 204 BOOLEAN is_Ring=rField_is_Ring(currRing); 202 205 #if 1 203 206 int ende; 204 if ((strat->ak>0) || currRing->pLexOrder || rField_is_Ring(currRing)) ende=strat->sl; 205 else ende=posInS(strat,*max_ind,p,0)+1; 206 if (ende>(*max_ind)) ende=(*max_ind); 207 if (is_Ring 208 || (strat->ak>0) 209 || currRing->pLexOrder) 210 ende=strat->sl; 211 else 212 { 213 ende=posInS(strat,*max_ind,p,0)+1; 214 if (ende>(*max_ind)) ende=(*max_ind); 215 } 207 216 #else 208 217 int ende=strat->sl; 209 218 #endif 210 (*max_ind)=ende; 211 if(rField_is_Ring(currRing)) 219 if(is_Ring) 212 220 { 213 221 loop -
kernel/GBEngine/tgb.cc
r0d5959c r59b9fdb 2997 2997 nDelete (&coef); 2998 2998 h = kBucketGetLm (P.bucket); 2999 pTest (h);3000 2999 if(h == NULL) 3001 3000 { … … 3006 3005 return res; 3007 3006 } 3008 pTest (h);3009 3007 P.p = h; 3010 3008 P.t_p = NULL; … … 4493 4491 return; 4494 4492 } 4495 if(j < 0)4493 else /*if(j < 0)*/ 4496 4494 { 4497 4495 //not reduceable, try to use this for reducing higher terms
Note: See TracChangeset
for help on using the changeset viewer.