Changeset 0318fe in git
- Timestamp:
- Jan 13, 2015, 12:22:14 PM (9 years ago)
- Branches:
- (u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')
- Children:
- d711b46eb29f241f3854ae99e8451d3beb7f96e4
- Parents:
- 37c2b35026800c66eeabc04e5cdb28d10ddb012b
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/GBEngine/khstd.cc
r37c2b3 r0318fe 150 150 */ 151 151 { 152 int i; 153 ideal Lm; 154 intvec *newhilb; 155 156 Lm = id_Head(strat->Shdl,currRing); 157 158 newhilb =hHstdSeries(Lm,w,strat->kHomW,Q,currRing); // ,strat->tailRing? 152 ideal Lm; 153 intvec *newhilb; 154 155 Lm = id_Head(strat->Shdl,currRing); 156 157 newhilb =hHstdSeries(Lm,w,strat->kHomW,Q,currRing); // ,strat->tailRing? 159 158 160 159 #if ADIDEBUG … … 188 187 #endif 189 188 190 if(newhilb->compare(hilb) == 0) 191 { 192 while (strat->Ll>=0) 193 { 194 count++; 195 if(TEST_OPT_PROT) 196 { 197 PrintS("h"); 198 mflush(); 199 } 200 deleteInL(strat->L,&strat->Ll,strat->Ll,strat); 201 } 202 delete newhilb; 203 return; 204 } 205 206 id_Delete(&Lm,currRing); 207 189 if(newhilb->compare(hilb) == 0) 190 { 191 while (strat->Ll>=0) 192 { 193 count++; 194 if(TEST_OPT_PROT) 195 { 196 PrintS("h"); 197 mflush(); 198 } 199 deleteInL(strat->L,&strat->Ll,strat->Ll,strat); 200 } 201 delete newhilb; 202 return; 203 } 204 id_Delete(&Lm,currRing); 208 205 }
Note: See TracChangeset
for help on using the changeset viewer.