Changeset 770afa in git for libpolys/polys


Ignore:
Timestamp:
Mar 21, 2016, 2:42:52 PM (8 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'spielwiese', '4a9821a93ffdc22a6696668bd4f6b8c9de3e6c5f')
Children:
a969ffb0c73d9dff19c4c9776cc48fe5405718a1
Parents:
b8541d73d1b778cb3f4aead1d2440d9912346f7d
Message:
p_Cleardenom for ring-cf
File:
1 edited

Legend:

Unmodified
Added
Removed
  • libpolys/polys/monomials/p_polys.cc

    rb8541d r770afa  
    27262726  if(pNext(p)==NULL)
    27272727  {
    2728     /*
    2729     if (TEST_OPT_CONTENTSB)
    2730     {
    2731       number n=n_GetDenom(pGetCoeff(p),r->cf);
    2732       if (!n_IsOne(n,r->cf))
    2733       {
    2734         number nn=n_Mult(pGetCoeff(p),n,r->cf);
    2735         n_Normalize(nn,r->cf);
    2736         p_SetCoeff(p,nn,r);
    2737       }
    2738       n_Delete(&n,r->cf);
    2739     }
    2740     else
    2741     */
     2728    if (!TEST_OPT_CONTENTSB
     2729    && !rField_is_Ring(r))
    27422730      p_SetCoeff(p,n_Init(1,r->cf),r);
    2743 
    2744     /*assume( n_GreaterZero(pGetCoeff(p),C) );
    2745     if(!n_GreaterZero(pGetCoeff(p),C)) p = p_Neg(p,r);
    2746     */
     2731    else if(!n_GreaterZero(pGetCoeff(p),C))
     2732      p = p_Neg(p,r);
    27472733    return p;
    27482734  }
Note: See TracChangeset for help on using the changeset viewer.