source: git/Tst/Manual/annfs2.tst @ 4efdd1c

spielwiese
Last change on this file since 4efdd1c 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: 218 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "dmod.lib";
3ring r = 0,(x,y,z),Dp;
4poly F = x^3+y^3+z^3;
5printlevel = 0;
6def A = SannfsBM(F);
7setring A;
8LD;
9poly F = imap(r,F);
10def B  = annfs2(LD,F);
11setring B;
12LD;
13BS;
14tst_status(1);$
Note: See TracBrowser for help on using the repository browser.