Changeset fa509c4 in git
- Timestamp:
- Oct 28, 2014, 3:07:07 PM (9 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- a41e18c195fe14c1145fd5fabf3a13cd6f168eec
- Parents:
- 620dd263c13cadb3d0327fee5573926a9e65e918
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/algemodstd.lib
r620dd2 rfa509c4 99 99 return(1); 100 100 } 101 else101 else 102 102 { 103 103 nr = testfact(ur); … … 296 296 { 297 297 /* 298 * compute std for each factor and combine this result299 * to modulo minpoly via CRT for poly over char p>0300 */298 * compute std for each factor and combine this result 299 * to modulo minpoly via CRT for poly over char p>0 300 */ 301 301 int u,in,j; 302 302 list LL,Lk; … … 384 384 return(I); 385 385 } 386 else386 else 387 387 { 388 388 for(int i=1;i<=t;i++) … … 432 432 if(npars(Rbs)==0) 433 433 { 434 435 436 437 438 439 return(J);434 J=modStd(I,L);//if algebraic number is in Q 435 if(size(#)>0) 436 { 437 return(cleardenomIdeal(J)); 438 } 439 return(J); 440 440 } 441 441 list rl=ringlist(Rbs);
Note: See TracChangeset
for help on using the changeset viewer.