Changeset 1b74f3 in git
- Timestamp:
- Jun 14, 2011, 3:49:47 PM (12 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
- Children:
- 5374da00927c8d678e52de0d30e440c1ba6459f4
- Parents:
- f773274cbe208b555ecdb96d8a2075cec9025877
- Location:
- kernel
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/fast_mult.cc
rf77327 r1b74f3 456 456 { 457 457 number x; 458 int i;459 458 poly res = p_Init(r,lm_bin); 460 459 … … 519 518 520 519 } 521 int pseudo_len=1;522 520 zw=erg; 523 // kBucket_Add_q(erg_bucket,erg,&pseudo_len);524 521 } 525 522 -
kernel/kbuckets.cc
rf77327 r1b74f3 819 819 kbTest(bucket); 820 820 i = pLogLength(l1); 821 #ifdef USE_COEF_BUCKETS 821 822 number n=n_Init(1,r); 823 #endif 822 824 if (i <= bucket->buckets_used && bucket->buckets[i] != NULL) 823 825 { … … 1248 1250 assume(bucket->buckets[i]!=NULL); 1249 1251 1250 ring r=bucket->bucket_ring;1251 1252 poly p=bucket->buckets[i]; 1252 1253 bucket->buckets_length[i]--; 1253 1254 #ifdef USE_COEF_BUCKETS 1255 ring r=bucket->bucket_ring; 1254 1256 if (bucket->coef[i]!=NULL) 1255 1257 { -
kernel/longtrans.cc
rf77327 r1b74f3 246 246 { 247 247 napoly y, r, qa, qn, q; 248 number t , h;248 number t; 249 249 250 250 if (p_GetExp(x, 1, nacRing) >= p_GetExp(c, 1, nacRing)) … … 461 461 const char* napHandlePars(const char *s, int i, napoly ex) 462 462 { 463 int j;464 463 if (strcmp(s, ntParNames[i]) == 0) 465 464 { … … 879 878 napoly napPerm(napoly p,const int *par_perm,const ring src_ring,const nMapFunc nMap) 880 879 { 881 napoly w , a;880 napoly w; 882 881 883 882 if (p==NULL) return NULL; … … 1705 1704 { 1706 1705 lnumber a = (lnumber)za; 1707 napoly x, y;1708 1706 number t; 1709 1707 if (a==NULL) return FALSE; … … 1763 1761 { 1764 1762 lnumber a = (lnumber)za; 1765 napoly x, y;1766 number t;1767 1763 if (a==NULL) return FALSE; 1768 1764 #ifdef LDEBUG … … 1972 1968 napoly x = p->z; 1973 1969 napoly y = p->n; 1974 1975 BOOLEAN norm=FALSE;1976 1970 1977 1971 if (y==NULL) return; -
kernel/mpr_base.cc
rf77327 r1b74f3 647 647 void pointSet::sort() 648 648 { 649 int i ,j;649 int i; 650 650 bool found= true; 651 651 onePointP tmp; … … 722 722 assume( i > 0 ); 723 723 poly iter= p; 724 for ( int j= 1; (j < i) && iter; j++ ) iter= pIter(iter);724 for ( int j= 1; (j < i) && (iter!=NULL); j++ ) iter= pIter(iter); 725 725 return iter; 726 726 } … … 838 838 int idelem= IDELEMS(gls); 839 839 ideal id; 840 poly p,pid ,pd;840 poly p,pid; 841 841 int * vert; 842 842 … … 1241 1241 bool found= true; 1242 1242 mprfloat cd; 1243 int set,pnt,onum;1243 int onum; 1244 1244 int bucket[MAXVARS+2]; 1245 1245 setID *optSum; … … 1414 1414 // uRPos[i][2..idelem]: col of u(1) .. u(n) 1415 1415 // i= 1 .. numSet0 1416 int i, j,epos;1416 int i,epos; 1417 1417 int rp,cp; 1418 1418 poly rowp,epp; … … 1503 1503 int i,j; 1504 1504 i= 1; 1505 time_t *tp = NULL;1506 1505 1507 1506 while ( i <= dim ) … … 1575 1574 pointSet **Qi; // vertices sets of Conv(Supp(f_i)), i=0..idelem 1576 1575 pointSet *E; // all integer lattice points of the minkowski sum of Q0...Qn 1577 int i, j,k;1576 int i,k; 1578 1577 int pnt; 1579 1578 int totverts; // total number of exponent vectors in ideal gls … … 1735 1734 const ideal resMatrixSparse::getMatrix() 1736 1735 { 1737 int i,j, rp,cp;1736 int i,j,cp; 1738 1737 poly pp,phelp,piter,pgls; 1739 1738 … … 1796 1795 const number resMatrixSparse::getDetAt( const number* evpoint ) 1797 1796 { 1798 int i,cp ,rp;1797 int i,cp; 1799 1798 poly pp,phelp,piter; 1800 1799 … … 1856 1855 const poly resMatrixSparse::getUDet( const number* evpoint ) 1857 1856 { 1858 int i,cp ,rp;1857 int i,cp; 1859 1858 poly pp,phelp,piter; 1860 1859 … … 2467 2466 const ideal resMatrixDense::getMatrix() 2468 2467 { 2469 int k,i,j;2468 int i,j; 2470 2469 2471 2470 // copy matrix … … 2548 2547 const number resMatrixDense::getDetAt( const number* evpoint ) 2549 2548 { 2550 int k,i ,j;2549 int k,i; 2551 2550 2552 2551 // copy evaluation point into matrix … … 2749 2748 poly uResultant::linearPoly( const resMatType rrmt ) 2750 2749 { 2751 int i ,j;2750 int i; 2752 2751 2753 2752 poly newlp= pOne(); … … 2928 2927 rootContainer ** uResultant::interpolateDenseSP( BOOLEAN matchUp, const number subDetVal ) 2929 2928 { 2930 int i, j,p,uvar;2929 int i,p,uvar; 2931 2930 long tdg; 2932 2931 int loops= (matchUp?n-2:n-1); … … 3066 3065 rootContainer ** uResultant::specializeInU( BOOLEAN matchUp, const number subDetVal ) 3067 3066 { 3068 int i, j,p,uvar;3067 int i,p,uvar; 3069 3068 long tdg; 3070 3069 poly pures,piter; -
kernel/mpr_numeric.cc
rf77327 r1b74f3 102 102 int j; 103 103 long i,c,sum; 104 number tmp;105 104 106 105 poly pnew,pit=NULL; … … 286 285 { 287 286 int i; 288 int n= pVariables;289 290 287 // free coeffs, ievpoint 291 288 if ( ievpoint != NULL ) -
kernel/ringgb.cc
rf77327 r1b74f3 172 172 { 173 173 number cf = nCopy(pGetCoeff(f)), cg = nCopy(pGetCoeff(g)); 174 int ct =ksCheckCoeff(&cf, &cg); // gcd and zero divisors174 (void)ksCheckCoeff(&cf, &cg); // gcd and zero divisors 175 175 poly fm, gm; 176 176 k_GetLeadTerms(f, g, currRing, fm, gm, currRing);
Note: See TracChangeset
for help on using the changeset viewer.