spielwiese
Last change
on this file since 1427f62 was
7c9d6f,
checked in by Hans Schoenemann <hannes@…>, 9 years ago
|
fix tr. #641 (slaplagne,pfister)
|
-
Property mode set to
100644
|
File size:
354 bytes
|
Line | |
---|
1 | LIB "tst.lib"; |
---|
2 | tst_init(); |
---|
3 | |
---|
4 | LIB "primdec.lib"; |
---|
5 | ring rng = 0,(x,y,z),dp; |
---|
6 | ideal I = 21*x^2*z+21*z^2,7*y^2-6*y,-5*x*y^2-29*y*z+30*z^2; |
---|
7 | def ma1 = minAssGTZ (I); |
---|
8 | def ma2 = minAssGTZ(I,"noFacstd"); //wrong? |
---|
9 | ma1; |
---|
10 | ma2; |
---|
11 | idealsEqual( intersect(ma1[1],ma1[2],ma1[3]), std(radical(I)) ); |
---|
12 | idealsEqual( intersect(ma2[1],ma2[2] ), std(radical(I)) ); |
---|
13 | |
---|
14 | tst_status(1);$ |
---|
Note: See
TracBrowser
for help on using the repository browser.