|
|
1.1 root 1: t := table() ----> table(0)
2: every t[1 | 2.0 | &output | &cset | [] | "hello" | main | 2 | table()] := ?100 ----> none
3: a := sort(t,3) ----> list(18)
4: 1 22
5: 2 74
6: 2.0 42
7: "hello" 31
8: &cset 52
9: &output 32
10: procedure main 8
11: list(0) 43
12: table(0) 6
13: every i := 1 to *a - 1 by 2 do write(image(a[i])," ",a[i + 1]) ----> none
14: a := sort(t,4) ----> list(18)
15: table(0) 6
16: procedure main 8
17: 1 22
18: "hello" 31
19: &output 32
20: 2.0 42
21: list(0) 43
22: &cset 52
23: 2 74
24: every i := 1 to *a - 1 by 2 do write(image(a[i])," ",a[i + 1]) ----> none
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.