fieker-DuValspielwiese
Last change
on this file since f5d2647 was
fd6524,
checked in by Viktor Levandovskyy <levandov@…>, 11 years ago
|
*levandov: new version of tests by heinle for the new ncfactor lib
|
-
Property mode set to
100644
|
File size:
208 bytes
|
Rev | Line | |
---|
[42ea852] | 1 | LIB "tst.lib"; |
---|
| 2 | tst_init(); |
---|
| 3 | LIB "ncfactor.lib"; |
---|
| 4 | |
---|
| 5 | ring R = 0,(n,s),dp; |
---|
| 6 | def r = nc_algebra(1,s); |
---|
| 7 | setring(r); |
---|
| 8 | poly h = n*(n+1)*s^2-2*n*(n+100)*s+(n+99)*(n+100); |
---|
| 9 | facFirstShift(h); |
---|
| 10 | |
---|
| 11 | |
---|
| 12 | tst_status(); |
---|
| 13 | tst_status(1); $ |
---|
Note: See
TracBrowser
for help on using the repository browser.