source:
git/Tst/Manual/facFirstShift.tst
@
ef52d6
| Last change on this file since ef52d6 was 894057, checked in by , 13 years ago | |
|---|---|
|
|
| File size: 161 bytes | |
| Line | |
|---|---|
| 1 | LIB "tst.lib"; tst_init(); |
| 2 | LIB "ncfactor.lib"; |
| 3 | ring R = 0,(x,s),dp; |
| 4 | def r = nc_algebra(1,s); |
| 5 | setring(r); |
| 6 | poly h = (s^2*x+x)*s; |
| 7 | facFirstShift(h); |
| 8 | tst_status(1);$ |
Note: See TracBrowser
for help on using the repository browser.
