source: git/Tst/Manual/BrillNoether.tst @ 36bbdc

spielwiese
Last change on this file since 36bbdc 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: 414 bytes
Line 
1LIB "tst.lib"; tst_init();
2LIB "brnoeth.lib";
3int plevel=printlevel;
4printlevel=-1;
5ring s=2,(x,y),lp;
6list C=Adj_div(x3y+y3+x);
7C=NSplaces(1..4,C);
8// the first 3 Places in C[3] are of degree 1.
9// we define the rational divisor G = 4*C[3][1]+4*C[3][3] (of degree 8):
10intvec G=4,0,4;
11def R=C[1][2];
12setring R;
13list LG=BrillNoether(G,C);
14// here is the vector basis of L(G):
15LG;
16printlevel=plevel;
17tst_status(1);$
Note: See TracBrowser for help on using the repository browser.