source: git/Tst/Manual/InvariantRing.tst @ 6fb723

spielwiese
Last change on this file since 6fb723 was 894057, checked in by Oleksandr Motsak <motsak@…>, 13 years ago
ADD: Tests from online manual (res+stat on mamawutz): short ones Tst/Manual/s.lst
  • Property mode set to 100644
File size: 226 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "rinvar.lib";
3ring B = 0, (s(1..2), t(1..2)), dp;
4ideal G = -s(1)+s(2)^3, s(1)^4-1;
5ideal action = s(1)*t(1), s(2)*t(2);
6def R = InvariantRing(std(G), action);
7setring R;
8invars;
9tst_status(1);$
Note: See TracBrowser for help on using the repository browser.