// Test numeric representations print "Test print statement and integer conversions\n"; print "Hex: 0x173 = ", 0x173, "\n"; print "Octal: 0563 = ", 0563, "\n"; print "Decimal: 371 = ", 371, "\n"; print "\nTest real conversions\n"; print "173.563 = ", 173.563, "\n"; print "173.563e01 = ", 173.563e+01, "\n"; print "173.563e-01 = ", 173.563e-01, "\n"; // Test access to variables print "\nTesting access to variable values\n"; x = 173; dump x; print "y = x++; = ", y = x++, "\n"; dump x, y; print "y = x--; = ", y = x--, "\n"; dump x, y; print "y = ++x; = ", y = ++x, "\n"; dump x, y; print "y = --x; = ", y = --x, "\n"; dump x, y; print "\nTesting integer arithmetic\n"; x = 173; y = 24; dump x,y; print "x*y = ", x*y, "\n"; print "x/y = ", x/y, "\n"; print "x+y = ", x+y, "\n"; print "x-y = ", x-y, "\n"; print "-x-y = ", -x-y, "\n"; print "-x+y = ", -x+y, "\n"; dump x,y; print "(x *= y) = ", x *= y, "\n"; dump x,y; print "(x /= y) = ", x /= y, "\n"; dump x,y; print "(x += y) = ", x += y, "\n"; dump x,y; print "(x -= y) = ", x -= y, "\n"; dump x,y; print("\nTesting floating point arithmetic\n"); x = 173.4; y = 23.9; dump x,y; print "x*y = ", x*y, "\n"; print "x/y = ", x/y, "\n"; print "x+y = ", x+y, "\n"; print "x-y = ", x-y, "\n"; print "-x-y = ", -x-y, "\n"; print "-x+y = ", -x+y, "\n"; dump x,y; print "(x *= y) = ", x *= y, "\n"; dump x,y; print "(x /= y) = ", x /= y, "\n"; dump x,y; print "(x += y) = ", x += y, "\n"; dump x,y; print "(x -= y) = ", x -= y, "\n"; dump x,y; print "\nTesting exponentiation\n"; x = 2; y = 7; dump x, y; print "x**y = ", x**y, "\n"; print "-x**y = ", -x**y, "\n"; print "x**-y = ", x**-y, "\n"; x = 2.1; y = 6.8; dump x, y; print "x**y = ", x**y, "\n"; print "-x**y = ", -x**y, "\n"; print "x**-y = ", x**-y, "\n"; print "\nTesting shift operators\n"; x = 0x4562; dump x; print "x << 3 = ", x << 3, "\n"; print "x * 8 = ", x * 8, "\n"; print "x >> 3 = ", x >> 3, "\n"; print "x / 8 = ", x / 8, "\n"; dump x; print "x <<= 3 = ", x <<= 3, "\n"; dump x; print "x >> 3 = ", x >>= 3, "\n"; dump x; print"\nTesting bitwise logical operators\n"; x = 0x4401; y = 0x2605; dump x, y; print "x | y = ", x | y, "\n"; print "(x | y) ^ 26117 = ", (x | y) ^ 26117, "\n"; print "x & y = ", x & y, "\n"; print "x & y ^ 0x401 = ", x & y ^ 0x401, "\n"; print "(x & y) ^ 0x401 = ", (x & y) ^ 0x401, "\n"; dump x, y; print "(x |= y) = ", x |= y, "\n"; dump x, y; print "(x ^= 26117 = ", x ^= 26117, "\n"; dump x; x = 0x4401; y = 0x2605; dump x, y; print "(x &+ y) = ", x &= y, "\n"; dump x, y; print "(x ^= 0x401) = ", x ^= 0x401, "\n"; dump x;