1NR < 50 { n = split($0, x)
2 for (i = 1; i <= n; i++)
3 for (j = 1; j <= n; j++)
4 y[i,j] = n * i + j
5 for (i = 1; i <= n; i++)
6 delete y[i,i]
7 k = 0
8 for (i in y)
9 k++
10 if (k != int(n^2-n))
11 printf "delete2 miscount %d vs %d at %d\n", k, n^2-n, NR
12}
13