@main[]
$h[^hash::create[]]
^for[i](1;20){
$h.[$i][$.id[$i]]
}
^print[$h]
$h2[^copy[$h]]
^print[$h2]
@copy[h][k;v]
$result[^hash::create[]]
^h.foreach[k;]{
$result.[$k][$.id[$k]]
}
@print[h;field][t]
$t[^h._keys[]]
^t.sort{$t.key}
^t.menu{${t.key}=$h.[$t.key].id}[, ]