source: git/Tst/Old/def.tst @ b35b93

spielwiese
Last change on this file since b35b93 was b35b93, checked in by Olaf Bachmann <obachman@…>, 26 years ago
This commit was generated by cvs2svn to compensate for changes in r1396, which included commits to RCS files with non-trunk default branches. git-svn-id: file:///usr/local/Singular/svn/trunk@1397 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 603 bytes
Line 
1//
2// test script for defined command
3//
4pagelength = 10000;
5ring r = 32003,(x,y,z),dp;
6r;
7matrix m1[3][3];
8int c1;
9poly s1=3xz+zy4;
10poly s2=5zx2;
11intvec iv1=12,2,4,0,1,0;
12ideal i1=s1,s2-s1,s2*s1;
13"defined(r)";
14defined(r);
15"-----------------------------";
16"defined(s6)";
17defined(s6);
18"-----------------------------";
19"defined(s1) and defined(i1)";
20defined(s1) and defined(i1);
21"-------------------------------";
22"defined(s2) and defined(s3)";
23defined(s2) and defined(s3);
24"-------------------------------";
25"defined(m1) or defined(m3)";
26defined(m1) or defined(m3);
27listvar(all);
28kill r;
29$;
30// fur proc?
Note: See TracBrowser for help on using the repository browser.