source: git/Tst/Manual/StabEqn.tst @ 0d6b7fc

spielwiese Release-4-3-2p2
Last change on this file since 0d6b7fc 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: 216 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "qhmoduli.lib";
3ring B = 0,(x,y,z), ls;
4poly f = -z5+y5+x2z+x2y;
5list stab = StabEqn(f);
6def S1 = stab[1]; setring S1;  stabid;
7def S2 = stab[2]; setring S2;  actionid;
8tst_status(1);$
Note: See TracBrowser for help on using the repository browser.