Changeset bbf50e in git


Ignore:
Timestamp:
Jun 19, 2009, 11:53:34 AM (15 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
Children:
a14585d3e8490b7eff149e142444f18d956e9b25
Parents:
63b728ccb08555d986799d4288c23f729d16f2e6
Message:
*hannes: shrinh in redFirstShift


git-svn-id: file:///usr/local/Singular/svn/trunk@11906 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed

  • kernel/kstd2.cc

    r63b728c rbbf50e  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: kstd2.cc,v 1.89 2009-06-13 14:37:58 Singular Exp $ */
     4/* $Id: kstd2.cc,v 1.90 2009-06-19 09:53:34 Singular Exp $ */
    55/*
    66*  ABSTRACT -  Kernel: alg. of Buchberger
    … …  
    13671367  srmax = strat->sl;
    13681368  reduc = olddeg = lrmax = 0;
     1369  strat->lV=lV;
    13691370
    13701371#ifndef NO_BUCKETS
    … …  
    17501751#endif
    17511752    ksReducePoly(h, &(strat->T[j]), strat->kNoetherTail(), NULL, strat);
    1752 
     1753    poly qq=p_Shrink(h->GetTP(),strat->lV,strat->tailRing);
     1754    h->p=NULL;
     1755    h->t_p=qq;
     1756    strat->GetP(strat->lmBin);
     1757   
    17531758#ifdef KDEBUG
    17541759    if (TEST_OPT_DEBUG)
Note: See TracChangeset for help on using the changeset viewer.