1 ------------------------------------------------------------------------ 2 -- ddCompareSig.decTest -- decDouble comparison; all NaNs signal -- 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 -- Note that we cannot assume add/subtract tests cover paths adequately, 23 -- here, because the code might be quite different (comparison cannot 24 -- overflow or underflow, so actual subtractions are not necessary). 25 26 -- All operands and results are decDoubles. 27 precision: 16 28 maxExponent: 384 29 minExponent: -383 30 extended: 1 31 clamp: 1 32 rounding: half_even 33 34 -- sanity checks 35 ddcms001 comparesig -2 -2 -> 0 36 ddcms002 comparesig -2 -1 -> -1 37 ddcms003 comparesig -2 0 -> -1 38 ddcms004 comparesig -2 1 -> -1 39 ddcms005 comparesig -2 2 -> -1 40 ddcms006 comparesig -1 -2 -> 1 41 ddcms007 comparesig -1 -1 -> 0 42 ddcms008 comparesig -1 0 -> -1 43 ddcms009 comparesig -1 1 -> -1 44 ddcms010 comparesig -1 2 -> -1 45 ddcms011 comparesig 0 -2 -> 1 46 ddcms012 comparesig 0 -1 -> 1 47 ddcms013 comparesig 0 0 -> 0 48 ddcms014 comparesig 0 1 -> -1 49 ddcms015 comparesig 0 2 -> -1 50 ddcms016 comparesig 1 -2 -> 1 51 ddcms017 comparesig 1 -1 -> 1 52 ddcms018 comparesig 1 0 -> 1 53 ddcms019 comparesig 1 1 -> 0 54 ddcms020 comparesig 1 2 -> -1 55 ddcms021 comparesig 2 -2 -> 1 56 ddcms022 comparesig 2 -1 -> 1 57 ddcms023 comparesig 2 0 -> 1 58 ddcms025 comparesig 2 1 -> 1 59 ddcms026 comparesig 2 2 -> 0 60 61 ddcms031 comparesig -20 -20 -> 0 62 ddcms032 comparesig -20 -10 -> -1 63 ddcms033 comparesig -20 00 -> -1 64 ddcms034 comparesig -20 10 -> -1 65 ddcms035 comparesig -20 20 -> -1 66 ddcms036 comparesig -10 -20 -> 1 67 ddcms037 comparesig -10 -10 -> 0 68 ddcms038 comparesig -10 00 -> -1 69 ddcms039 comparesig -10 10 -> -1 70 ddcms040 comparesig -10 20 -> -1 71 ddcms041 comparesig 00 -20 -> 1 72 ddcms042 comparesig 00 -10 -> 1 73 ddcms043 comparesig 00 00 -> 0 74 ddcms044 comparesig 00 10 -> -1 75 ddcms045 comparesig 00 20 -> -1 76 ddcms046 comparesig 10 -20 -> 1 77 ddcms047 comparesig 10 -10 -> 1 78 ddcms048 comparesig 10 00 -> 1 79 ddcms049 comparesig 10 10 -> 0 80 ddcms050 comparesig 10 20 -> -1 81 ddcms051 comparesig 20 -20 -> 1 82 ddcms052 comparesig 20 -10 -> 1 83 ddcms053 comparesig 20 00 -> 1 84 ddcms055 comparesig 20 10 -> 1 85 ddcms056 comparesig 20 20 -> 0 86 87 ddcms061 comparesig -2.0 -2.0 -> 0 88 ddcms062 comparesig -2.0 -1.0 -> -1 89 ddcms063 comparesig -2.0 0.0 -> -1 90 ddcms064 comparesig -2.0 1.0 -> -1 91 ddcms065 comparesig -2.0 2.0 -> -1 92 ddcms066 comparesig -1.0 -2.0 -> 1 93 ddcms067 comparesig -1.0 -1.0 -> 0 94 ddcms068 comparesig -1.0 0.0 -> -1 95 ddcms069 comparesig -1.0 1.0 -> -1 96 ddcms070 comparesig -1.0 2.0 -> -1 97 ddcms071 comparesig 0.0 -2.0 -> 1 98 ddcms072 comparesig 0.0 -1.0 -> 1 99 ddcms073 comparesig 0.0 0.0 -> 0 100 ddcms074 comparesig 0.0 1.0 -> -1 101 ddcms075 comparesig 0.0 2.0 -> -1 102 ddcms076 comparesig 1.0 -2.0 -> 1 103 ddcms077 comparesig 1.0 -1.0 -> 1 104 ddcms078 comparesig 1.0 0.0 -> 1 105 ddcms079 comparesig 1.0 1.0 -> 0 106 ddcms080 comparesig 1.0 2.0 -> -1 107 ddcms081 comparesig 2.0 -2.0 -> 1 108 ddcms082 comparesig 2.0 -1.0 -> 1 109 ddcms083 comparesig 2.0 0.0 -> 1 110 ddcms085 comparesig 2.0 1.0 -> 1 111 ddcms086 comparesig 2.0 2.0 -> 0 112 113 -- now some cases which might overflow if subtract were used 114 ddcms090 comparesig 9.999999999999999E+384 9.999999999999999E+384 -> 0 115 ddcms091 comparesig -9.999999999999999E+384 9.999999999999999E+384 -> -1 116 ddcms092 comparesig 9.999999999999999E+384 -9.999999999999999E+384 -> 1 117 ddcms093 comparesig -9.999999999999999E+384 -9.999999999999999E+384 -> 0 118 119 -- some differing length/exponent cases 120 ddcms100 comparesig 7.0 7.0 -> 0 121 ddcms101 comparesig 7.0 7 -> 0 122 ddcms102 comparesig 7 7.0 -> 0 123 ddcms103 comparesig 7E+0 7.0 -> 0 124 ddcms104 comparesig 70E-1 7.0 -> 0 125 ddcms105 comparesig 0.7E+1 7 -> 0 126 ddcms106 comparesig 70E-1 7 -> 0 127 ddcms107 comparesig 7.0 7E+0 -> 0 128 ddcms108 comparesig 7.0 70E-1 -> 0 129 ddcms109 comparesig 7 0.7E+1 -> 0 130 ddcms110 comparesig 7 70E-1 -> 0 131 132 ddcms120 comparesig 8.0 7.0 -> 1 133 ddcms121 comparesig 8.0 7 -> 1 134 ddcms122 comparesig 8 7.0 -> 1 135 ddcms123 comparesig 8E+0 7.0 -> 1 136 ddcms124 comparesig 80E-1 7.0 -> 1 137 ddcms125 comparesig 0.8E+1 7 -> 1 138 ddcms126 comparesig 80E-1 7 -> 1 139 ddcms127 comparesig 8.0 7E+0 -> 1 140 ddcms128 comparesig 8.0 70E-1 -> 1 141 ddcms129 comparesig 8 0.7E+1 -> 1 142 ddcms130 comparesig 8 70E-1 -> 1 143 144 ddcms140 comparesig 8.0 9.0 -> -1 145 ddcms141 comparesig 8.0 9 -> -1 146 ddcms142 comparesig 8 9.0 -> -1 147 ddcms143 comparesig 8E+0 9.0 -> -1 148 ddcms144 comparesig 80E-1 9.0 -> -1 149 ddcms145 comparesig 0.8E+1 9 -> -1 150 ddcms146 comparesig 80E-1 9 -> -1 151 ddcms147 comparesig 8.0 9E+0 -> -1 152 ddcms148 comparesig 8.0 90E-1 -> -1 153 ddcms149 comparesig 8 0.9E+1 -> -1 154 ddcms150 comparesig 8 90E-1 -> -1 155 156 -- and again, with sign changes -+ .. 157 ddcms200 comparesig -7.0 7.0 -> -1 158 ddcms201 comparesig -7.0 7 -> -1 159 ddcms202 comparesig -7 7.0 -> -1 160 ddcms203 comparesig -7E+0 7.0 -> -1 161 ddcms204 comparesig -70E-1 7.0 -> -1 162 ddcms205 comparesig -0.7E+1 7 -> -1 163 ddcms206 comparesig -70E-1 7 -> -1 164 ddcms207 comparesig -7.0 7E+0 -> -1 165 ddcms208 comparesig -7.0 70E-1 -> -1 166 ddcms209 comparesig -7 0.7E+1 -> -1 167 ddcms210 comparesig -7 70E-1 -> -1 168 169 ddcms220 comparesig -8.0 7.0 -> -1 170 ddcms221 comparesig -8.0 7 -> -1 171 ddcms222 comparesig -8 7.0 -> -1 172 ddcms223 comparesig -8E+0 7.0 -> -1 173 ddcms224 comparesig -80E-1 7.0 -> -1 174 ddcms225 comparesig -0.8E+1 7 -> -1 175 ddcms226 comparesig -80E-1 7 -> -1 176 ddcms227 comparesig -8.0 7E+0 -> -1 177 ddcms228 comparesig -8.0 70E-1 -> -1 178 ddcms229 comparesig -8 0.7E+1 -> -1 179 ddcms230 comparesig -8 70E-1 -> -1 180 181 ddcms240 comparesig -8.0 9.0 -> -1 182 ddcms241 comparesig -8.0 9 -> -1 183 ddcms242 comparesig -8 9.0 -> -1 184 ddcms243 comparesig -8E+0 9.0 -> -1 185 ddcms244 comparesig -80E-1 9.0 -> -1 186 ddcms245 comparesig -0.8E+1 9 -> -1 187 ddcms246 comparesig -80E-1 9 -> -1 188 ddcms247 comparesig -8.0 9E+0 -> -1 189 ddcms248 comparesig -8.0 90E-1 -> -1 190 ddcms249 comparesig -8 0.9E+1 -> -1 191 ddcms250 comparesig -8 90E-1 -> -1 192 193 -- and again, with sign changes +- .. 194 ddcms300 comparesig 7.0 -7.0 -> 1 195 ddcms301 comparesig 7.0 -7 -> 1 196 ddcms302 comparesig 7 -7.0 -> 1 197 ddcms303 comparesig 7E+0 -7.0 -> 1 198 ddcms304 comparesig 70E-1 -7.0 -> 1 199 ddcms305 comparesig .7E+1 -7 -> 1 200 ddcms306 comparesig 70E-1 -7 -> 1 201 ddcms307 comparesig 7.0 -7E+0 -> 1 202 ddcms308 comparesig 7.0 -70E-1 -> 1 203 ddcms309 comparesig 7 -.7E+1 -> 1 204 ddcms310 comparesig 7 -70E-1 -> 1 205 206 ddcms320 comparesig 8.0 -7.0 -> 1 207 ddcms321 comparesig 8.0 -7 -> 1 208 ddcms322 comparesig 8 -7.0 -> 1 209 ddcms323 comparesig 8E+0 -7.0 -> 1 210 ddcms324 comparesig 80E-1 -7.0 -> 1 211 ddcms325 comparesig .8E+1 -7 -> 1 212 ddcms326 comparesig 80E-1 -7 -> 1 213 ddcms327 comparesig 8.0 -7E+0 -> 1 214 ddcms328 comparesig 8.0 -70E-1 -> 1 215 ddcms329 comparesig 8 -.7E+1 -> 1 216 ddcms330 comparesig 8 -70E-1 -> 1 217 218 ddcms340 comparesig 8.0 -9.0 -> 1 219 ddcms341 comparesig 8.0 -9 -> 1 220 ddcms342 comparesig 8 -9.0 -> 1 221 ddcms343 comparesig 8E+0 -9.0 -> 1 222 ddcms344 comparesig 80E-1 -9.0 -> 1 223 ddcms345 comparesig .8E+1 -9 -> 1 224 ddcms346 comparesig 80E-1 -9 -> 1 225 ddcms347 comparesig 8.0 -9E+0 -> 1 226 ddcms348 comparesig 8.0 -90E-1 -> 1 227 ddcms349 comparesig 8 -.9E+1 -> 1 228 ddcms350 comparesig 8 -90E-1 -> 1 229 230 -- and again, with sign changes -- .. 231 ddcms400 comparesig -7.0 -7.0 -> 0 232 ddcms401 comparesig -7.0 -7 -> 0 233 ddcms402 comparesig -7 -7.0 -> 0 234 ddcms403 comparesig -7E+0 -7.0 -> 0 235 ddcms404 comparesig -70E-1 -7.0 -> 0 236 ddcms405 comparesig -.7E+1 -7 -> 0 237 ddcms406 comparesig -70E-1 -7 -> 0 238 ddcms407 comparesig -7.0 -7E+0 -> 0 239 ddcms408 comparesig -7.0 -70E-1 -> 0 240 ddcms409 comparesig -7 -.7E+1 -> 0 241 ddcms410 comparesig -7 -70E-1 -> 0 242 243 ddcms420 comparesig -8.0 -7.0 -> -1 244 ddcms421 comparesig -8.0 -7 -> -1 245 ddcms422 comparesig -8 -7.0 -> -1 246 ddcms423 comparesig -8E+0 -7.0 -> -1 247 ddcms424 comparesig -80E-1 -7.0 -> -1 248 ddcms425 comparesig -.8E+1 -7 -> -1 249 ddcms426 comparesig -80E-1 -7 -> -1 250 ddcms427 comparesig -8.0 -7E+0 -> -1 251 ddcms428 comparesig -8.0 -70E-1 -> -1 252 ddcms429 comparesig -8 -.7E+1 -> -1 253 ddcms430 comparesig -8 -70E-1 -> -1 254 255 ddcms440 comparesig -8.0 -9.0 -> 1 256 ddcms441 comparesig -8.0 -9 -> 1 257 ddcms442 comparesig -8 -9.0 -> 1 258 ddcms443 comparesig -8E+0 -9.0 -> 1 259 ddcms444 comparesig -80E-1 -9.0 -> 1 260 ddcms445 comparesig -.8E+1 -9 -> 1 261 ddcms446 comparesig -80E-1 -9 -> 1 262 ddcms447 comparesig -8.0 -9E+0 -> 1 263 ddcms448 comparesig -8.0 -90E-1 -> 1 264 ddcms449 comparesig -8 -.9E+1 -> 1 265 ddcms450 comparesig -8 -90E-1 -> 1 266 267 268 -- testcases that subtract to lots of zeros at boundaries [pgr] 269 ddcms473 comparesig 123.4560000000000E-89 123.456E-89 -> 0 270 ddcms474 comparesig 123.456000000000E+89 123.456E+89 -> 0 271 ddcms475 comparesig 123.45600000000E-89 123.456E-89 -> 0 272 ddcms476 comparesig 123.4560000000E+89 123.456E+89 -> 0 273 ddcms477 comparesig 123.456000000E-89 123.456E-89 -> 0 274 ddcms478 comparesig 123.45600000E+89 123.456E+89 -> 0 275 ddcms479 comparesig 123.4560000E-89 123.456E-89 -> 0 276 ddcms480 comparesig 123.456000E+89 123.456E+89 -> 0 277 ddcms481 comparesig 123.45600E-89 123.456E-89 -> 0 278 ddcms482 comparesig 123.4560E+89 123.456E+89 -> 0 279 ddcms483 comparesig 123.456E-89 123.456E-89 -> 0 280 ddcms487 comparesig 123.456E+89 123.4560000000000E+89 -> 0 281 ddcms488 comparesig 123.456E-89 123.456000000000E-89 -> 0 282 ddcms489 comparesig 123.456E+89 123.45600000000E+89 -> 0 283 ddcms490 comparesig 123.456E-89 123.4560000000E-89 -> 0 284 ddcms491 comparesig 123.456E+89 123.456000000E+89 -> 0 285 ddcms492 comparesig 123.456E-89 123.45600000E-89 -> 0 286 ddcms493 comparesig 123.456E+89 123.4560000E+89 -> 0 287 ddcms494 comparesig 123.456E-89 123.456000E-89 -> 0 288 ddcms495 comparesig 123.456E+89 123.45600E+89 -> 0 289 ddcms496 comparesig 123.456E-89 123.4560E-89 -> 0 290 ddcms497 comparesig 123.456E+89 123.456E+89 -> 0 291 292 -- wide-ranging, around precision; signs equal 293 ddcms500 comparesig 1 1E-15 -> 1 294 ddcms501 comparesig 1 1E-14 -> 1 295 ddcms502 comparesig 1 1E-13 -> 1 296 ddcms503 comparesig 1 1E-12 -> 1 297 ddcms504 comparesig 1 1E-11 -> 1 298 ddcms505 comparesig 1 1E-10 -> 1 299 ddcms506 comparesig 1 1E-9 -> 1 300 ddcms507 comparesig 1 1E-8 -> 1 301 ddcms508 comparesig 1 1E-7 -> 1 302 ddcms509 comparesig 1 1E-6 -> 1 303 ddcms510 comparesig 1 1E-5 -> 1 304 ddcms511 comparesig 1 1E-4 -> 1 305 ddcms512 comparesig 1 1E-3 -> 1 306 ddcms513 comparesig 1 1E-2 -> 1 307 ddcms514 comparesig 1 1E-1 -> 1 308 ddcms515 comparesig 1 1E-0 -> 0 309 ddcms516 comparesig 1 1E+1 -> -1 310 ddcms517 comparesig 1 1E+2 -> -1 311 ddcms518 comparesig 1 1E+3 -> -1 312 ddcms519 comparesig 1 1E+4 -> -1 313 ddcms521 comparesig 1 1E+5 -> -1 314 ddcms522 comparesig 1 1E+6 -> -1 315 ddcms523 comparesig 1 1E+7 -> -1 316 ddcms524 comparesig 1 1E+8 -> -1 317 ddcms525 comparesig 1 1E+9 -> -1 318 ddcms526 comparesig 1 1E+10 -> -1 319 ddcms527 comparesig 1 1E+11 -> -1 320 ddcms528 comparesig 1 1E+12 -> -1 321 ddcms529 comparesig 1 1E+13 -> -1 322 ddcms530 comparesig 1 1E+14 -> -1 323 ddcms531 comparesig 1 1E+15 -> -1 324 -- LR swap 325 ddcms540 comparesig 1E-15 1 -> -1 326 ddcms541 comparesig 1E-14 1 -> -1 327 ddcms542 comparesig 1E-13 1 -> -1 328 ddcms543 comparesig 1E-12 1 -> -1 329 ddcms544 comparesig 1E-11 1 -> -1 330 ddcms545 comparesig 1E-10 1 -> -1 331 ddcms546 comparesig 1E-9 1 -> -1 332 ddcms547 comparesig 1E-8 1 -> -1 333 ddcms548 comparesig 1E-7 1 -> -1 334 ddcms549 comparesig 1E-6 1 -> -1 335 ddcms550 comparesig 1E-5 1 -> -1 336 ddcms551 comparesig 1E-4 1 -> -1 337 ddcms552 comparesig 1E-3 1 -> -1 338 ddcms553 comparesig 1E-2 1 -> -1 339 ddcms554 comparesig 1E-1 1 -> -1 340 ddcms555 comparesig 1E-0 1 -> 0 341 ddcms556 comparesig 1E+1 1 -> 1 342 ddcms557 comparesig 1E+2 1 -> 1 343 ddcms558 comparesig 1E+3 1 -> 1 344 ddcms559 comparesig 1E+4 1 -> 1 345 ddcms561 comparesig 1E+5 1 -> 1 346 ddcms562 comparesig 1E+6 1 -> 1 347 ddcms563 comparesig 1E+7 1 -> 1 348 ddcms564 comparesig 1E+8 1 -> 1 349 ddcms565 comparesig 1E+9 1 -> 1 350 ddcms566 comparesig 1E+10 1 -> 1 351 ddcms567 comparesig 1E+11 1 -> 1 352 ddcms568 comparesig 1E+12 1 -> 1 353 ddcms569 comparesig 1E+13 1 -> 1 354 ddcms570 comparesig 1E+14 1 -> 1 355 ddcms571 comparesig 1E+15 1 -> 1 356 -- similar with a useful coefficient, one side only 357 ddcms580 comparesig 0.000000987654321 1E-15 -> 1 358 ddcms581 comparesig 0.000000987654321 1E-14 -> 1 359 ddcms582 comparesig 0.000000987654321 1E-13 -> 1 360 ddcms583 comparesig 0.000000987654321 1E-12 -> 1 361 ddcms584 comparesig 0.000000987654321 1E-11 -> 1 362 ddcms585 comparesig 0.000000987654321 1E-10 -> 1 363 ddcms586 comparesig 0.000000987654321 1E-9 -> 1 364 ddcms587 comparesig 0.000000987654321 1E-8 -> 1 365 ddcms588 comparesig 0.000000987654321 1E-7 -> 1 366 ddcms589 comparesig 0.000000987654321 1E-6 -> -1 367 ddcms590 comparesig 0.000000987654321 1E-5 -> -1 368 ddcms591 comparesig 0.000000987654321 1E-4 -> -1 369 ddcms592 comparesig 0.000000987654321 1E-3 -> -1 370 ddcms593 comparesig 0.000000987654321 1E-2 -> -1 371 ddcms594 comparesig 0.000000987654321 1E-1 -> -1 372 ddcms595 comparesig 0.000000987654321 1E-0 -> -1 373 ddcms596 comparesig 0.000000987654321 1E+1 -> -1 374 ddcms597 comparesig 0.000000987654321 1E+2 -> -1 375 ddcms598 comparesig 0.000000987654321 1E+3 -> -1 376 ddcms599 comparesig 0.000000987654321 1E+4 -> -1 377 378 -- check some unit-y traps 379 ddcms600 comparesig 12 12.2345 -> -1 380 ddcms601 comparesig 12.0 12.2345 -> -1 381 ddcms602 comparesig 12.00 12.2345 -> -1 382 ddcms603 comparesig 12.000 12.2345 -> -1 383 ddcms604 comparesig 12.0000 12.2345 -> -1 384 ddcms605 comparesig 12.00000 12.2345 -> -1 385 ddcms606 comparesig 12.000000 12.2345 -> -1 386 ddcms607 comparesig 12.0000000 12.2345 -> -1 387 ddcms608 comparesig 12.00000000 12.2345 -> -1 388 ddcms609 comparesig 12.000000000 12.2345 -> -1 389 ddcms610 comparesig 12.1234 12 -> 1 390 ddcms611 comparesig 12.1234 12.0 -> 1 391 ddcms612 comparesig 12.1234 12.00 -> 1 392 ddcms613 comparesig 12.1234 12.000 -> 1 393 ddcms614 comparesig 12.1234 12.0000 -> 1 394 ddcms615 comparesig 12.1234 12.00000 -> 1 395 ddcms616 comparesig 12.1234 12.000000 -> 1 396 ddcms617 comparesig 12.1234 12.0000000 -> 1 397 ddcms618 comparesig 12.1234 12.00000000 -> 1 398 ddcms619 comparesig 12.1234 12.000000000 -> 1 399 ddcms620 comparesig -12 -12.2345 -> 1 400 ddcms621 comparesig -12.0 -12.2345 -> 1 401 ddcms622 comparesig -12.00 -12.2345 -> 1 402 ddcms623 comparesig -12.000 -12.2345 -> 1 403 ddcms624 comparesig -12.0000 -12.2345 -> 1 404 ddcms625 comparesig -12.00000 -12.2345 -> 1 405 ddcms626 comparesig -12.000000 -12.2345 -> 1 406 ddcms627 comparesig -12.0000000 -12.2345 -> 1 407 ddcms628 comparesig -12.00000000 -12.2345 -> 1 408 ddcms629 comparesig -12.000000000 -12.2345 -> 1 409 ddcms630 comparesig -12.1234 -12 -> -1 410 ddcms631 comparesig -12.1234 -12.0 -> -1 411 ddcms632 comparesig -12.1234 -12.00 -> -1 412 ddcms633 comparesig -12.1234 -12.000 -> -1 413 ddcms634 comparesig -12.1234 -12.0000 -> -1 414 ddcms635 comparesig -12.1234 -12.00000 -> -1 415 ddcms636 comparesig -12.1234 -12.000000 -> -1 416 ddcms637 comparesig -12.1234 -12.0000000 -> -1 417 ddcms638 comparesig -12.1234 -12.00000000 -> -1 418 ddcms639 comparesig -12.1234 -12.000000000 -> -1 419 420 -- extended zeros 421 ddcms640 comparesig 0 0 -> 0 422 ddcms641 comparesig 0 -0 -> 0 423 ddcms642 comparesig 0 -0.0 -> 0 424 ddcms643 comparesig 0 0.0 -> 0 425 ddcms644 comparesig -0 0 -> 0 426 ddcms645 comparesig -0 -0 -> 0 427 ddcms646 comparesig -0 -0.0 -> 0 428 ddcms647 comparesig -0 0.0 -> 0 429 ddcms648 comparesig 0.0 0 -> 0 430 ddcms649 comparesig 0.0 -0 -> 0 431 ddcms650 comparesig 0.0 -0.0 -> 0 432 ddcms651 comparesig 0.0 0.0 -> 0 433 ddcms652 comparesig -0.0 0 -> 0 434 ddcms653 comparesig -0.0 -0 -> 0 435 ddcms654 comparesig -0.0 -0.0 -> 0 436 ddcms655 comparesig -0.0 0.0 -> 0 437 438 ddcms656 comparesig -0E1 0.0 -> 0 439 ddcms657 comparesig -0E2 0.0 -> 0 440 ddcms658 comparesig 0E1 0.0 -> 0 441 ddcms659 comparesig 0E2 0.0 -> 0 442 ddcms660 comparesig -0E1 0 -> 0 443 ddcms661 comparesig -0E2 0 -> 0 444 ddcms662 comparesig 0E1 0 -> 0 445 ddcms663 comparesig 0E2 0 -> 0 446 ddcms664 comparesig -0E1 -0E1 -> 0 447 ddcms665 comparesig -0E2 -0E1 -> 0 448 ddcms666 comparesig 0E1 -0E1 -> 0 449 ddcms667 comparesig 0E2 -0E1 -> 0 450 ddcms668 comparesig -0E1 -0E2 -> 0 451 ddcms669 comparesig -0E2 -0E2 -> 0 452 ddcms670 comparesig 0E1 -0E2 -> 0 453 ddcms671 comparesig 0E2 -0E2 -> 0 454 ddcms672 comparesig -0E1 0E1 -> 0 455 ddcms673 comparesig -0E2 0E1 -> 0 456 ddcms674 comparesig 0E1 0E1 -> 0 457 ddcms675 comparesig 0E2 0E1 -> 0 458 ddcms676 comparesig -0E1 0E2 -> 0 459 ddcms677 comparesig -0E2 0E2 -> 0 460 ddcms678 comparesig 0E1 0E2 -> 0 461 ddcms679 comparesig 0E2 0E2 -> 0 462 463 -- trailing zeros; unit-y 464 ddcms680 comparesig 12 12 -> 0 465 ddcms681 comparesig 12 12.0 -> 0 466 ddcms682 comparesig 12 12.00 -> 0 467 ddcms683 comparesig 12 12.000 -> 0 468 ddcms684 comparesig 12 12.0000 -> 0 469 ddcms685 comparesig 12 12.00000 -> 0 470 ddcms686 comparesig 12 12.000000 -> 0 471 ddcms687 comparesig 12 12.0000000 -> 0 472 ddcms688 comparesig 12 12.00000000 -> 0 473 ddcms689 comparesig 12 12.000000000 -> 0 474 ddcms690 comparesig 12 12 -> 0 475 ddcms691 comparesig 12.0 12 -> 0 476 ddcms692 comparesig 12.00 12 -> 0 477 ddcms693 comparesig 12.000 12 -> 0 478 ddcms694 comparesig 12.0000 12 -> 0 479 ddcms695 comparesig 12.00000 12 -> 0 480 ddcms696 comparesig 12.000000 12 -> 0 481 ddcms697 comparesig 12.0000000 12 -> 0 482 ddcms698 comparesig 12.00000000 12 -> 0 483 ddcms699 comparesig 12.000000000 12 -> 0 484 485 -- first, second, & last digit 486 ddcms700 comparesig 1234567890123456 1234567890123455 -> 1 487 ddcms701 comparesig 1234567890123456 1234567890123456 -> 0 488 ddcms702 comparesig 1234567890123456 1234567890123457 -> -1 489 ddcms703 comparesig 1234567890123456 0234567890123456 -> 1 490 ddcms704 comparesig 1234567890123456 1234567890123456 -> 0 491 ddcms705 comparesig 1234567890123456 2234567890123456 -> -1 492 ddcms706 comparesig 1134567890123456 1034567890123456 -> 1 493 ddcms707 comparesig 1134567890123456 1134567890123456 -> 0 494 ddcms708 comparesig 1134567890123456 1234567890123456 -> -1 495 496 -- miscellaneous 497 ddcms721 comparesig 12345678000 1 -> 1 498 ddcms722 comparesig 1 12345678000 -> -1 499 ddcms723 comparesig 1234567800 1 -> 1 500 ddcms724 comparesig 1 1234567800 -> -1 501 ddcms725 comparesig 1234567890 1 -> 1 502 ddcms726 comparesig 1 1234567890 -> -1 503 ddcms727 comparesig 1234567891 1 -> 1 504 ddcms728 comparesig 1 1234567891 -> -1 505 ddcms729 comparesig 12345678901 1 -> 1 506 ddcms730 comparesig 1 12345678901 -> -1 507 ddcms731 comparesig 1234567896 1 -> 1 508 ddcms732 comparesig 1 1234567896 -> -1 509 510 -- residue cases at lower precision 511 ddcms740 comparesig 1 0.9999999 -> 1 512 ddcms741 comparesig 1 0.999999 -> 1 513 ddcms742 comparesig 1 0.99999 -> 1 514 ddcms743 comparesig 1 1.0000 -> 0 515 ddcms744 comparesig 1 1.00001 -> -1 516 ddcms745 comparesig 1 1.000001 -> -1 517 ddcms746 comparesig 1 1.0000001 -> -1 518 ddcms750 comparesig 0.9999999 1 -> -1 519 ddcms751 comparesig 0.999999 1 -> -1 520 ddcms752 comparesig 0.99999 1 -> -1 521 ddcms753 comparesig 1.0000 1 -> 0 522 ddcms754 comparesig 1.00001 1 -> 1 523 ddcms755 comparesig 1.000001 1 -> 1 524 ddcms756 comparesig 1.0000001 1 -> 1 525 526 -- Specials 527 ddcms780 comparesig Inf -Inf -> 1 528 ddcms781 comparesig Inf -1000 -> 1 529 ddcms782 comparesig Inf -1 -> 1 530 ddcms783 comparesig Inf -0 -> 1 531 ddcms784 comparesig Inf 0 -> 1 532 ddcms785 comparesig Inf 1 -> 1 533 ddcms786 comparesig Inf 1000 -> 1 534 ddcms787 comparesig Inf Inf -> 0 535 ddcms788 comparesig -1000 Inf -> -1 536 ddcms789 comparesig -Inf Inf -> -1 537 ddcms790 comparesig -1 Inf -> -1 538 ddcms791 comparesig -0 Inf -> -1 539 ddcms792 comparesig 0 Inf -> -1 540 ddcms793 comparesig 1 Inf -> -1 541 ddcms794 comparesig 1000 Inf -> -1 542 ddcms795 comparesig Inf Inf -> 0 543 544 ddcms800 comparesig -Inf -Inf -> 0 545 ddcms801 comparesig -Inf -1000 -> -1 546 ddcms802 comparesig -Inf -1 -> -1 547 ddcms803 comparesig -Inf -0 -> -1 548 ddcms804 comparesig -Inf 0 -> -1 549 ddcms805 comparesig -Inf 1 -> -1 550 ddcms806 comparesig -Inf 1000 -> -1 551 ddcms807 comparesig -Inf Inf -> -1 552 ddcms808 comparesig -Inf -Inf -> 0 553 ddcms809 comparesig -1000 -Inf -> 1 554 ddcms810 comparesig -1 -Inf -> 1 555 ddcms811 comparesig -0 -Inf -> 1 556 ddcms812 comparesig 0 -Inf -> 1 557 ddcms813 comparesig 1 -Inf -> 1 558 ddcms814 comparesig 1000 -Inf -> 1 559 ddcms815 comparesig Inf -Inf -> 1 560 561 ddcms821 comparesig NaN -Inf -> NaN Invalid_operation 562 ddcms822 comparesig NaN -1000 -> NaN Invalid_operation 563 ddcms823 comparesig NaN -1 -> NaN Invalid_operation 564 ddcms824 comparesig NaN -0 -> NaN Invalid_operation 565 ddcms825 comparesig NaN 0 -> NaN Invalid_operation 566 ddcms826 comparesig NaN 1 -> NaN Invalid_operation 567 ddcms827 comparesig NaN 1000 -> NaN Invalid_operation 568 ddcms828 comparesig NaN Inf -> NaN Invalid_operation 569 ddcms829 comparesig NaN NaN -> NaN Invalid_operation 570 ddcms830 comparesig -Inf NaN -> NaN Invalid_operation 571 ddcms831 comparesig -1000 NaN -> NaN Invalid_operation 572 ddcms832 comparesig -1 NaN -> NaN Invalid_operation 573 ddcms833 comparesig -0 NaN -> NaN Invalid_operation 574 ddcms834 comparesig 0 NaN -> NaN Invalid_operation 575 ddcms835 comparesig 1 NaN -> NaN Invalid_operation 576 ddcms836 comparesig 1000 NaN -> NaN Invalid_operation 577 ddcms837 comparesig Inf NaN -> NaN Invalid_operation 578 ddcms838 comparesig -NaN -NaN -> -NaN Invalid_operation 579 ddcms839 comparesig +NaN -NaN -> NaN Invalid_operation 580 ddcms840 comparesig -NaN +NaN -> -NaN Invalid_operation 581 582 ddcms841 comparesig sNaN -Inf -> NaN Invalid_operation 583 ddcms842 comparesig sNaN -1000 -> NaN Invalid_operation 584 ddcms843 comparesig sNaN -1 -> NaN Invalid_operation 585 ddcms844 comparesig sNaN -0 -> NaN Invalid_operation 586 ddcms845 comparesig sNaN 0 -> NaN Invalid_operation 587 ddcms846 comparesig sNaN 1 -> NaN Invalid_operation 588 ddcms847 comparesig sNaN 1000 -> NaN Invalid_operation 589 ddcms848 comparesig sNaN NaN -> NaN Invalid_operation 590 ddcms849 comparesig sNaN sNaN -> NaN Invalid_operation 591 ddcms850 comparesig NaN sNaN -> NaN Invalid_operation 592 ddcms851 comparesig -Inf sNaN -> NaN Invalid_operation 593 ddcms852 comparesig -1000 sNaN -> NaN Invalid_operation 594 ddcms853 comparesig -1 sNaN -> NaN Invalid_operation 595 ddcms854 comparesig -0 sNaN -> NaN Invalid_operation 596 ddcms855 comparesig 0 sNaN -> NaN Invalid_operation 597 ddcms856 comparesig 1 sNaN -> NaN Invalid_operation 598 ddcms857 comparesig 1000 sNaN -> NaN Invalid_operation 599 ddcms858 comparesig Inf sNaN -> NaN Invalid_operation 600 ddcms859 comparesig NaN sNaN -> NaN Invalid_operation 601 602 -- propagating NaNs 603 ddcms860 comparesig NaN9 -Inf -> NaN9 Invalid_operation 604 ddcms861 comparesig NaN8 999 -> NaN8 Invalid_operation 605 ddcms862 comparesig NaN77 Inf -> NaN77 Invalid_operation 606 ddcms863 comparesig -NaN67 NaN5 -> -NaN67 Invalid_operation 607 ddcms864 comparesig -Inf -NaN4 -> -NaN4 Invalid_operation 608 ddcms865 comparesig -999 -NaN33 -> -NaN33 Invalid_operation 609 ddcms866 comparesig Inf NaN2 -> NaN2 Invalid_operation 610 ddcms867 comparesig -NaN41 -NaN42 -> -NaN41 Invalid_operation 611 ddcms868 comparesig +NaN41 -NaN42 -> NaN41 Invalid_operation 612 ddcms869 comparesig -NaN41 +NaN42 -> -NaN41 Invalid_operation 613 ddcms870 comparesig +NaN41 +NaN42 -> NaN41 Invalid_operation 614 615 ddcms871 comparesig -sNaN99 -Inf -> -NaN99 Invalid_operation 616 ddcms872 comparesig sNaN98 -11 -> NaN98 Invalid_operation 617 ddcms873 comparesig sNaN97 NaN -> NaN97 Invalid_operation 618 ddcms874 comparesig sNaN16 sNaN94 -> NaN16 Invalid_operation 619 ddcms875 comparesig NaN85 sNaN83 -> NaN83 Invalid_operation 620 ddcms876 comparesig -Inf sNaN92 -> NaN92 Invalid_operation 621 ddcms877 comparesig 088 sNaN81 -> NaN81 Invalid_operation 622 ddcms878 comparesig Inf sNaN90 -> NaN90 Invalid_operation 623 ddcms879 comparesig NaN -sNaN89 -> -NaN89 Invalid_operation 624 625 -- wide range 626 ddcms880 comparesig +1.23456789012345E-0 9E+384 -> -1 627 ddcms881 comparesig 9E+384 +1.23456789012345E-0 -> 1 628 ddcms882 comparesig +0.100 9E-383 -> 1 629 ddcms883 comparesig 9E-383 +0.100 -> -1 630 ddcms885 comparesig -1.23456789012345E-0 9E+384 -> -1 631 ddcms886 comparesig 9E+384 -1.23456789012345E-0 -> 1 632 ddcms887 comparesig -0.100 9E-383 -> -1 633 ddcms888 comparesig 9E-383 -0.100 -> 1 634 635 -- signs 636 ddcms901 comparesig 1e+77 1e+11 -> 1 637 ddcms902 comparesig 1e+77 -1e+11 -> 1 638 ddcms903 comparesig -1e+77 1e+11 -> -1 639 ddcms904 comparesig -1e+77 -1e+11 -> -1 640 ddcms905 comparesig 1e-77 1e-11 -> -1 641 ddcms906 comparesig 1e-77 -1e-11 -> 1 642 ddcms907 comparesig -1e-77 1e-11 -> -1 643 ddcms908 comparesig -1e-77 -1e-11 -> 1 644 645 -- Null tests 646 ddcms990 comparesig 10 # -> NaN Invalid_operation 647 ddcms991 comparesig # 10 -> NaN Invalid_operation 648
