Changeset 672e05 in git
 Timestamp:
 May 20, 2008, 4:41:02 PM (15 years ago)
 Branches:
 (u'jengelhdatetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
 Children:
 3172b40e27469d7b4d29efbb901f8c051ba4c385
 Parents:
 2fa632f4d8657b736d23478f2b9ef512df3e7fdb
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

kernel/kstdfac.cc
r2fa632 r672e05 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: kstdfac.cc,v 1.1 3 20080514 12:53:17Singular Exp $ */4 /* $Id: kstdfac.cc,v 1.14 20080520 14:41:02 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT  Kernel: factorizing alg. of Buchberger … … 663 663 { 664 664 n>P.p = redtailBba(n>P.p,pos1,n); 665 if (n>redTailChange) pCleardenom(n>P.p); 665 if (n>redTailChange) 666 { 667 pCleardenom(n>P.p); 668 n>P.pLength=0; 669 } 666 670 } 667 671 else … … 669 673 pNorm(n>P.p); 670 674 n>P.p = redtailBba(n>P.p,pos1,n); 675 if (n>redTailChange) 676 { 677 n>P.pLength=0; 678 } 671 679 } 672 680 kTest_TS(n); … … 678 686 PrintLn(); 679 687 } 680 n>P.pLength=0;681 688 enterpairs(n>P.p,n>sl,n>P.ecart,pos,n); 682 689 enterT(n>P,n);
Note: See TracChangeset
for help on using the changeset viewer.