spielwiese
|
Last change
on this file was
d4a6939,
checked in by Hans Schoenemann <hannes@…>, 5 months ago
|
|
prepare for Singular 4.4.0
|
-
Property mode set to
100644
|
|
File size:
300 bytes
|
| Line | |
|---|
| 1 | LIB "tst.lib"; tst_init(); |
|---|
| 2 | LIB "pointid.lib"; |
|---|
| 3 | ring R = 0,x(1..3),ip; |
|---|
| 4 | poly n1 = 1; |
|---|
| 5 | poly n2 = x(1); |
|---|
| 6 | poly n3 = x(2); |
|---|
| 7 | poly n4 = x(1)^2; |
|---|
| 8 | poly n5 = x(3); |
|---|
| 9 | poly n6 = x(1)^3; |
|---|
| 10 | poly n7 = x(2)*x(3); |
|---|
| 11 | poly n8 = x(3)^2; |
|---|
| 12 | poly n9 = x(1)*x(2); |
|---|
| 13 | ideal N = n1,n2,n3,n4,n5,n6,n7,n8,n9; |
|---|
| 14 | cornerMonomials(N); |
|---|
| 15 | tst_status(1);$ |
|---|
Note: See
TracBrowser
for help on using the repository browser.
