1 ------------------------------------------------------------------------ 2 -- dqShift.decTest -- shift decQuad coefficient left or right -- 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 (a] uk.ibm.com -- 19 ------------------------------------------------------------------------ 20 version: 2.59 21 22 extended: 1 23 clamp: 1 24 precision: 34 25 maxExponent: 6144 26 minExponent: -6143 27 rounding: half_even 28 29 -- Sanity check 30 dqshi001 shift 0 0 -> 0 31 dqshi002 shift 0 2 -> 0 32 dqshi003 shift 1 2 -> 100 33 dqshi004 shift 1 33 -> 1000000000000000000000000000000000 34 dqshi005 shift 1 34 -> 0 35 dqshi006 shift 1 -1 -> 0 36 dqshi007 shift 0 -2 -> 0 37 dqshi008 shift 1234567890123456789012345678901234 -1 -> 123456789012345678901234567890123 38 dqshi009 shift 1234567890123456789012345678901234 -33 -> 1 39 dqshi010 shift 1234567890123456789012345678901234 -34 -> 0 40 dqshi011 shift 9934567890123456789012345678901234 -33 -> 9 41 dqshi012 shift 9934567890123456789012345678901234 -34 -> 0 42 43 -- rhs must be an integer 44 dqshi015 shift 1 1.5 -> NaN Invalid_operation 45 dqshi016 shift 1 1.0 -> NaN Invalid_operation 46 dqshi017 shift 1 0.1 -> NaN Invalid_operation 47 dqshi018 shift 1 0.0 -> NaN Invalid_operation 48 dqshi019 shift 1 1E+1 -> NaN Invalid_operation 49 dqshi020 shift 1 1E+99 -> NaN Invalid_operation 50 dqshi021 shift 1 Inf -> NaN Invalid_operation 51 dqshi022 shift 1 -Inf -> NaN Invalid_operation 52 -- and |rhs| <= precision 53 dqshi025 shift 1 -1000 -> NaN Invalid_operation 54 dqshi026 shift 1 -35 -> NaN Invalid_operation 55 dqshi027 shift 1 35 -> NaN Invalid_operation 56 dqshi028 shift 1 1000 -> NaN Invalid_operation 57 58 -- full shifting pattern 59 dqshi030 shift 1234567890123456789012345678901234 -34 -> 0 60 dqshi031 shift 1234567890123456789012345678901234 -33 -> 1 61 dqshi032 shift 1234567890123456789012345678901234 -32 -> 12 62 dqshi033 shift 1234567890123456789012345678901234 -31 -> 123 63 dqshi034 shift 1234567890123456789012345678901234 -30 -> 1234 64 dqshi035 shift 1234567890123456789012345678901234 -29 -> 12345 65 dqshi036 shift 1234567890123456789012345678901234 -28 -> 123456 66 dqshi037 shift 1234567890123456789012345678901234 -27 -> 1234567 67 dqshi038 shift 1234567890123456789012345678901234 -26 -> 12345678 68 dqshi039 shift 1234567890123456789012345678901234 -25 -> 123456789 69 dqshi040 shift 1234567890123456789012345678901234 -24 -> 1234567890 70 dqshi041 shift 1234567890123456789012345678901234 -23 -> 12345678901 71 dqshi042 shift 1234567890123456789012345678901234 -22 -> 123456789012 72 dqshi043 shift 1234567890123456789012345678901234 -21 -> 1234567890123 73 dqshi044 shift 1234567890123456789012345678901234 -20 -> 12345678901234 74 dqshi045 shift 1234567890123456789012345678901234 -19 -> 123456789012345 75 dqshi047 shift 1234567890123456789012345678901234 -18 -> 1234567890123456 76 dqshi048 shift 1234567890123456789012345678901234 -17 -> 12345678901234567 77 dqshi049 shift 1234567890123456789012345678901234 -16 -> 123456789012345678 78 dqshi050 shift 1234567890123456789012345678901234 -15 -> 1234567890123456789 79 dqshi051 shift 1234567890123456789012345678901234 -14 -> 12345678901234567890 80 dqshi052 shift 1234567890123456789012345678901234 -13 -> 123456789012345678901 81 dqshi053 shift 1234567890123456789012345678901234 -12 -> 1234567890123456789012 82 dqshi054 shift 1234567890123456789012345678901234 -11 -> 12345678901234567890123 83 dqshi055 shift 1234567890123456789012345678901234 -10 -> 123456789012345678901234 84 dqshi056 shift 1234567890123456789012345678901234 -9 -> 1234567890123456789012345 85 dqshi057 shift 1234567890123456789012345678901234 -8 -> 12345678901234567890123456 86 dqshi058 shift 1234567890123456789012345678901234 -7 -> 123456789012345678901234567 87 dqshi059 shift 1234567890123456789012345678901234 -6 -> 1234567890123456789012345678 88 dqshi060 shift 1234567890123456789012345678901234 -5 -> 12345678901234567890123456789 89 dqshi061 shift 1234567890123456789012345678901234 -4 -> 123456789012345678901234567890 90 dqshi062 shift 1234567890123456789012345678901234 -3 -> 1234567890123456789012345678901 91 dqshi063 shift 1234567890123456789012345678901234 -2 -> 12345678901234567890123456789012 92 dqshi064 shift 1234567890123456789012345678901234 -1 -> 123456789012345678901234567890123 93 dqshi065 shift 1234567890123456789012345678901234 -0 -> 1234567890123456789012345678901234 94 95 dqshi066 shift 1234567890123456789012345678901234 +0 -> 1234567890123456789012345678901234 96 dqshi067 shift 1234567890123456789012345678901234 +1 -> 2345678901234567890123456789012340 97 dqshi068 shift 1234567890123456789012345678901234 +2 -> 3456789012345678901234567890123400 98 dqshi069 shift 1234567890123456789012345678901234 +3 -> 4567890123456789012345678901234000 99 dqshi070 shift 1234567890123456789012345678901234 +4 -> 5678901234567890123456789012340000 100 dqshi071 shift 1234567890123456789012345678901234 +5 -> 6789012345678901234567890123400000 101 dqshi072 shift 1234567890123456789012345678901234 +6 -> 7890123456789012345678901234000000 102 dqshi073 shift 1234567890123456789012345678901234 +7 -> 8901234567890123456789012340000000 103 dqshi074 shift 1234567890123456789012345678901234 +8 -> 9012345678901234567890123400000000 104 dqshi075 shift 1234567890123456789012345678901234 +9 -> 123456789012345678901234000000000 105 dqshi076 shift 1234567890123456789012345678901234 +10 -> 1234567890123456789012340000000000 106 dqshi077 shift 1234567890123456789012345678901234 +11 -> 2345678901234567890123400000000000 107 dqshi078 shift 1234567890123456789012345678901234 +12 -> 3456789012345678901234000000000000 108 dqshi079 shift 1234567890123456789012345678901234 +13 -> 4567890123456789012340000000000000 109 dqshi080 shift 1234567890123456789012345678901234 +14 -> 5678901234567890123400000000000000 110 dqshi081 shift 1234567890123456789012345678901234 +15 -> 6789012345678901234000000000000000 111 dqshi082 shift 1234567890123456789012345678901234 +16 -> 7890123456789012340000000000000000 112 dqshi083 shift 1234567890123456789012345678901234 +17 -> 8901234567890123400000000000000000 113 dqshi084 shift 1234567890123456789012345678901234 +18 -> 9012345678901234000000000000000000 114 dqshi085 shift 1234567890123456789012345678901234 +19 -> 123456789012340000000000000000000 115 dqshi086 shift 1234567890123456789012345678901234 +20 -> 1234567890123400000000000000000000 116 dqshi087 shift 1234567890123456789012345678901234 +21 -> 2345678901234000000000000000000000 117 dqshi088 shift 1234567890123456789012345678901234 +22 -> 3456789012340000000000000000000000 118 dqshi089 shift 1234567890123456789012345678901234 +23 -> 4567890123400000000000000000000000 119 dqshi090 shift 1234567890123456789012345678901234 +24 -> 5678901234000000000000000000000000 120 dqshi091 shift 1234567890123456789012345678901234 +25 -> 6789012340000000000000000000000000 121 dqshi092 shift 1234567890123456789012345678901234 +26 -> 7890123400000000000000000000000000 122 dqshi093 shift 1234567890123456789012345678901234 +27 -> 8901234000000000000000000000000000 123 dqshi094 shift 1234567890123456789012345678901234 +28 -> 9012340000000000000000000000000000 124 dqshi095 shift 1234567890123456789012345678901234 +29 -> 123400000000000000000000000000000 125 dqshi096 shift 1234567890123456789012345678901234 +30 -> 1234000000000000000000000000000000 126 dqshi097 shift 1234567890123456789012345678901234 +31 -> 2340000000000000000000000000000000 127 dqshi098 shift 1234567890123456789012345678901234 +32 -> 3400000000000000000000000000000000 128 dqshi099 shift 1234567890123456789012345678901234 +33 -> 4000000000000000000000000000000000 129 dqshi100 shift 1234567890123456789012345678901234 +34 -> 0 130 131 -- zeros 132 dqshi270 shift 0E-10 +29 -> 0E-10 133 dqshi271 shift 0E-10 -29 -> 0E-10 134 dqshi272 shift 0.000 +29 -> 0.000 135 dqshi273 shift 0.000 -29 -> 0.000 136 dqshi274 shift 0E+10 +29 -> 0E+10 137 dqshi275 shift 0E+10 -29 -> 0E+10 138 dqshi276 shift -0E-10 +29 -> -0E-10 139 dqshi277 shift -0E-10 -29 -> -0E-10 140 dqshi278 shift -0.000 +29 -> -0.000 141 dqshi279 shift -0.000 -29 -> -0.000 142 dqshi280 shift -0E+10 +29 -> -0E+10 143 dqshi281 shift -0E+10 -29 -> -0E+10 144 145 -- Nmax, Nmin, Ntiny 146 dqshi141 shift 9.999999999999999999999999999999999E+6144 -1 -> 9.99999999999999999999999999999999E+6143 147 dqshi142 shift 9.999999999999999999999999999999999E+6144 -33 -> 9E+6111 148 dqshi143 shift 9.999999999999999999999999999999999E+6144 1 -> 9.999999999999999999999999999999990E+6144 149 dqshi144 shift 9.999999999999999999999999999999999E+6144 33 -> 9.000000000000000000000000000000000E+6144 150 dqshi145 shift 1E-6143 -1 -> 0E-6143 151 dqshi146 shift 1E-6143 -33 -> 0E-6143 152 dqshi147 shift 1E-6143 1 -> 1.0E-6142 153 dqshi148 shift 1E-6143 33 -> 1.000000000000000000000000000000000E-6110 154 dqshi151 shift 1.000000000000000000000000000000000E-6143 -1 -> 1.00000000000000000000000000000000E-6144 155 dqshi152 shift 1.000000000000000000000000000000000E-6143 -33 -> 1E-6176 156 dqshi153 shift 1.000000000000000000000000000000000E-6143 1 -> 0E-6176 157 dqshi154 shift 1.000000000000000000000000000000000E-6143 33 -> 0E-6176 158 dqshi155 shift 9.000000000000000000000000000000000E-6143 -1 -> 9.00000000000000000000000000000000E-6144 159 dqshi156 shift 9.000000000000000000000000000000000E-6143 -33 -> 9E-6176 160 dqshi157 shift 9.000000000000000000000000000000000E-6143 1 -> 0E-6176 161 dqshi158 shift 9.000000000000000000000000000000000E-6143 33 -> 0E-6176 162 dqshi160 shift 1E-6176 -1 -> 0E-6176 163 dqshi161 shift 1E-6176 -33 -> 0E-6176 164 dqshi162 shift 1E-6176 1 -> 1.0E-6175 165 dqshi163 shift 1E-6176 33 -> 1.000000000000000000000000000000000E-6143 166 -- negatives 167 dqshi171 shift -9.999999999999999999999999999999999E+6144 -1 -> -9.99999999999999999999999999999999E+6143 168 dqshi172 shift -9.999999999999999999999999999999999E+6144 -33 -> -9E+6111 169 dqshi173 shift -9.999999999999999999999999999999999E+6144 1 -> -9.999999999999999999999999999999990E+6144 170 dqshi174 shift -9.999999999999999999999999999999999E+6144 33 -> -9.000000000000000000000000000000000E+6144 171 dqshi175 shift -1E-6143 -1 -> -0E-6143 172 dqshi176 shift -1E-6143 -33 -> -0E-6143 173 dqshi177 shift -1E-6143 1 -> -1.0E-6142 174 dqshi178 shift -1E-6143 33 -> -1.000000000000000000000000000000000E-6110 175 dqshi181 shift -1.000000000000000000000000000000000E-6143 -1 -> -1.00000000000000000000000000000000E-6144 176 dqshi182 shift -1.000000000000000000000000000000000E-6143 -33 -> -1E-6176 177 dqshi183 shift -1.000000000000000000000000000000000E-6143 1 -> -0E-6176 178 dqshi184 shift -1.000000000000000000000000000000000E-6143 33 -> -0E-6176 179 dqshi185 shift -9.000000000000000000000000000000000E-6143 -1 -> -9.00000000000000000000000000000000E-6144 180 dqshi186 shift -9.000000000000000000000000000000000E-6143 -33 -> -9E-6176 181 dqshi187 shift -9.000000000000000000000000000000000E-6143 1 -> -0E-6176 182 dqshi188 shift -9.000000000000000000000000000000000E-6143 33 -> -0E-6176 183 dqshi190 shift -1E-6176 -1 -> -0E-6176 184 dqshi191 shift -1E-6176 -33 -> -0E-6176 185 dqshi192 shift -1E-6176 1 -> -1.0E-6175 186 dqshi193 shift -1E-6176 33 -> -1.000000000000000000000000000000000E-6143 187 188 -- more negatives (of sanities) 189 dqshi201 shift -0 0 -> -0 190 dqshi202 shift -0 2 -> -0 191 dqshi203 shift -1 2 -> -100 192 dqshi204 shift -1 33 -> -1000000000000000000000000000000000 193 dqshi205 shift -1 34 -> -0 194 dqshi206 shift -1 -1 -> -0 195 dqshi207 shift -0 -2 -> -0 196 dqshi208 shift -1234567890123456789012345678901234 -1 -> -123456789012345678901234567890123 197 dqshi209 shift -1234567890123456789012345678901234 -33 -> -1 198 dqshi210 shift -1234567890123456789012345678901234 -34 -> -0 199 dqshi211 shift -9934567890123456789012345678901234 -33 -> -9 200 dqshi212 shift -9934567890123456789012345678901234 -34 -> -0 201 202 203 -- Specials; NaNs are handled as usual 204 dqshi781 shift -Inf -8 -> -Infinity 205 dqshi782 shift -Inf -1 -> -Infinity 206 dqshi783 shift -Inf -0 -> -Infinity 207 dqshi784 shift -Inf 0 -> -Infinity 208 dqshi785 shift -Inf 1 -> -Infinity 209 dqshi786 shift -Inf 8 -> -Infinity 210 dqshi787 shift -1000 -Inf -> NaN Invalid_operation 211 dqshi788 shift -Inf -Inf -> NaN Invalid_operation 212 dqshi789 shift -1 -Inf -> NaN Invalid_operation 213 dqshi790 shift -0 -Inf -> NaN Invalid_operation 214 dqshi791 shift 0 -Inf -> NaN Invalid_operation 215 dqshi792 shift 1 -Inf -> NaN Invalid_operation 216 dqshi793 shift 1000 -Inf -> NaN Invalid_operation 217 dqshi794 shift Inf -Inf -> NaN Invalid_operation 218 219 dqshi800 shift Inf -Inf -> NaN Invalid_operation 220 dqshi801 shift Inf -8 -> Infinity 221 dqshi802 shift Inf -1 -> Infinity 222 dqshi803 shift Inf -0 -> Infinity 223 dqshi804 shift Inf 0 -> Infinity 224 dqshi805 shift Inf 1 -> Infinity 225 dqshi806 shift Inf 8 -> Infinity 226 dqshi807 shift Inf Inf -> NaN Invalid_operation 227 dqshi808 shift -1000 Inf -> NaN Invalid_operation 228 dqshi809 shift -Inf Inf -> NaN Invalid_operation 229 dqshi810 shift -1 Inf -> NaN Invalid_operation 230 dqshi811 shift -0 Inf -> NaN Invalid_operation 231 dqshi812 shift 0 Inf -> NaN Invalid_operation 232 dqshi813 shift 1 Inf -> NaN Invalid_operation 233 dqshi814 shift 1000 Inf -> NaN Invalid_operation 234 dqshi815 shift Inf Inf -> NaN Invalid_operation 235 236 dqshi821 shift NaN -Inf -> NaN 237 dqshi822 shift NaN -1000 -> NaN 238 dqshi823 shift NaN -1 -> NaN 239 dqshi824 shift NaN -0 -> NaN 240 dqshi825 shift NaN 0 -> NaN 241 dqshi826 shift NaN 1 -> NaN 242 dqshi827 shift NaN 1000 -> NaN 243 dqshi828 shift NaN Inf -> NaN 244 dqshi829 shift NaN NaN -> NaN 245 dqshi830 shift -Inf NaN -> NaN 246 dqshi831 shift -1000 NaN -> NaN 247 dqshi832 shift -1 NaN -> NaN 248 dqshi833 shift -0 NaN -> NaN 249 dqshi834 shift 0 NaN -> NaN 250 dqshi835 shift 1 NaN -> NaN 251 dqshi836 shift 1000 NaN -> NaN 252 dqshi837 shift Inf NaN -> NaN 253 254 dqshi841 shift sNaN -Inf -> NaN Invalid_operation 255 dqshi842 shift sNaN -1000 -> NaN Invalid_operation 256 dqshi843 shift sNaN -1 -> NaN Invalid_operation 257 dqshi844 shift sNaN -0 -> NaN Invalid_operation 258 dqshi845 shift sNaN 0 -> NaN Invalid_operation 259 dqshi846 shift sNaN 1 -> NaN Invalid_operation 260 dqshi847 shift sNaN 1000 -> NaN Invalid_operation 261 dqshi848 shift sNaN NaN -> NaN Invalid_operation 262 dqshi849 shift sNaN sNaN -> NaN Invalid_operation 263 dqshi850 shift NaN sNaN -> NaN Invalid_operation 264 dqshi851 shift -Inf sNaN -> NaN Invalid_operation 265 dqshi852 shift -1000 sNaN -> NaN Invalid_operation 266 dqshi853 shift -1 sNaN -> NaN Invalid_operation 267 dqshi854 shift -0 sNaN -> NaN Invalid_operation 268 dqshi855 shift 0 sNaN -> NaN Invalid_operation 269 dqshi856 shift 1 sNaN -> NaN Invalid_operation 270 dqshi857 shift 1000 sNaN -> NaN Invalid_operation 271 dqshi858 shift Inf sNaN -> NaN Invalid_operation 272 dqshi859 shift NaN sNaN -> NaN Invalid_operation 273 274 -- propagating NaNs 275 dqshi861 shift NaN1 -Inf -> NaN1 276 dqshi862 shift +NaN2 -1000 -> NaN2 277 dqshi863 shift NaN3 1000 -> NaN3 278 dqshi864 shift NaN4 Inf -> NaN4 279 dqshi865 shift NaN5 +NaN6 -> NaN5 280 dqshi866 shift -Inf NaN7 -> NaN7 281 dqshi867 shift -1000 NaN8 -> NaN8 282 dqshi868 shift 1000 NaN9 -> NaN9 283 dqshi869 shift Inf +NaN10 -> NaN10 284 dqshi871 shift sNaN11 -Inf -> NaN11 Invalid_operation 285 dqshi872 shift sNaN12 -1000 -> NaN12 Invalid_operation 286 dqshi873 shift sNaN13 1000 -> NaN13 Invalid_operation 287 dqshi874 shift sNaN14 NaN17 -> NaN14 Invalid_operation 288 dqshi875 shift sNaN15 sNaN18 -> NaN15 Invalid_operation 289 dqshi876 shift NaN16 sNaN19 -> NaN19 Invalid_operation 290 dqshi877 shift -Inf +sNaN20 -> NaN20 Invalid_operation 291 dqshi878 shift -1000 sNaN21 -> NaN21 Invalid_operation 292 dqshi879 shift 1000 sNaN22 -> NaN22 Invalid_operation 293 dqshi880 shift Inf sNaN23 -> NaN23 Invalid_operation 294 dqshi881 shift +NaN25 +sNaN24 -> NaN24 Invalid_operation 295 dqshi882 shift -NaN26 NaN28 -> -NaN26 296 dqshi883 shift -sNaN27 sNaN29 -> -NaN27 Invalid_operation 297 dqshi884 shift 1000 -NaN30 -> -NaN30 298 dqshi885 shift 1000 -sNaN31 -> -NaN31 Invalid_operation 299
