Changeset 14a0ca in git for libpolys/polys/ext_fields/transext.cc
- Timestamp:
- Aug 23, 2013, 12:08:32 PM (10 years ago)
- Branches:
- (u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
- Children:
- 737bbc28cadf54fd1dd228d3450a0b5231b137eb
- Parents:
- 0635d513a4904575a4a7bacb750e17cd54a02089
- git-author:
- Martin Lee <martinlee84@web.de>2013-08-23 12:08:32+02:00
- git-committer:
- Martin Lee <martinlee84@web.de>2013-08-23 13:38:30+02:00
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
libpolys/polys/ext_fields/transext.cc
r0635d51 r14a0ca 1156 1156 1157 1157 if (IS0(a)) return; 1158 if (NUM(f)!=NULL) p_Normalize(NUM(f), ntRing); 1159 if (DEN(f)!=NULL) p_Normalize(DEN(f), ntRing); 1158 1160 if (!simpleTestsHaveAlreadyBeenPerformed) 1159 1161 { 1160 p_Normalize(NUM(f), ntRing);1161 if (DEN(f)!=NULL) p_Normalize(DEN(f), ntRing);1162 //p_Normalize(NUM(f), ntRing); 1163 //if (DEN(f)!=NULL) p_Normalize(DEN(f), ntRing); 1162 1164 if (DENIS1(f) || NUMIS1(f)) { COM(f) = 0; return; } 1163 1165 … … 1172 1174 } 1173 1175 } 1174 if (rField_is_Q(ntRing))1176 /*if (rField_is_Q(ntRing)) 1175 1177 { 1176 1178 number c=n_Copy(pGetCoeff(NUM(f)),ntCoeffs); … … 1224 1226 } 1225 1227 } 1226 } 1228 }*/ 1227 1229 1228 1230 #ifdef HAVE_FACTORY … … 1231 1233 pGcd = singclap_gcd_r(NUM(f), DEN(f), ntRing); 1232 1234 if (p_IsConstant(pGcd, ntRing) 1233 //&& n_IsOne(p_GetCoeff(pGcd, ntRing), ntCoeffs)1235 && n_IsOne(p_GetCoeff(pGcd, ntRing), ntCoeffs) 1234 1236 ) 1235 1237 { /* gcd = 1; nothing to cancel;
Note: See TracChangeset
for help on using the changeset viewer.