Changeset da5d77 in git for libpolys/polys/OBSOLETE_pInitContent.cc
- Timestamp:
- Mar 16, 2012, 9:31:18 PM (11 years ago)
- Branches:
- (u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
- Children:
- bbe9548df00466bc1a7e2d22f1e5662d1f4614fa
- Parents:
- 66b9679c3d696e061e7f06abdc3f5ddf7c9f2991
- git-author:
- Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-03-16 21:31:18+01:00
- git-committer:
- Oleksandr Motsak <motsak@mathematik.uni-kl.de>2012-03-17 18:45:31+01:00
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libpolys/polys/OBSOLETE_pInitContent.cc
r66b967 rda5d77 168 168 } 169 169 170 void pSimpleContent(poly ph,int smax) 170 void pSimpleContent(poly ph,int smax) // in currRing! 171 171 { 172 172 //if(TEST_OPT_CONTENTSB) return; … … 228 228 } 229 229 230 number pInitContent(poly ph) 230 number pInitContent(poly ph) // in currRing! 231 231 // only for coefficients in Q 232 232 #if 0 … … 313 313 #endif 314 314 315 number pInitContent_a(poly ph) 315 number pInitContent_a(poly ph) // in currRing! 316 316 // only for coefficients in K(a) anf K(a,...) 317 317 { 318 318 number d=pGetCoeff(ph); 319 int s=n aParDeg(d);320 if (s /* n aParDeg(d)*/ <=1) return naCopy(d);319 int s=n_ParDeg(d, currRing); 320 if (s /* n_ParDeg(d, currRing)*/ <=1) return naCopy(d); 321 321 int s2=-1; 322 322 number d2; … … 330 330 break; 331 331 } 332 if ((ss=n aParDeg(pGetCoeff(ph)))<s)332 if ((ss=n_ParDeg(pGetCoeff(ph), currRing))<s) 333 333 { 334 334 s2=s;
Note: See TracChangeset
for help on using the changeset viewer.