|
|
1.1 root 1: every s1 := insert(set([]),!&lcase) ----> none
2: s2 := set(["a","aa","ab","b",1,2,3,4]) ----> set(8)
3: s3 := s1 ++ s2 ----> set(32)
4: s4 := s1 ** s2 ----> set(2)
5: s5 := s1 -- s2 ----> set(24)
6: *s3 ----> 32
7: n
8: 1
9: o
10: 2
11: p
12: 3
13: q
14: 4
15: r
16: s
17: t
18: u
19: v
20: w
21: x
22: y
23: aa
24: z
25: ab
26: a
27: b
28: c
29: d
30: e
31: f
32: g
33: h
34: i
35: j
36: k
37: l
38: m
39: every write(!s3) ----> none
40: *s4 ----> 2
41: a
42: b
43: every write(!s4) ----> none
44: *s5 ----> 24
45: n
46: o
47: p
48: q
49: r
50: s
51: t
52: u
53: v
54: w
55: x
56: y
57: z
58: c
59: d
60: e
61: f
62: g
63: h
64: i
65: j
66: k
67: l
68: m
69: every write(!s5) ----> none
70: Run-time error 119 at line 20 in set02.icn
71: set expected
72: offending value: 'a'
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.