source: git/Tst/Old/re.tst @ d26bff

fieker-DuValspielwiese
Last change on this file since d26bff was 46976a6, checked in by Olaf Bachmann <obachman@…>, 26 years ago
* added status check to regress.cmd * added tst_status(1); call to each tst file, just before quit git-svn-id: file:///usr/local/Singular/svn/trunk@2271 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 469 bytes
Line 
1//
2// test script for res command
3//
4pagelength = 10000;
5//option(prot);
6ring r1=32003,(a,b,x,y,z),ls;
7r1;
8"-------------------------";
9ideal i=a2x2+ax2y+x2yz,a2y2+ay2z+y2zb,a2z2+az2b+xz2b,a2b2+axb2+xyb2;
10i;
11ideal i1=std(i);
12i1;
13list T=nres(i1,4);
14def T(1..4)=T[1..4];
15"------------------------";
16module m=[x2y,0],[1,x2z3];
17m;
18module m1=std(m);
19m1;
20list M=res(m1,0);
21def M(1..5)=M[1..5];
22"-----------------------";
23listvar(all);
24kill r1;
25LIB "tst.lib";tst_status(1);$;
Note: See TracBrowser for help on using the repository browser.