Changeset 6ccdd3a in git for libpolys/polys/OBSOLETE_pInitContent.cc
- Timestamp:
- May 26, 2011, 4:42:12 PM (12 years ago)
- 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
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libpolys/polys/OBSOLETE_pInitContent.cc
r5a4b26 r6ccdd3a 107 107 while (c_n!=NULL) 108 108 { // 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); 111 111 hzz=d; 112 112 pIter(c_n); … … 115 115 while (c_n!=NULL) 116 116 { // 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); 119 119 h=d; 120 120 pIter(c_n); … … 127 127 number hzztmp=nlInvers(hzz); 128 128 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); 134 134 h=nlMult(hh,hg); 135 nlDelete(&hg,r-> algring);136 nlDelete(&hh,r-> algring);135 nlDelete(&hg,r->extRing); 136 nlDelete(&hh,r->extRing); 137 137 nlNormalize(h); 138 138 if(!nlIsOne(h)) … … 147 147 d=nlMult(h,pGetCoeff(c_n)); 148 148 nlNormalize(d); 149 nlDelete(&pGetCoeff(c_n),r-> algring);149 nlDelete(&pGetCoeff(c_n),r->extRing); 150 150 pGetCoeff(c_n)=d; 151 151 pIter(c_n); … … 156 156 d=nlMult(h,pGetCoeff(c_n)); 157 157 nlNormalize(d); 158 nlDelete(&pGetCoeff(c_n),r-> algring);158 nlDelete(&pGetCoeff(c_n),r->extRing); 159 159 pGetCoeff(c_n)=d; 160 160 pIter(c_n); … … 163 163 } 164 164 } 165 nlDelete(&h,r-> algring);165 nlDelete(&h,r->extRing); 166 166 } 167 167 }
Note: See TracChangeset
for help on using the changeset viewer.