Changeset 6664a66 in git
- Timestamp:
- Jan 23, 2017, 6:00:20 PM (7 years ago)
- Branches:
- (u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')
- Children:
- 9ccaaf932b4894e5b87bdbc89ad0e50527144dac
- Parents:
- 7aa46ca800cba3fb13682d6ce35874fd1e955754
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libpolys/coeffs/longrat.cc
r7aa46c r6664a66 210 210 #endif 211 211 mpz_init_set(z->z,(mpz_ptr) from); 212 //mpz_init_set_ui(&z->n,1);213 212 z->s = 3; 214 213 z=nlShort3(z); … … 674 673 if (((long)a)>0L) 675 674 { 676 mpz_init_set_ si(n->z,1L);675 mpz_init_set_ui(n->z,1L); 677 676 mpz_init_set_si(n->n,(long)SR_TO_INT(a)); 678 677 } … … 719 718 else 720 719 { 721 mpz_init_set_ si(n->z,1L);720 mpz_init_set_ui(n->z,1L); 722 721 } 723 722 break; … … 1418 1417 { 1419 1418 mpz_t bt; 1420 mpz_init _set(bt,b->n);1421 mpz_divexact(bt,b t,gcd);1419 mpz_init(bt); 1420 mpz_divexact(bt,b->n,gcd); 1422 1421 if (SR_HDL(a) & SR_INT) 1423 1422 mpz_mul_si(result->z,bt,SR_TO_INT(a)); … … 1582 1581 return FALSE; 1583 1582 mpz_t bb; 1584 mpz_init _set(bb,b->n);1585 mpz_mul_si(bb,b b,(long)SR_TO_INT(a));1583 mpz_init(bb); 1584 mpz_mul_si(bb,b->n,(long)SR_TO_INT(a)); 1586 1585 bo=(mpz_cmp(bb,b->z)==0); 1587 1586 mpz_clear(bb); … … 2760 2759 if (SR_TO_INT(b)<0) 2761 2760 { 2762 mpz_ mul_si(qq, qq, -1);2761 mpz_neg(qq, qq); 2763 2762 } 2764 2763 return nlInitMPZ(qq,R);
Note: See TracChangeset
for help on using the changeset viewer.