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