| Georg Brandl | faa9ad2 | 2011-03-05 15:06:13 +0100 | [diff] [blame] | 1 | ------------------------------------------------------------------------ |
| 2 | -- ddInvert.decTest -- digitwise logical INVERT for decDoubles -- |
| 3 | -- Copyright (c) IBM Corporation, 1981, 2008. All rights reserved. -- |
| 4 | ------------------------------------------------------------------------ |
| 5 | -- Please see the document "General Decimal Arithmetic Testcases" -- |
| 6 | -- at http://www2.hursley.ibm.com/decimal for the description of -- |
| 7 | -- these testcases. -- |
| 8 | -- -- |
| 9 | -- These testcases are experimental ('beta' versions), and they -- |
| 10 | -- may contain errors. They are offered on an as-is basis. In -- |
| 11 | -- particular, achieving the same results as the tests here is not -- |
| 12 | -- a guarantee that an implementation complies with any Standard -- |
| 13 | -- or specification. The tests are not exhaustive. -- |
| 14 | -- -- |
| 15 | -- Please send comments, suggestions, and corrections to the author: -- |
| 16 | -- Mike Cowlishaw, IBM Fellow -- |
| 17 | -- IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK -- |
| 18 | -- mfc@uk.ibm.com -- |
| 19 | ------------------------------------------------------------------------ |
| 20 | version: 2.59 |
| 21 | |
| 22 | precision: 16 |
| 23 | maxExponent: 384 |
| 24 | minExponent: -383 |
| 25 | extended: 1 |
| 26 | clamp: 1 |
| 27 | rounding: half_even |
| 28 | |
| 29 | -- Sanity check (truth table) |
| 30 | ddinv001 invert 0 -> 1111111111111111 |
| 31 | ddinv002 invert 1 -> 1111111111111110 |
| 32 | ddinv003 invert 10 -> 1111111111111101 |
| 33 | ddinv004 invert 111111111 -> 1111111000000000 |
| 34 | ddinv005 invert 000000000 -> 1111111111111111 |
| 35 | -- and at msd and msd-1 |
| 36 | ddinv007 invert 0000000000000000 -> 1111111111111111 |
| 37 | ddinv008 invert 1000000000000000 -> 111111111111111 |
| 38 | ddinv009 invert 0000000000000000 -> 1111111111111111 |
| 39 | ddinv010 invert 0100000000000000 -> 1011111111111111 |
| 40 | ddinv011 invert 0111111111111111 -> 1000000000000000 |
| 41 | ddinv012 invert 1111111111111111 -> 0 |
| 42 | ddinv013 invert 0011111111111111 -> 1100000000000000 |
| 43 | ddinv014 invert 0111111111111111 -> 1000000000000000 |
| 44 | |
| 45 | -- Various lengths |
| 46 | -- 123456789 1234567890123456 |
| 47 | ddinv021 invert 111111111 -> 1111111000000000 |
| 48 | ddinv022 invert 111111111111 -> 1111000000000000 |
| 49 | ddinv023 invert 11111111 -> 1111111100000000 |
| 50 | ddinv025 invert 1111111 -> 1111111110000000 |
| 51 | ddinv026 invert 111111 -> 1111111111000000 |
| 52 | ddinv027 invert 11111 -> 1111111111100000 |
| 53 | ddinv028 invert 1111 -> 1111111111110000 |
| 54 | ddinv029 invert 111 -> 1111111111111000 |
| 55 | ddinv031 invert 11 -> 1111111111111100 |
| 56 | ddinv032 invert 1 -> 1111111111111110 |
| 57 | ddinv033 invert 111111111111 -> 1111000000000000 |
| 58 | ddinv034 invert 11111111111 -> 1111100000000000 |
| 59 | ddinv035 invert 1111111111 -> 1111110000000000 |
| 60 | ddinv036 invert 111111111 -> 1111111000000000 |
| 61 | |
| 62 | ddinv040 invert 011111111 -> 1111111100000000 |
| 63 | ddinv041 invert 101111111 -> 1111111010000000 |
| 64 | ddinv042 invert 110111111 -> 1111111001000000 |
| 65 | ddinv043 invert 111011111 -> 1111111000100000 |
| 66 | ddinv044 invert 111101111 -> 1111111000010000 |
| 67 | ddinv045 invert 111110111 -> 1111111000001000 |
| 68 | ddinv046 invert 111111011 -> 1111111000000100 |
| 69 | ddinv047 invert 111111101 -> 1111111000000010 |
| 70 | ddinv048 invert 111111110 -> 1111111000000001 |
| 71 | ddinv049 invert 011111011 -> 1111111100000100 |
| 72 | ddinv050 invert 101111101 -> 1111111010000010 |
| 73 | ddinv051 invert 110111110 -> 1111111001000001 |
| 74 | ddinv052 invert 111011101 -> 1111111000100010 |
| 75 | ddinv053 invert 111101011 -> 1111111000010100 |
| 76 | ddinv054 invert 111110111 -> 1111111000001000 |
| 77 | ddinv055 invert 111101011 -> 1111111000010100 |
| 78 | ddinv056 invert 111011101 -> 1111111000100010 |
| 79 | ddinv057 invert 110111110 -> 1111111001000001 |
| 80 | ddinv058 invert 101111101 -> 1111111010000010 |
| 81 | ddinv059 invert 011111011 -> 1111111100000100 |
| 82 | |
| 83 | ddinv080 invert 1000000011111111 -> 111111100000000 |
| 84 | ddinv081 invert 0100000101111111 -> 1011111010000000 |
| 85 | ddinv082 invert 0010000110111111 -> 1101111001000000 |
| 86 | ddinv083 invert 0001000111011111 -> 1110111000100000 |
| 87 | ddinv084 invert 0000100111101111 -> 1111011000010000 |
| 88 | ddinv085 invert 0000010111110111 -> 1111101000001000 |
| 89 | ddinv086 invert 0000001111111011 -> 1111110000000100 |
| 90 | ddinv087 invert 0000010111111101 -> 1111101000000010 |
| 91 | ddinv088 invert 0000100111111110 -> 1111011000000001 |
| 92 | ddinv089 invert 0001000011111011 -> 1110111100000100 |
| 93 | ddinv090 invert 0010000101111101 -> 1101111010000010 |
| 94 | ddinv091 invert 0100000110111110 -> 1011111001000001 |
| 95 | ddinv092 invert 1000000111011101 -> 111111000100010 |
| 96 | ddinv093 invert 0100000111101011 -> 1011111000010100 |
| 97 | ddinv094 invert 0010000111110111 -> 1101111000001000 |
| 98 | ddinv095 invert 0001000111101011 -> 1110111000010100 |
| 99 | ddinv096 invert 0000100111011101 -> 1111011000100010 |
| 100 | ddinv097 invert 0000010110111110 -> 1111101001000001 |
| 101 | ddinv098 invert 0000001101111101 -> 1111110010000010 |
| 102 | ddinv099 invert 0000010011111011 -> 1111101100000100 |
| 103 | |
| 104 | -- non-0/1 should not be accepted, nor should signs |
| 105 | ddinv220 invert 111111112 -> NaN Invalid_operation |
| 106 | ddinv221 invert 333333333 -> NaN Invalid_operation |
| 107 | ddinv222 invert 555555555 -> NaN Invalid_operation |
| 108 | ddinv223 invert 777777777 -> NaN Invalid_operation |
| 109 | ddinv224 invert 999999999 -> NaN Invalid_operation |
| 110 | ddinv225 invert 222222222 -> NaN Invalid_operation |
| 111 | ddinv226 invert 444444444 -> NaN Invalid_operation |
| 112 | ddinv227 invert 666666666 -> NaN Invalid_operation |
| 113 | ddinv228 invert 888888888 -> NaN Invalid_operation |
| 114 | ddinv229 invert 999999999 -> NaN Invalid_operation |
| 115 | ddinv230 invert 999999999 -> NaN Invalid_operation |
| 116 | ddinv231 invert 999999999 -> NaN Invalid_operation |
| 117 | ddinv232 invert 999999999 -> NaN Invalid_operation |
| 118 | -- a few randoms |
| 119 | ddinv240 invert 567468689 -> NaN Invalid_operation |
| 120 | ddinv241 invert 567367689 -> NaN Invalid_operation |
| 121 | ddinv242 invert -631917772 -> NaN Invalid_operation |
| 122 | ddinv243 invert -756253257 -> NaN Invalid_operation |
| 123 | ddinv244 invert 835590149 -> NaN Invalid_operation |
| 124 | -- test MSD |
| 125 | ddinv250 invert 2000000000000000 -> NaN Invalid_operation |
| 126 | ddinv251 invert 3000000000000000 -> NaN Invalid_operation |
| 127 | ddinv252 invert 4000000000000000 -> NaN Invalid_operation |
| 128 | ddinv253 invert 5000000000000000 -> NaN Invalid_operation |
| 129 | ddinv254 invert 6000000000000000 -> NaN Invalid_operation |
| 130 | ddinv255 invert 7000000000000000 -> NaN Invalid_operation |
| 131 | ddinv256 invert 8000000000000000 -> NaN Invalid_operation |
| 132 | ddinv257 invert 9000000000000000 -> NaN Invalid_operation |
| 133 | -- test MSD-1 |
| 134 | ddinv270 invert 0200001000000000 -> NaN Invalid_operation |
| 135 | ddinv271 invert 0300000100000000 -> NaN Invalid_operation |
| 136 | ddinv272 invert 0400000010000000 -> NaN Invalid_operation |
| 137 | ddinv273 invert 0500000001000000 -> NaN Invalid_operation |
| 138 | ddinv274 invert 1600000000100000 -> NaN Invalid_operation |
| 139 | ddinv275 invert 1700000000010000 -> NaN Invalid_operation |
| 140 | ddinv276 invert 1800000000001000 -> NaN Invalid_operation |
| 141 | ddinv277 invert 1900000000000100 -> NaN Invalid_operation |
| 142 | -- test LSD |
| 143 | ddinv280 invert 0010000000000002 -> NaN Invalid_operation |
| 144 | ddinv281 invert 0001000000000003 -> NaN Invalid_operation |
| 145 | ddinv282 invert 0000100000000004 -> NaN Invalid_operation |
| 146 | ddinv283 invert 0000010000000005 -> NaN Invalid_operation |
| 147 | ddinv284 invert 1000001000000006 -> NaN Invalid_operation |
| 148 | ddinv285 invert 1000000100000007 -> NaN Invalid_operation |
| 149 | ddinv286 invert 1000000010000008 -> NaN Invalid_operation |
| 150 | ddinv287 invert 1000000001000009 -> NaN Invalid_operation |
| 151 | -- test Middie |
| 152 | ddinv288 invert 0010000020000000 -> NaN Invalid_operation |
| 153 | ddinv289 invert 0001000030000001 -> NaN Invalid_operation |
| 154 | ddinv290 invert 0000100040000010 -> NaN Invalid_operation |
| 155 | ddinv291 invert 0000010050000100 -> NaN Invalid_operation |
| 156 | ddinv292 invert 1000001060001000 -> NaN Invalid_operation |
| 157 | ddinv293 invert 1000000170010000 -> NaN Invalid_operation |
| 158 | ddinv294 invert 1000000080100000 -> NaN Invalid_operation |
| 159 | ddinv295 invert 1000000091000000 -> NaN Invalid_operation |
| 160 | -- sign |
| 161 | ddinv296 invert -1000000001000000 -> NaN Invalid_operation |
| 162 | ddinv299 invert 1000000001000000 -> 111111110111111 |
| 163 | |
| 164 | |
| 165 | -- Nmax, Nmin, Ntiny-like |
| 166 | ddinv341 invert 9.99999999E+299 -> NaN Invalid_operation |
| 167 | ddinv342 invert 1E-299 -> NaN Invalid_operation |
| 168 | ddinv343 invert 1.00000000E-299 -> NaN Invalid_operation |
| 169 | ddinv344 invert 1E-207 -> NaN Invalid_operation |
| 170 | ddinv345 invert -1E-207 -> NaN Invalid_operation |
| 171 | ddinv346 invert -1.00000000E-299 -> NaN Invalid_operation |
| 172 | ddinv347 invert -1E-299 -> NaN Invalid_operation |
| 173 | ddinv348 invert -9.99999999E+299 -> NaN Invalid_operation |
| 174 | |
| 175 | -- A few other non-integers |
| 176 | ddinv361 invert 1.0 -> NaN Invalid_operation |
| 177 | ddinv362 invert 1E+1 -> NaN Invalid_operation |
| 178 | ddinv363 invert 0.0 -> NaN Invalid_operation |
| 179 | ddinv364 invert 0E+1 -> NaN Invalid_operation |
| 180 | ddinv365 invert 9.9 -> NaN Invalid_operation |
| 181 | ddinv366 invert 9E+1 -> NaN Invalid_operation |
| 182 | |
| 183 | -- All Specials are in error |
| 184 | ddinv788 invert -Inf -> NaN Invalid_operation |
| 185 | ddinv794 invert Inf -> NaN Invalid_operation |
| 186 | ddinv821 invert NaN -> NaN Invalid_operation |
| 187 | ddinv841 invert sNaN -> NaN Invalid_operation |
| 188 | -- propagating NaNs |
| 189 | ddinv861 invert NaN1 -> NaN Invalid_operation |
| 190 | ddinv862 invert +NaN2 -> NaN Invalid_operation |
| 191 | ddinv863 invert NaN3 -> NaN Invalid_operation |
| 192 | ddinv864 invert NaN4 -> NaN Invalid_operation |
| 193 | ddinv865 invert NaN5 -> NaN Invalid_operation |
| 194 | ddinv871 invert sNaN11 -> NaN Invalid_operation |
| 195 | ddinv872 invert sNaN12 -> NaN Invalid_operation |
| 196 | ddinv873 invert sNaN13 -> NaN Invalid_operation |
| 197 | ddinv874 invert sNaN14 -> NaN Invalid_operation |
| 198 | ddinv875 invert sNaN15 -> NaN Invalid_operation |
| 199 | ddinv876 invert NaN16 -> NaN Invalid_operation |
| 200 | ddinv881 invert +NaN25 -> NaN Invalid_operation |
| 201 | ddinv882 invert -NaN26 -> NaN Invalid_operation |
| 202 | ddinv883 invert -sNaN27 -> NaN Invalid_operation |