proc
main() {
var
a = [[1,2,3],[4,5,6]];
forall
(a[i,j]) {
"a["
,i,
","
,j,
"] = "
, a[i,j],
"\n"
; } }