Ignore:
Timestamp:
May 26, 2011, 4:42:12 PM (12 years ago)
Author:
Frank Seelisch <seelisch@…>
Branches:
(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
Children:
7af488ec51790060979537b35a03fb345e053f90
Parents:
5a4b26f3e00776270c3ba83b16c92a69f3cca0e0
git-author:
Frank Seelisch <seelisch@mathematik.uni-kl.de>2011-05-26 16:42:12+02:00
git-committer:
Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 12:39:06+01:00
Message:
renamed algring; comments; transext.* added
File:
1 edited

Legend:

Unmodified
Added
Removed
  • libpolys/polys/OBSOLETE_pInitContent.cc

    r5a4b26 r6ccdd3a  
    107107        while (c_n!=NULL)
    108108        { // each monom: coeff in Q
    109           d=nlLcm(hzz,pGetCoeff(c_n),r->algring);
    110           n_Delete(&hzz,r->algring);
     109          d=nlLcm(hzz,pGetCoeff(c_n),r->extRing);
     110          n_Delete(&hzz,r->extRing);
    111111          hzz=d;
    112112          pIter(c_n);
     
    115115        while (c_n!=NULL)
    116116        { // each monom: coeff in Q
    117           d=nlLcm(h,pGetCoeff(c_n),r->algring);
    118           n_Delete(&h,r->algring);
     117          d=nlLcm(h,pGetCoeff(c_n),r->extRing);
     118          n_Delete(&h,r->extRing);
    119119          h=d;
    120120          pIter(c_n);
     
    127127      number hzztmp=nlInvers(hzz);
    128128      number hh=nlMult(hzz,h);
    129       nlDelete(&hzz,r->algring);
    130       nlDelete(&h,r->algring);
    131       number hg=nlGcd(hzztmp,htmp,r->algring);
    132       nlDelete(&hzztmp,r->algring);
    133       nlDelete(&htmp,r->algring);
     129      nlDelete(&hzz,r->extRing);
     130      nlDelete(&h,r->extRing);
     131      number hg=nlGcd(hzztmp,htmp,r->extRing);
     132      nlDelete(&hzztmp,r->extRing);
     133      nlDelete(&htmp,r->extRing);
    134134      h=nlMult(hh,hg);
    135       nlDelete(&hg,r->algring);
    136       nlDelete(&hh,r->algring);
     135      nlDelete(&hg,r->extRing);
     136      nlDelete(&hh,r->extRing);
    137137      nlNormalize(h);
    138138      if(!nlIsOne(h))
     
    147147            d=nlMult(h,pGetCoeff(c_n));
    148148            nlNormalize(d);
    149             nlDelete(&pGetCoeff(c_n),r->algring);
     149            nlDelete(&pGetCoeff(c_n),r->extRing);
    150150            pGetCoeff(c_n)=d;
    151151            pIter(c_n);
     
    156156            d=nlMult(h,pGetCoeff(c_n));
    157157            nlNormalize(d);
    158             nlDelete(&pGetCoeff(c_n),r->algring);
     158            nlDelete(&pGetCoeff(c_n),r->extRing);
    159159            pGetCoeff(c_n)=d;
    160160            pIter(c_n);
     
    163163        }
    164164      }
    165       nlDelete(&h,r->algring);
     165      nlDelete(&h,r->extRing);
    166166    }
    167167  }
Note: See TracChangeset for help on using the changeset viewer.