1145132Sanholt{ n = $1 2145132Sanholt n += $1 3145132Sanholt if (n != $1 + $1) print NR, "urk +=" 4145132Sanholt n = $1 5145132Sanholt n -= $1 6145132Sanholt if (n != 0) print NR, "urk -=" 7145132Sanholt n = $1 8145132Sanholt n *= 3.5 9145132Sanholt if (n != 3.5 * $1) print NR, "urk *=" 10145132Sanholt n = $1 11145132Sanholt n /= 4 12145132Sanholt if (n != $1 / 4) print NR, "urk /=" 13145132Sanholt n = NR 14145132Sanholt n ^= 2 15145132Sanholt if (n != NR * NR) print NR, "urk1 ^=", n, NR * NR 16145132Sanholt n = NR 17145132Sanholt n **= 2 18145132Sanholt if (n != NR * NR) print NR, "urk1 **=", n, NR * NR 19145132Sanholt n = NR 20145132Sanholt n ^= 1.5 21145132Sanholt ns = sprintf("%.10g", n) 22145132Sanholt sq = sprintf("%.10g", NR * sqrt(NR)) 23145132Sanholt if (ns != sq) print NR, "urk2 ^=", ns, sq 24145132Sanholt} 25145132Sanholt