source: git/Tst/Manual/annfsParamBM.tst @ ef52d6

spielwiese
Last change on this file since ef52d6 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: 304 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "dmod.lib";
3ring r = (0,a,b),(x,y),Dp;
4poly F = x^2 - (y-a)*(y-b);
5printlevel = 0;
6def A = annfsParamBM(F);  setring A;
7LD;
8Param;
9setring r;
10poly G = x2-(y-a)^2; // try the exceptional value b=a of parameters
11def B = annfsParamBM(G); setring B;
12LD;
13Param;
14tst_status(1);$
Note: See TracBrowser for help on using the repository browser.