Changeset 9bb5457 in git for libpolys/coeffs/rmodulon.cc
- Timestamp:
- May 27, 2011, 2:56:51 PM (12 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
- 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/rmodulon.cc
r7af488e r9bb5457 51 51 nrnInitExp((int)(long)(p), r); 52 52 r->ringtype = 2; 53 53 54 54 /* next computation may yield wrong characteristic as r->modNumber 55 55 is a GMP number */ … … 108 108 } 109 109 110 void nrnDelete(number *a, const coeffs r)110 void nrnDelete(number *a, const coeffs) 111 111 { 112 112 if (*a == NULL) return; … … 116 116 } 117 117 118 number nrnCopy(number a, const coeffs r)118 number nrnCopy(number a, const coeffs) 119 119 { 120 120 int_number erg = (int_number) omAllocBin(gmp_nrz_bin); … … 123 123 } 124 124 125 int nrnSize(number a, const coeffs r)125 int nrnSize(number a, const coeffs) 126 126 { 127 127 if (a == NULL) return 0; … … 132 132 * convert a number to int 133 133 */ 134 int nrnInt(number &n, const coeffs r)134 int nrnInt(number &n, const coeffs) 135 135 { 136 136 return (int)mpz_get_si((int_number) n); … … 179 179 if( !nrnIsZero(c, r) ) 180 180 // Attention: This method operates in-place. 181 mpz_sub((int_number)c, r->modNumber, (int_number)c); 181 mpz_sub((int_number)c, r->modNumber, (int_number)c); 182 182 return c; 183 183 } … … 253 253 } 254 254 255 BOOLEAN nrnIsZero(number a, const coeffs r)255 BOOLEAN nrnIsZero(number a, const coeffs) 256 256 { 257 257 #ifdef LDEBUG … … 261 261 } 262 262 263 BOOLEAN nrnIsOne(number a, const coeffs r)263 BOOLEAN nrnIsOne(number a, const coeffs) 264 264 { 265 265 #ifdef LDEBUG … … 281 281 } 282 282 283 BOOLEAN nrnEqual(number a, number b, const coeffs r)283 BOOLEAN nrnEqual(number a, number b, const coeffs) 284 284 { 285 285 return 0 == mpz_cmp((int_number)a, (int_number)b); 286 286 } 287 287 288 BOOLEAN nrnGreater(number a, number b, const coeffs r)288 BOOLEAN nrnGreater(number a, number b, const coeffs) 289 289 { 290 290 return 0 < mpz_cmp((int_number)a, (int_number)b); 291 291 } 292 292 293 BOOLEAN nrnGreaterZero(number k, const coeffs r)293 BOOLEAN nrnGreaterZero(number k, const coeffs) 294 294 { 295 295 return 0 < mpz_cmp_si((int_number)k, 0); … … 443 443 int_number nrnMapCoef = NULL; 444 444 445 number nrnMapModN(number from, const coeffs src, const coeffs dst)445 number nrnMapModN(number from, const coeffs /*src*/, const coeffs dst) 446 446 { 447 447 return nrnMult(from, (number) nrnMapCoef, dst); 448 448 } 449 449 450 number nrnMap2toM(number from, const coeffs src, const coeffs dst)450 number nrnMap2toM(number from, const coeffs /*src*/, const coeffs dst) 451 451 { 452 452 int_number erg = (int_number)omAllocBin(gmp_nrz_bin); … … 457 457 } 458 458 459 number nrnMapZp(number from, const coeffs src, const coeffs dst)459 number nrnMapZp(number from, const coeffs /*src*/, const coeffs dst) 460 460 { 461 461 int_number erg = (int_number)omAllocBin(gmp_nrz_bin); … … 467 467 } 468 468 469 number nrnMapGMP(number from, const coeffs src, const coeffs dst)469 number nrnMapGMP(number from, const coeffs /*src*/, const coeffs dst) 470 470 { 471 471 int_number erg = (int_number)omAllocBin(gmp_nrz_bin); … … 475 475 } 476 476 477 number nrnMapQ(number from, const coeffs src, const coeffs dst)477 number nrnMapQ(number from, const coeffs src, const coeffs /*dst*/) 478 478 { 479 479 int_number erg = (int_number)omAllocBin(gmp_nrz_bin); … … 590 590 591 591 #ifdef LDEBUG 592 BOOLEAN nrnDBTest (number a, const char * f, const int l, const coeffs r)592 BOOLEAN nrnDBTest (number a, const char *, const int, const coeffs r) 593 593 { 594 594 if (a==NULL) return TRUE;
Note: See TracChangeset
for help on using the changeset viewer.