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