Changeset 07b1cf in git for kernel/kstd2.cc
- Timestamp:
- Feb 1, 2007, 7:53:54 PM (17 years ago)
- Branches:
- (u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
- Children:
- add114ed9eca28cf67e9f12e3e5a60d07696ce8a
- Parents:
- 2cd0ca7c81f7d71ae3b530712b2d135a4df1802e
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/kstd2.cc
r2cd0ca r07b1cf 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: kstd2.cc,v 1.3 6 2007-01-31 10:11:48Singular Exp $ */4 /* $Id: kstd2.cc,v 1.37 2007-02-01 18:53:54 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT - Kernel: alg. of Buchberger … … 1266 1266 #endif 1267 1267 /* complete reduction of the standard basis--------- */ 1268 if (TEST_OPT_SB_1) 1269 { 1270 int k=1; 1271 int j; 1272 while(k<=strat->sl) 1273 { 1274 j=0; 1275 loop 1276 { 1277 if (j>=k) break; 1278 clearS(strat->S[j],strat->sevS[j],&k,&j,strat); 1279 j++; 1280 } 1281 k++; 1282 } 1283 } 1284 1268 1285 if (TEST_OPT_REDSB) completeReduce(strat); 1269 1286 /* release temp data-------------------------------- */
Note: See TracChangeset
for help on using the changeset viewer.