Changeset 560a3d in git for libpolys/coeffs
 Timestamp:
 Aug 9, 2012, 8:18:56 PM (11 years ago)
 Branches:
 (u'jengelhdatetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
 Children:
 824c47a7ef5b40564c34a1392fd8a3a44558959b
 Parents:
 26261f3e3a71ec10b43bb39f396cf86e27ac06f8
 gitauthor:
 Oleksandr Motsak <motsak@mathematik.unikl.de>20120809 20:18:56+02:00
 gitcommitter:
 Oleksandr Motsak <motsak@mathematik.unikl.de>20120809 20:20:00+02:00
 Location:
 libpolys/coeffs
 Files:

 2 edited
Legend:
 Unmodified
 Added
 Removed

libpolys/coeffs/longrat.cc
r26261f r560a3d 2691 2691 2692 2692 // part 1, collect product of all denominators /gcds 2693 number cand ,cand1;2693 number cand; 2694 2694 cand=ALLOC_RNUMBER(); 2695 2695 #if defined(LDEBUG) … … 2704 2704 do 2705 2705 { 2706 number& cand1 = numberCollectionEnumerator.Current(); 2707 nlNormalize(cand1, cf); 2708 2706 2709 if (!(SR_HDL(cand1)&SR_INT)) 2707 2710 { 2708 nlNormalize(numberCollectionEnumerator.Current(),cf);2709 cand1= numberCollectionEnumerator.Current();2710 2711 if ((!(SR_HDL(cand1)&SR_INT)) // not a short int 2711 2712 && (cand1>s==1)) // and is rational … … 2739 2740 2740 2741 // part2: all coeffs = all coeffs * cand 2741 c =cand;2742 c = cand; 2742 2743 numberCollectionEnumerator.Reset(); 2743 2744 do 2744 2745 { 2745 number t=nlMult(numberCollectionEnumerator.Current(),cand,cf); 2746 nlDelete(&numberCollectionEnumerator.Current(),cf); 2747 nlNormalize(t,cf); 2748 numberCollectionEnumerator.Current()=t; 2746 number &n = numberCollectionEnumerator.Current(); 2747 n_InpMult(n, cand, cf); 2749 2748 } while (numberCollectionEnumerator.MoveNext() ); 2750 2749 
libpolys/coeffs/numbers.cc
r26261f r560a3d 187 187 { 188 188 assume( r != NULL ); 189 assume( !(nCoeff_is_Q(r)  nCoeff_is_transExt(r) ) );190 assume( nCoeff_is_Ring(r)  nCoeff_is_Zp(r)  nCoeff_is_numeric(r)  nCoeff_is_GF(r)  (getCoeffType(r)==n_algExt));189 assume( !(nCoeff_is_Q(r)  nCoeff_is_transExt(r)  nCoeff_is_algExt(r)) ); 190 assume( nCoeff_is_Ring(r)  nCoeff_is_Zp(r)  nCoeff_is_numeric(r)  nCoeff_is_GF(r) ); 191 191 192 192 d = n_Init(1, r);
Note: See TracChangeset
for help on using the changeset viewer.