|
|
1.1 misha 1: @main[]
2: $h[^hash::create[]]
3: ^for[i](1;20){
4: $h.[$i][$.id[$i]]
5: }
6:
1.2 misha 7: ^print[$h]
1.1 misha 8:
9: <hr />
10:
11: $h2[^copy[$h]]
1.2 misha 12: ^print[$h2]
1.1 misha 13:
14: @copy[h][k;v]
15: $result[^hash::create[]]
16: ^h.foreach[k;]{
17: $result.[$k][$.id[$k]]
18: }
1.2 misha 19:
20: @print[h;field][t]
21: $t[^h._keys[]]
22: ^t.sort{$t.key}
23: ^t.menu{${t.key}=$h.[$t.key].id}[, ]