spielwiese
Last change
on this file since 0bc5ed4 was
8f38a2,
checked in by Hans Schönemann <hannes@…>, 15 years ago
|
*hannes: bug_tr164
git-svn-id: file:///usr/local/Singular/svn/trunk@12106 2c84dea3-7e68-4137-9b89-c4e89433aadc
|
-
Property mode set to
100644
|
File size:
671 bytes
|
Rev | Line | |
---|
[8f38a2] | 1 | LIB "tst.lib"; |
---|
| 2 | tst_init(); |
---|
| 3 | |
---|
| 4 | LIB "normal.lib"; |
---|
| 5 | ring r = 2, (v, u, z, y, x), dp; |
---|
| 6 | ideal I = z3+zyx+y3x2+y2x3, uyx+z2,uz+z+y2x+yx2, u2+u+zy+zx, v3+vux+vz2+vzyx+vzx |
---|
| 7 | +uz3+uz2y+z3+z2yx2; |
---|
| 8 | r; |
---|
| 9 | I; |
---|
| 10 | list L = normalC(I, "isPrim"); |
---|
| 11 | L; |
---|
| 12 | kill r; |
---|
| 13 | //---------------------------------------------- |
---|
| 14 | ring r = 2, (v, u, z, y, x), dp; |
---|
| 15 | ideal I = z3+zyx+y3x2+y2x3, uyx+z2,uz+z+y2x+yx2, u2+u+zy+zx, v3+vux+vz2+vzyx+vzx |
---|
| 16 | +uz3+uz2y+z3+z2yx2; |
---|
| 17 | r; |
---|
| 18 | I; |
---|
| 19 | list L = normal(I, "useRing", "isPrim"); |
---|
| 20 | L; |
---|
| 21 | kill r; |
---|
| 22 | //--------------------------------------------- |
---|
| 23 | ring r=2,(v,u,z,y,x),dp; |
---|
| 24 | ideal i = z3+zyx+y3x2+y2x3, uyx+z2,uz+z+y2x+yx2, u2+u+zy+zx, |
---|
| 25 | v3+vux+vz2+vzyx+vzx+uz3+uz2y+z3+z2yx2; |
---|
| 26 | equidim(i); |
---|
| 27 | |
---|
| 28 | tst_status(1);$ |
---|
Note: See
TracBrowser
for help on using the repository browser.