1NF > 0 {
2	t = $0
3	gsub(/[ \t]+/, "", t)
4	n = split($0, y)
5	if (n > 0) {
6		i = 1
7		s = ""
8		do {
9			s = s $i
10		} while (i++ < NF)
11	}
12	if (s != t)
13		print "bad at", NR
14}
15