Changeset eafad1b in git for kernel/GBEngine/kstd2.cc


Ignore:
Timestamp:
Oct 23, 2017, 3:27:38 PM (7 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b4f17ed1d25f93d46dbe29e4b499baecc2fd51bb')
Children:
67d795b1cb7256d94673ad3272894aa45c65d580
Parents:
470125b2699a9c320ed4b745305e5fde37270751
Message:
fix: more TObject::pLength stuff
File:
1 edited

Legend:

Unmodified
Added
Removed

  • kernel/GBEngine/kstd2.cc

    r470125b reafad1b  
    562562
    563563    li = strat->T[j].pLength;
     564    if (li<=0) li=strat->T[j].GetpLength();
    564565    ii = j;
    565566    /*
    … …  
    576577      if (i > strat->tl)
    577578        break;
    578       if (li<=1)
     579      if (li==1)
    579580        break;
    580581      if ((strat->T[i].pLength < li)
    … …  
    587588         */
    588589        li = strat->T[i].pLength;
     590        if (li<=0) li=strat->T[i].GetpLength();
    589591        ii = i;
    590592      }
    … …  
    739741
    740742    li = strat->T[j].pLength;
     743    if (li<=0) li=strat->T[j].GetpLength();
    741744    ii = j;
    742745    /*
    … …  
    753756      if (i > strat->tl)
    754757        break;
    755       if (li<=1)
     758      if (li==1)
    756759        break;
    757760      if ((strat->T[i].pLength < li)
    … …  
    764767         */
    765768        li = strat->T[i].pLength;
     769        if (li<=0) li=strat->T[i].GetpLength();
    766770        ii = i;
    767771      }
    … …  
    9971001
    9981002    li = strat->T[j].pLength;
     1003    if (li<=0) li=strat->T[j].GetpLength();
    9991004    ii = j;
    10001005    /*
    … …  
    10101015      if (i > strat->tl)
    10111016        break;
    1012       if (li<=1)
     1017      if (li==1)
    10131018        break;
    10141019      if ((strat->T[i].pLength < li)
    … …  
    10211026         */
    10221027        li = strat->T[i].pLength;
     1028        if (li<=0) li=strat->T[i].GetpLength();
    10231029        ii = i;
    10241030      }
    … …  
    13131319
    13141320    li = strat->T[j].pLength;
    1315     #if 0
    1316     if (li==0)
    1317     {
    1318       li=strat->T[j].pLength=pLength(strat->T[j].p);
    1319     }
    1320     #endif
     1321    if (li<=0) li=strat->T[j].GetpLength();
    13211322    ii = j;
    13221323    /*
    … …  
    13341335      if (i > strat->tl)
    13351336        break;
    1336       if (li<=1)
     1337      if (li==1)
    13371338        break;
    1338     #if 0
    1339       if (strat->T[i].pLength==0)
    1340       {
    1341         PrintS("!");
    1342         strat->T[i].pLength=pLength(strat->T[i].p);
    1343       }
    1344    #endif
    13451339      if ((strat->T[i].pLength < li)
    13461340         &&
    … …  
    13511345         * the polynomial to reduce with is now;
    13521346         */
    1353         PrintS("+");
    13541347        li = strat->T[i].pLength;
     1348        if (li<=0) li=strat->T[i].GetpLength();
    13551349        ii = i;
    13561350      }
    … …  
    14781472    ei = strat->T[j].ecart;
    14791473    li = strat->T[j].pLength;
     1474    if (li<=0) li=strat->T[j].GetpLength();
    14801475    ii = j;
    14811476    /*
    … …  
    14931488      //if (ei < h->ecart)
    14941489      //  break;
    1495       if (li<=1)
     1490      if (li==1)
    14961491        break;
    14971492      if ((((strat->T[i].ecart < ei) && (ei> h->ecart))
    … …  
    15061501        ei = strat->T[i].ecart;
    15071502        li = strat->T[i].pLength;
     1503        if (li<=0) li=strat->T[i].GetpLength();
    15081504        ii = i;
    15091505      }
Note: See TracChangeset for help on using the changeset viewer.