source: git/Tst/Old/dimens.tst @ 882ae9c

spielwiese
Last change on this file since 882ae9c 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: 699 bytes
Line 
1//
2// test script for dim command
3//
4pagelength = 10000;
5ring r1 = 32003,(x,y,z),(dp,c);
6r1;
7"------------------------------";
8ideal i1=x2,xz,y4;
9i1;
10ideal i11=std(i1);
11dim(i11);
12"------------------------------";
13ideal i2=x6,y6x6,x6z6;
14i2;
15dim(i2);
16"-------------------------------";
17vector v1=[x6,y3,z6];
18poly s1=xyz2;
19module m1=v1,s1*v1;
20m1;
21module m11=std(m1);
22dim(m11);
23"------------------------------";
24vector v2=[s1,x3y4z5,x,y6z12];
25poly s2=12xyz;
26module m2=v1,v2,s2*v2;
27m2;
28dim(m2);
29"-------------------------------";
30ideal i3=0,0,0;
31i3;
32dim(i3);
33"---------------------------";
34ideal i4=1,1,1;
35i4;
36dim(i4);
37"--------------------------";
38listvar(all);
39kill r1;
40LIB "tst.lib";tst_status(1);$;
41
Note: See TracBrowser for help on using the repository browser.