Changeset 9bb5457 in git for libpolys/coeffs/longrat.cc
- Timestamp:
- May 27, 2011, 2:56:51 PM (13 years ago)
- Branches:
- (u'spielwiese', 'b324714bf5073469800caef737deba1366fbd81f')
- Children:
- 2c7f28850c274452c6d4f324225864e2331412ed
- Parents:
- 7af488ec51790060979537b35a03fb345e053f90
- git-author:
- Hans Schoenemann <hannes@mathematik.uni-kl.de>2011-05-27 14:56:51+02:00
- git-committer:
- Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 12:39:06+01:00
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libpolys/coeffs/longrat.cc
r7af488e r9bb5457 151 151 assume( getCoeffType(dst) == ID ); 152 152 assume( getCoeffType(src) == n_Zp ); 153 153 154 154 number to; 155 155 to = nlInit(npInt(from,src), dst); … … 164 164 * convert from a GMP integer 165 165 */ 166 number nlMapGMP(number from, const coeffs src, const coeffs dst)166 number nlMapGMP(number from, const coeffs /*src*/, const coeffs /*dst*/) 167 167 { 168 168 number z=ALLOC_RNUMBER(); … … 180 180 * convert from an machine long 181 181 */ 182 number nlMapMachineInt(number from, const coeffs src, const coeffs dst)182 number nlMapMachineInt(number from, const coeffs /*src*/, const coeffs /*dst*/) 183 183 { 184 184 number z=ALLOC_RNUMBER(); … … 195 195 196 196 #ifdef LDEBUG 197 BOOLEAN nlDBTest(number a, const char *f,const int l, const coeffs r)197 BOOLEAN nlDBTest(number a, const char *f,const int l, const coeffs /*r*/) 198 198 { 199 199 if (a==NULL) … … 284 284 285 285 #ifdef HAVE_FACTORY 286 CanonicalForm nlConvSingNFactoryN( number n, BOOLEAN setChar, const coeffs r)286 CanonicalForm nlConvSingNFactoryN( number n, BOOLEAN setChar, const coeffs /*r*/ ) 287 287 { 288 288 if (setChar) setCharacteristic( 0 ); … … 345 345 assume( getCoeffType(dst) == ID ); 346 346 assume( getCoeffType(src) == n_R ); 347 347 348 348 double f=nrFloat(from); 349 349 if (f==0.0) return INT_TO_SR(0); … … 372 372 } 373 373 374 static number nlMapLongR(number from, const coeffs src, const coeffs dst) 374 static number nlMapLongR(number from, const coeffs src, const coeffs dst) 375 375 { 376 376 assume( getCoeffType(dst) == ID ); 377 377 assume( getCoeffType(src) == n_long_R ); 378 378 379 379 gmp_float *ff=(gmp_float*)from; 380 380 mpf_t *f=ff->_mpfp(); … … 522 522 return 1; /* immidiate int */ 523 523 int s=a->z[0]._mp_alloc; 524 // while ((s>0) &&(a->z._mp_d[s]==0L)) s--; 524 // while ((s>0) &&(a->z._mp_d[s]==0L)) s--; 525 525 //#if SIZEOF_LONG == 8 526 526 // if (a->z._mp_d[s] < (unsigned long)0x100000000L) s=s*2-1; … … 531 531 { 532 532 int d=a->n[0]._mp_alloc; 533 // while ((d>0) && (a->n._mp_d[d]==0L)) d--; 533 // while ((d>0) && (a->n._mp_d[d]==0L)) d--; 534 534 //#if SIZEOF_LONG == 8 535 535 // if (a->n._mp_d[d] < (unsigned long)0x100000000L) d=d*2-1; … … 1971 1971 assume( getCoeffType(dst) == ID ); 1972 1972 assume( getCoeffType(src) == ID ); 1973 1973 1974 1974 if ((SR_HDL(a) & SR_INT)||(a==NULL)) 1975 1975 { … … 1983 1983 assume( getCoeffType(dst) == ID ); 1984 1984 // assume( getCoeffType(src) == ID ); 1985 1985 1986 1986 if (nCoeff_is_Q(src)) 1987 1987 { … … 2364 2364 nlTest(u, R); 2365 2365 return u; 2366 2366 2367 2367 } 2368 2368 number u = _nlMult_aNoImm_OR_bNoImm(a, b); 2369 2369 nlTest(u, R); 2370 2370 return u; 2371 2371 2372 2372 } 2373 2373 … … 2391 2391 nlTest(u, r); 2392 2392 return u; 2393 2393 2394 2394 } 2395 2395 … … 2539 2539 } 2540 2540 2541 void nlCoeffWrite (const coeffs r)2541 void nlCoeffWrite (const coeffs) 2542 2542 { 2543 2543 PrintS("// characteristic : 0\n"); 2544 2544 } 2545 2545 2546 BOOLEAN nlInitChar(coeffs r, void* p)2546 BOOLEAN nlInitChar(coeffs r, void*) 2547 2547 { 2548 2548 assume( getCoeffType(r) == ID ); 2549 2549 //const int ch = (int)(long)(p); 2550 2550 2551 2551 r->cfKillChar=NULL; 2552 2552 r->cfSetChar=NULL; … … 2609 2609 r->has_simple_Alloc=FALSE; 2610 2610 r->has_simple_Inverse=FALSE; 2611 2611 2612 2612 // variables for this type of coeffs: 2613 2613 // (none)
Note: See TracChangeset
for help on using the changeset viewer.