fieker-DuValspielwiese
Last change
on this file since 62c2b0 was
3d3d16,
checked in by Olaf Bachmann <obachman@…>, 23 years ago
|
* added Gerhar's test files
git-svn-id: file:///usr/local/Singular/svn/trunk@4762 2c84dea3-7e68-4137-9b89-c4e89433aadc
|
-
Property mode set to
100644
|
File size:
334 bytes
|
Rev | Line | |
---|
[3d3d16] | 1 | LIB "tst.lib"; |
---|
| 2 | tst_init(); |
---|
| 3 | option(prot); |
---|
| 4 | |
---|
| 5 | ring r = 32003,(x(1..7)),ds; |
---|
| 6 | ideal i = |
---|
| 7 | -2*x(4)*x(5)-2*x(3)*x(6)^2-2*x(2)*x(7)-1*x(1)^3, |
---|
| 8 | -2*x(1)*x(2)-2*x(4)*x(6)^2-2*x(3)*x(7)-1*x(2)^3, |
---|
| 9 | -2*x(1)*x(3)-2*x(5)*x(6)^2-2*x(4)*x(7)-1*x(3)^3, |
---|
| 10 | -2*x(2)*x(3)-2*x(1)*x(4)-2*x(5)*x(7)-1*x(4)^3, |
---|
| 11 | -2*x(2)*x(5)-2*x(1)^2; |
---|
| 12 | ideal j=std( i); |
---|
| 13 | |
---|
| 14 | tst_status(1);$ |
---|
| 15 | |
---|
| 16 | |
---|
Note: See
TracBrowser
for help on using the repository browser.