+++ /dev/null
-------------------------------------------------------------------------\r
--- invert.decTest -- digitwise logical INVERT --\r
--- Copyright (c) IBM Corporation, 1981, 2008. All rights reserved. --\r
-------------------------------------------------------------------------\r
--- Please see the document "General Decimal Arithmetic Testcases" --\r
--- at http://www2.hursley.ibm.com/decimal for the description of --\r
--- these testcases. --\r
--- --\r
--- These testcases are experimental ('beta' versions), and they --\r
--- may contain errors. They are offered on an as-is basis. In --\r
--- particular, achieving the same results as the tests here is not --\r
--- a guarantee that an implementation complies with any Standard --\r
--- or specification. The tests are not exhaustive. --\r
--- --\r
--- Please send comments, suggestions, and corrections to the author: --\r
--- Mike Cowlishaw, IBM Fellow --\r
--- IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK --\r
--- mfc@uk.ibm.com --\r
-------------------------------------------------------------------------\r
-version: 2.59\r
-\r
-extended: 1\r
-precision: 9\r
-rounding: half_up\r
-maxExponent: 999\r
-minExponent: -999\r
-\r
--- Sanity check (truth table), and examples from decArith\r
-invx001 invert 0 -> 111111111\r
-invx002 invert 1 -> 111111110\r
-invx003 invert 10 -> 111111101\r
-invx004 invert 111111111 -> 0\r
-invx005 invert 000000000 -> 111111111\r
-invx006 invert 101010101 -> '10101010'\r
--- and at msd and msd-1\r
-invx007 invert 000000000 -> 111111111\r
-invx009 invert 100000000 -> 11111111\r
-invx011 invert 000000000 -> 111111111\r
-invx013 invert 010000000 -> 101111111\r
-\r
--- Various lengths\r
--- 123456789 123456789\r
-invx021 invert 111111111 -> 0\r
-invx022 invert 111111111111 -> 0\r
-invx023 invert 11111111 -> 100000000\r
-invx025 invert 1111111 -> 110000000\r
-invx026 invert 111111 -> 111000000\r
-invx027 invert 11111 -> 111100000\r
-invx028 invert 1111 -> 111110000\r
-invx029 invert 111 -> 111111000\r
-invx031 invert 11 -> 111111100\r
-invx032 invert 1 -> 111111110\r
-invx033 invert 111111111111 -> 0\r
-invx034 invert 11111111111 -> 0\r
-invx035 invert 1111111111 -> 0\r
-invx036 invert 111111111 -> 0\r
-\r
-invx080 invert 011111111 -> 100000000\r
-invx081 invert 101111111 -> 10000000\r
-invx082 invert 110111111 -> 1000000\r
-invx083 invert 111011111 -> 100000\r
-invx084 invert 111101111 -> 10000\r
-invx085 invert 111110111 -> 1000\r
-invx086 invert 111111011 -> 100\r
-invx087 invert 111111101 -> 10\r
-invx088 invert 111111110 -> 1\r
-invx089 invert 011111011 -> 100000100\r
-invx090 invert 101111101 -> 10000010\r
-invx091 invert 110111110 -> 1000001\r
-invx092 invert 111011101 -> 100010\r
-invx093 invert 111101011 -> 10100\r
-invx094 invert 111110111 -> 1000\r
-invx095 invert 111101011 -> 10100\r
-invx096 invert 111011101 -> 100010\r
-invx097 invert 110111110 -> 1000001\r
-invx098 invert 101111101 -> 10000010\r
-invx099 invert 011111011 -> 100000100\r
-\r
--- non-0/1 should not be accepted, nor should signs\r
-invx220 invert 111111112 -> NaN Invalid_operation\r
-invx221 invert 333333333 -> NaN Invalid_operation\r
-invx222 invert 555555555 -> NaN Invalid_operation\r
-invx223 invert 777777777 -> NaN Invalid_operation\r
-invx224 invert 999999999 -> NaN Invalid_operation\r
-invx225 invert 222222222 -> NaN Invalid_operation\r
-invx226 invert 444444444 -> NaN Invalid_operation\r
-invx227 invert 666666666 -> NaN Invalid_operation\r
-invx228 invert 888888888 -> NaN Invalid_operation\r
-invx229 invert 999999999 -> NaN Invalid_operation\r
-invx230 invert 999999999 -> NaN Invalid_operation\r
-invx231 invert 999999999 -> NaN Invalid_operation\r
-invx232 invert 999999999 -> NaN Invalid_operation\r
--- a few randoms\r
-invx240 invert 567468689 -> NaN Invalid_operation\r
-invx241 invert 567367689 -> NaN Invalid_operation\r
-invx242 invert -631917772 -> NaN Invalid_operation\r
-invx243 invert -756253257 -> NaN Invalid_operation\r
-invx244 invert 835590149 -> NaN Invalid_operation\r
--- test MSD\r
-invx250 invert 200000000 -> NaN Invalid_operation\r
-invx251 invert 300000000 -> NaN Invalid_operation\r
-invx252 invert 400000000 -> NaN Invalid_operation\r
-invx253 invert 500000000 -> NaN Invalid_operation\r
-invx254 invert 600000000 -> NaN Invalid_operation\r
-invx255 invert 700000000 -> NaN Invalid_operation\r
-invx256 invert 800000000 -> NaN Invalid_operation\r
-invx257 invert 900000000 -> NaN Invalid_operation\r
--- test MSD-1\r
-invx270 invert 021000000 -> NaN Invalid_operation\r
-invx271 invert 030100000 -> NaN Invalid_operation\r
-invx272 invert 040010000 -> NaN Invalid_operation\r
-invx273 invert 050001000 -> NaN Invalid_operation\r
-invx274 invert 160000100 -> NaN Invalid_operation\r
-invx275 invert 170000010 -> NaN Invalid_operation\r
-invx276 invert 180000000 -> NaN Invalid_operation\r
-invx277 invert 190000000 -> NaN Invalid_operation\r
--- test LSD\r
-invx280 invert 000000002 -> NaN Invalid_operation\r
-invx281 invert 000000003 -> NaN Invalid_operation\r
-invx282 invert 000000004 -> NaN Invalid_operation\r
-invx283 invert 000000005 -> NaN Invalid_operation\r
-invx284 invert 101000006 -> NaN Invalid_operation\r
-invx285 invert 100100007 -> NaN Invalid_operation\r
-invx286 invert 100010008 -> NaN Invalid_operation\r
-invx287 invert 100001009 -> NaN Invalid_operation\r
--- test Middie\r
-invx288 invert 000020000 -> NaN Invalid_operation\r
-invx289 invert 000030001 -> NaN Invalid_operation\r
-invx290 invert 000040000 -> NaN Invalid_operation\r
-invx291 invert 000050000 -> NaN Invalid_operation\r
-invx292 invert 101060000 -> NaN Invalid_operation\r
-invx293 invert 100170010 -> NaN Invalid_operation\r
-invx294 invert 100080100 -> NaN Invalid_operation\r
-invx295 invert 100091000 -> NaN Invalid_operation\r
--- signs\r
-invx296 invert -100001000 -> NaN Invalid_operation\r
-invx299 invert 100001000 -> 11110111\r
-\r
--- Nmax, Nmin, Ntiny\r
-invx341 invert 9.99999999E+999 -> NaN Invalid_operation\r
-invx342 invert 1E-999 -> NaN Invalid_operation\r
-invx343 invert 1.00000000E-999 -> NaN Invalid_operation\r
-invx344 invert 1E-1007 -> NaN Invalid_operation\r
-invx345 invert -1E-1007 -> NaN Invalid_operation\r
-invx346 invert -1.00000000E-999 -> NaN Invalid_operation\r
-invx347 invert -1E-999 -> NaN Invalid_operation\r
-invx348 invert -9.99999999E+999 -> NaN Invalid_operation\r
-\r
--- A few other non-integers\r
-invx361 invert 1.0 -> NaN Invalid_operation\r
-invx362 invert 1E+1 -> NaN Invalid_operation\r
-invx363 invert 0.0 -> NaN Invalid_operation\r
-invx364 invert 0E+1 -> NaN Invalid_operation\r
-invx365 invert 9.9 -> NaN Invalid_operation\r
-invx366 invert 9E+1 -> NaN Invalid_operation\r
-\r
--- All Specials are in error\r
-invx788 invert -Inf -> NaN Invalid_operation\r
-invx794 invert Inf -> NaN Invalid_operation\r
-invx821 invert NaN -> NaN Invalid_operation\r
-invx841 invert sNaN -> NaN Invalid_operation\r
--- propagating NaNs\r
-invx861 invert NaN1 -> NaN Invalid_operation\r
-invx862 invert +NaN2 -> NaN Invalid_operation\r
-invx863 invert NaN3 -> NaN Invalid_operation\r
-invx864 invert NaN4 -> NaN Invalid_operation\r
-invx865 invert NaN5 -> NaN Invalid_operation\r
-invx871 invert sNaN11 -> NaN Invalid_operation\r
-invx872 invert sNaN12 -> NaN Invalid_operation\r
-invx873 invert sNaN13 -> NaN Invalid_operation\r
-invx874 invert sNaN14 -> NaN Invalid_operation\r
-invx875 invert sNaN15 -> NaN Invalid_operation\r
-invx876 invert NaN16 -> NaN Invalid_operation\r
-invx881 invert +NaN25 -> NaN Invalid_operation\r
-invx882 invert -NaN26 -> NaN Invalid_operation\r
-invx883 invert -sNaN27 -> NaN Invalid_operation\r