fieker-DuValspielwiese
|
Last change
on this file since 1427f62 was
36d61f0,
checked in by Hans Schoenemann <hannes@…>, 8 years ago
|
|
fix: pLPshift/pmLPshift and tr. #767
|
-
Property mode set to
100644
|
|
File size:
249 bytes
|
| Line | |
|---|
| 1 | LIB "tst.lib"; |
|---|
| 2 | tst_init(); |
|---|
| 3 | |
|---|
| 4 | LIB"freegb.lib"; |
|---|
| 5 | ring r = integer,(x,y,z),dp; |
|---|
| 6 | int uptodeg = 5; int lV = 3; |
|---|
| 7 | def R = makeLetterplaceRing(uptodeg); |
|---|
| 8 | setring R; |
|---|
| 9 | poly f = x(1)*z(2)*y(3) - 2*z(1)*y(2) + 3*x(1); |
|---|
| 10 | shiftPoly(f,1); |
|---|
| 11 | shiftPoly(f,2); |
|---|
| 12 | |
|---|
| 13 | tst_status(1);$ |
|---|
Note: See
TracBrowser
for help on using the repository browser.
