source: git/Tst/Manual/double.tst @ 894057

spielwiese
Last change on this file since 894057 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: 199 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "hyperel.lib";
3ring R=7,x,dp;
4// hyperelliptic curve y^2 + h*y = f
5poly h=x;
6poly f=x5+5x4+6x2+x+3;
7// reduced divisor
8list D=x2-1,2x-1;
9double(D,h,f);
10tst_status(1);$
Note: See TracBrowser for help on using the repository browser.