source: git/Tst/Manual/annfspecial.tst @ c2f6bd

spielwiese
Last change on this file since c2f6bd 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: 394 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "dmod.lib";
3ring r = 0,(x,y),dp;
4poly F = x3-y2;
5def  B = annfs(F);  setring B;
6minIntRoot(BS[1],0);
7// So, the minimal integer root is -1
8setring r;
9def  A = SannfsBM(F);
10setring A;
11poly F = x3-y2;
12annfspecial(LD,F,-1,3/4); // generic root
13annfspecial(LD,F,-1,-2);  // integer but still generic root
14annfspecial(LD,F,-1,1);   // exceptional root
15tst_status(1);$
Note: See TracBrowser for help on using the repository browser.