Changeset a33be22 in git
 Timestamp:
 Jul 2, 2014, 7:33:26 PM (9 years ago)
 Branches:
 (u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')
 Children:
 beb3d788c30165b40310896bd3e332af9e61358a
 Parents:
 bba099faee3e605cb869b7542d651f11d483edca02defa68b782a08ab330bc5f935a6bb79c6b7939
 Files:

 3 added
 2 edited
Legend:
 Unmodified
 Added
 Removed

Singular/LIB/primdecint.lib
rbba099 ra33be22 331 331 J=J,h; 332 332 //=== call primary decomposition over Z for <I,h> 333 ideal testid = 1; 334 for(i = 1; i<=size(pr); i++) 335 { 336 testid = intersect(testid, pr[i][1]); 337 } 333 338 list M; 334 339 if(h!=1) … … 341 346 j++; 342 347 M[j][1]=stdZ(M[j][1]); 348 testid = intersect(testid, M[j][1]); 349 if((reduce(testid, std(I))+0 == 0) && (reduce(I, std(testid))+0 == 0)) 350 { 351 for(i=1;i<=j;i++) 352 { 353 pr[size(pr)+1]=M[i]; 354 } 355 return(pr); 356 } 343 357 for(i=1;i<=size(pr);i++) 344 358 { … … 355 369 pr[size(pr)+1]=M[i]; 356 370 } 371 357 372 } 358 373 return(pr); 
Tst/New.lst
rbba099 ra33be22 52 52 New/qring_ZtoZm.tst 53 53 New/AnnExt_R_bug.tst 54 New/bug593_primdecZ.tst
Note: See TracChangeset
for help on using the changeset viewer.