Changeset 930ea8 in git for kernel/kstdfac.cc
- Timestamp:
- Jan 11, 2012, 2:42:18 PM (12 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 6c98d526bf15bb5a2845bfd4fb4f54474229668c
- Parents:
- 31f1850ad6697d9acd155b53fa63f9e1a648ed9c
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/kstdfac.cc
r31f1850 r930ea8 547 547 ideal bbafac (ideal F, ideal Q,intvec *w,kStrategy strat, ideal_list FL) 548 548 { 549 int srmax,lrmax;550 549 int olddeg,reduc=0; 551 550 int red_result = 1; 552 srmax = strat->sl; 553 reduc = olddeg = lrmax = 0; 551 reduc = olddeg = 0; 554 552 /* compute------------------------------------------------------- */ 555 553 if ((strat->Ll==-1) && (strat->sl>=0)) … … 560 558 while (strat->Ll >= 0) 561 559 { 562 if (strat->Ll > lrmax) lrmax =strat->Ll;/*stat.*/563 560 if (TEST_OPT_DEBUG) messageSets(strat); 564 561 if (strat->Ll== 0) strat->interpt=TRUE; … … 711 708 } 712 709 kTest_TS(n); 713 if (n->sl>srmax) srmax = n->sl;714 715 710 /* construct D */ 716 711 if (IDELEMS(fac)>1) … … 888 883 } 889 884 exitBuchMora(strat); 890 if (TEST_OPT_PROT) { PrintLn(); messageStat( srmax,lrmax,0,strat); }885 if (TEST_OPT_PROT) { PrintLn(); messageStat(0,strat); } 891 886 if (Q!=NULL) updateResult(strat->Shdl,Q,strat); 892 887 return (strat->Shdl);
Note: See TracChangeset
for help on using the changeset viewer.