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