source: git/Tst/Old/integers.tst @ 147191b

spielwiese
Last change on this file since 147191b was 147191b, checked in by Olaf Bachmann <obachman@…>, 26 years ago
* fixes in tst tests git-svn-id: file:///usr/local/Singular/svn/trunk@2329 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 4.2 KB
Line 
1int i; i;
2i = i + 8; i;
3int j = 9; j;
4j = -i -9; j;
5int k1 = 1,2;
6int l1 = 2147483647; l1; // max integer representation
7int k3 = k3+1; k3;       // k3 is initialize to 0 and then incremented;
8int ll = l1 + 1;ll;
9listvar(all);
10// --------- some help variables
11ring r;
12poly p = x23+y+z12;
13matrix m[2][3] = 1,2,3,4;
14ideal id = x,y,z;
15ideal sid = std(id);
16string st = "ab cde fghi";
17// ---------------- int operations
18"20 + 4 =", 20 + 4;
19"20 - 4 =", 20 - 4;
20"20 * 4 =", 20 * 4;
21"20 / 4 =", 20 / 4;
22"20 ^ 4 =", 20 ^ 4;
23"20 % 4 =", 20 % 4;
24"20 > 4 =", 20 > 4;
25"20 < 4 =", 20 < 4;
26"20 & 4 =", 20 & 4;
27"20 | 4 =", 20 | 4;
28"20 <> 4 =", 20 <> 4;
29"20 == 4 =", 20 == 4;
30"20 <= 4 =", 20 <= 4;
31"20 >= 4 =", 20 >= 4;
32"20 and 4 =", 20 and 4;
33"20 or 4 =", 20 or 4;
34"-(20 + 4) =", -(20 + 4);
35i;i++;
36"i++ = setting i!!!";
37i;i--;
38"i-- = setting i!!!";
39i;
40// ---------------- int commands
41i = char(r); "char r", i;
42i = ncols(m); "cols m 3", i;
43i = nrows(m); "rows m 2", i;
44i = vdim(sid); "vdim std(id)",i;
45i = dim(sid); "dim std(id)",i;
46i = mult(sid); "mult std(id)",i;
47i = size(id); "size id 3",i;
48i = size(p); "size p 3",i;
49i = size("aaaaaaaaaaaaaaaaaaa"); "size ...19", i;
50i = size(st); "size st 11", i;
51i = echo; "echo",i;
52i = pagelength; "pagelength",i;
53i = pagewidth; "pagewidth", i;
54i = timer; "timer";
55i = TRACE;"TRACE", i;
56i = voice;"voice 1", i;
57i = rvar(x); "is x a ringvar ",i;
58i = rvar(y); "is y a ringvar ",i;
59i = rvar(q); "is q a ringvar ",i;
60i = rvar(r); "is r a ringvar ",i;
61i = random(3,80);"this is random and should differ",i-i;
62i = defined(i);"is i defined ", i;
63i = ord(x);"ord x ", i;
64i = ord(p^5);"ord p^5 ", i;
65i = prime(28);"next prime <= 28 is ", i;
66
67"------------- errors ---------------";
68
69int i;
70int k =;
71int k = 1 2;
72int k = 1..2;
73int k = [1,2];
74int long1 = 12333333333333333333;
75int long2 = 2147483648;
76
77int ir1 = r;
78int ir2 = p;
79int ir3 = m;
80int ir4 = "aaaaaaaaaaa";
81listvar(all);
82// ---------------- wrong int commands
83i;
84i = char(id);
85i = ncols(p);
86i = nrows(p);
87i = vdim(m);
88i = dim(r);
89i = mult(p);
90i = size(r);
91i = random(3);
92i = random(3,55,555);
93i = defined();
94i = defined(r,m);
95i = defined(r,);
96i = defined(,r);
97i = ord();
98i = ord(r);
99i = ord(i);
100i = prime(28,5);
101prime(-28);
102prime();
103prime(1);
104prime(r);
105prime(2,r);
106" ---------------- wrong int operations";
10720 + ;
10820 - ;
10920 * ;
11020 / ;
11120 ^ ;
11220 % ;
11320 > ;
11420 < ;
11520 & ;
11620 | ;
11720 <> ;
11820 == ;
11920 <= ;
12020 >= ;
12120 and ;
12220 or ;
123-(20 + 4;
124// matrix operations -----------------------------------
12520 + m;
12620 - m;
12720 * m;
12820 / m;
12920 ^ m;
13020 % m;
13120 > m;
13220 < m;
13320 & m;
13420 | m;
13520 <> m;
13620 == m;
13720 <= m;
13820 >= m;
13920 and m;
14020 or m;
141-(20 + m);
142m + 20;
143m - 20;
144m * 20;
145m / 20;
146m ^ 20;
147m % 20;
148m > 20;
149m < 20;
150m & 20;
151m | 20;
152m <> 20;
153m == 20;
154m <= 20;
155m >= 20;
156m and 20;
157m or 20;
158-(m + 20);
159// string operations -----------------------------------
16020 + st;
16120 - st;
16220 * st;
16320 / st;
16420 ^ st;
16520 % st;
16620 > st;
16720 < st;
16820 & st;
16920 | st;
17020 <> st;
17120 == st;
17220 <= st;
17320 >= st;
17420 and st;
17520 or st;
176-(20 + st);
177st + 20;
178st - 20;
179st * 20;
180st / 20;
181st ^ 20;
182st % 20;
183st > 20;
184st < 20;
185st & 20;
186st | 20;
187st <> 20;
188st == 20;
189st <= 20;
190st >= 20;
191st and 20;
192st or 20;
193-(st + 20);
194// poly operations -----------------------------------
19520 + p;
19620 - p;
19720 * p;
198//20 / p;
19920 / x;
20020 ^ p;
20120 % p;
20220 > p;
20320 < p;
20420 & p;
20520 | p;
20620 <> p;
20720 == p;
20820 <= p;
20920 >= p;
21020 and p;
21120 or p;
212-(20 + p);
213p + 20;
214p - 20;
215p * 20;
216p / 20;
217p ^ 20;
218p % 20;
219p > 20;
220p < 20;
221p & 20;
222p | 20;
223p <> 20;
224p == 20;
225p <= 20;
226p >= 20;
227p and 20;
228p or 20;
229-(p + 20);
230// ring operations -----------------------------------
23120 + r;
23220 - r;
23320 * r;
23420 / r;
23520 ^ r;
23620 % r;
23720 > r;
23820 < r;
23920 & r;
24020 | r;
24120 <> r;
24220 == r;
24320 <= r;
24420 >= r;
24520 and r;
24620 or r;
247-(20 + r);
248r + 20;
249r - 20;
250r * 20;
251r / 20;
252r ^ 20;
253r % 20;
254r > 20;
255r < 20;
256r & 20;
257r | 20;
258r <> 20;
259r == 20;
260r <= 20;
261r >= 20;
262r and 20;
263r or 20;
264-(r + 20);
265// ideal operations -----------------------------------
26620 + id;
26720 - id;
26820 * id;
26920 / id;
27020 ^ id;
27120 % id;
27220 > id;
27320 < id;
27420 & id;
27520 | id;
27620 <> id;
27720 == id;
27820 <= id;
27920 >= id;
28020 and id;
28120 or id;
282-(20 + id);
283id + 20;
284id - 20;
285id * 20;
286id / 20;
287id ^ 20;
288id % 20;
289id > 20;
290id < 20;
291id & 20;
292id | 20;
293id <> 20;
294id == 20;
295id <= 20;
296id >= 20;
297id and 20;
298id or 20;
299-(id + 20);
300LIB "tst.lib";tst_status(1);$
Note: See TracBrowser for help on using the repository browser.