fieker-DuValspielwiese
Last change
on this file since 8d1432e was
75f460,
checked in by Hans Schoenemann <hannes@…>, 9 years ago
|
format
|
-
Property mode set to
100644
|
File size:
315 bytes
|
Line | |
---|
1 | LIB "tst.lib"; |
---|
2 | tst_init(); |
---|
3 | |
---|
4 | int n=2; |
---|
5 | int m=3; |
---|
6 | ring A1 = 0,(x(1..n),y(1..m)),(dp(n),ds(m)); |
---|
7 | poly f = x(1)*x(2)^2+1+y(1)^10+x(1)*y(2)^5+y(3); |
---|
8 | f; |
---|
9 | |
---|
10 | 1>y(1)^10; |
---|
11 | |
---|
12 | ring A2 = 0,(x(1..n),y(1..m)),(ds(n),dp(m)); |
---|
13 | fetch(A1,f); |
---|
14 | |
---|
15 | x(1)*y(2)^5<1; |
---|
16 | |
---|
17 | ring A3 = 0,(x(1..n),y(1..m)),(dp(n),ds(2),dp(m-2)); |
---|
18 | fetch(A1,f); |
---|
19 | |
---|
20 | tst_status(1);$ |
---|
Note: See
TracBrowser
for help on using the repository browser.