source: git/Tst/Old/part.tst @ e706ff

spielwiese
Last change on this file since e706ff was 37cd955, checked in by Hans Schoenemann <hannes@…>, 14 years ago
pagelength removed git-svn-id: file:///usr/local/Singular/svn/trunk@13172 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 906 bytes
Line 
1//
2// test script for diff command
3//
4ring r1 = 32003,(x,y,z),(c,dp);
5r1;
6poly s1=3x2y4-5xyz3;
7s1;
8"==============================";
9diff(s1,x);
10diff(s1,y);
11diff(s1,z);
12"------------------------------";
13poly s2=5/3x4y2z6+1/5x2zy3-6xzy12;
14s2;
15"==============================";
16diff(s2,x);
17diff(s2,y);
18diff(s2,z);
19"--------------------------------";
20vector v1=[s1,x2+z4];
21v1;
22"=================================";
23diff(v1,x);
24diff(v1,y);
25diff(v1,z);
26"--------------------------------";
27vector v2=[s2,x2z2,s1,y2z];
28v2;
29"==================================";
30diff(v2,x);
31diff(v2,y);
32diff(v2,z);
33"---------------------------------";
34module m1=v1,v2;
35diff(m1,z);
36"--------------------------------";
37ideal i=s1,s2,s1+s2;
38diff(i,y);
39"------------------------------";
40matrix m[2][2]=x2,x+y3,0,12;
41diff(m,x);
42diff(m,y);
43diff(m,z);
44"-----------------------------";
45listvar(all);
46kill r1;
47LIB "tst.lib";tst_status(1);$;
Note: See TracBrowser for help on using the repository browser.