source: git/Tst/Old/part.tst @ 46976a6

spielwiese
Last change on this file since 46976a6 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: 926 bytes
Line 
1//
2// test script for diff command
3//
4pagelength = 10000;
5ring r1 = 32003,(x,y,z),(c,dp);
6r1;
7poly s1=3x2y4-5xyz3;
8s1;
9"==============================";
10diff(s1,x);
11diff(s1,y);
12diff(s1,z);
13"------------------------------";
14poly s2=5/3x4y2z6+1/5x2zy3-6xzy12;
15s2;
16"==============================";
17diff(s2,x);
18diff(s2,y);
19diff(s2,z);
20"--------------------------------";
21vector v1=[s1,x2+z4];
22v1;
23"=================================";
24diff(v1,x);
25diff(v1,y);
26diff(v1,z);
27"--------------------------------";
28vector v2=[s2,x2z2,s1,y2z];
29v2;
30"==================================";
31diff(v2,x);
32diff(v2,y);
33diff(v2,z);
34"---------------------------------";
35module m1=v1,v2;
36diff(m1,z);
37"--------------------------------";
38ideal i=s1,s2,s1+s2;
39diff(i,y);
40"------------------------------";
41matrix m[2][2]=x2,x+y3,0,12;
42diff(m,x);
43diff(m,y);
44diff(m,z);
45"-----------------------------";
46listvar(all);
47kill r1;
48LIB "tst.lib";tst_status(1);$;
Note: See TracBrowser for help on using the repository browser.