Changeset fdda308 in git


Ignore:
Timestamp:
Aug 6, 2014, 6:07:32 PM (10 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '60097d763e0b541617a3b864b5310c523edaf81d')
Children:
c311064c2b37f0ffc421b75995c94179b5b9a0ea
Parents:
3fff1f5061af4657adabc775899c591c7c39b23bf5bce2e759c27d4d638afa665b55e0b57ab09b37
Message:
Merge pull request #634 from YueRen/gcd_fixes

fix: gcd over integers of two terms ignoring coefficients
File:
1 edited

Legend:

Unmodified
Added
Removed
  • libpolys/polys/clapsing.cc

    r3fff1f5 rfdda308  
    6262    for(int i=rVar(r);i>0;i--)
    6363      p_SetExp(p,i,si_min(p_GetExp(f,i,r),p_GetExp(g,i,r)),r);
     64    if (rField_is_Ring(r))
     65    {
     66      number c = p_GetCoeff(f,r);
     67      number d = p_GetCoeff(g,r);
     68      p_SetCoeff(p,n_Gcd(c,d,r->cf),r);
     69    }
    6470    p_Setm(p,r);
    6571    return p;
     
    8894    for(int i=rVar(r);i>0;i--)
    8995      p_SetExp(p,i,p_GetExp(g,i,r),r);
     96    if (rField_is_Ring(r))
     97    {
     98      number c = p_GetCoeff(f,r);
     99      number d = p_GetCoeff(g,r);
     100      p_SetCoeff(p,n_Gcd(c,d,r->cf),r);
     101    }
    90102    while(h!=NULL)
    91103    {
Note: See TracChangeset for help on using the changeset viewer.