| ------------------------------------------------------------------------ |
| -- ddCompareSig.decTest -- decDouble comparison; all NaNs signal -- |
| -- Copyright (c) IBM Corporation, 1981, 2008. All rights reserved. -- |
| ------------------------------------------------------------------------ |
| -- Please see the document "General Decimal Arithmetic Testcases" -- |
| -- at http://www2.hursley.ibm.com/decimal for the description of -- |
| -- these testcases. -- |
| -- -- |
| -- These testcases are experimental ('beta' versions), and they -- |
| -- may contain errors. They are offered on an as-is basis. In -- |
| -- particular, achieving the same results as the tests here is not -- |
| -- a guarantee that an implementation complies with any Standard -- |
| -- or specification. The tests are not exhaustive. -- |
| -- -- |
| -- Please send comments, suggestions, and corrections to the author: -- |
| -- Mike Cowlishaw, IBM Fellow -- |
| -- IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK -- |
| -- mfc@uk.ibm.com -- |
| ------------------------------------------------------------------------ |
| version: 2.59 |
| |
| -- Note that we cannot assume add/subtract tests cover paths adequately, |
| -- here, because the code might be quite different (comparison cannot |
| -- overflow or underflow, so actual subtractions are not necessary). |
| |
| -- All operands and results are decDoubles. |
| precision: 16 |
| maxExponent: 384 |
| minExponent: -383 |
| extended: 1 |
| clamp: 1 |
| rounding: half_even |
| |
| -- sanity checks |
| ddcms001 comparesig -2 -2 -> 0 |
| ddcms002 comparesig -2 -1 -> -1 |
| ddcms003 comparesig -2 0 -> -1 |
| ddcms004 comparesig -2 1 -> -1 |
| ddcms005 comparesig -2 2 -> -1 |
| ddcms006 comparesig -1 -2 -> 1 |
| ddcms007 comparesig -1 -1 -> 0 |
| ddcms008 comparesig -1 0 -> -1 |
| ddcms009 comparesig -1 1 -> -1 |
| ddcms010 comparesig -1 2 -> -1 |
| ddcms011 comparesig 0 -2 -> 1 |
| ddcms012 comparesig 0 -1 -> 1 |
| ddcms013 comparesig 0 0 -> 0 |
| ddcms014 comparesig 0 1 -> -1 |
| ddcms015 comparesig 0 2 -> -1 |
| ddcms016 comparesig 1 -2 -> 1 |
| ddcms017 comparesig 1 -1 -> 1 |
| ddcms018 comparesig 1 0 -> 1 |
| ddcms019 comparesig 1 1 -> 0 |
| ddcms020 comparesig 1 2 -> -1 |
| ddcms021 comparesig 2 -2 -> 1 |
| ddcms022 comparesig 2 -1 -> 1 |
| ddcms023 comparesig 2 0 -> 1 |
| ddcms025 comparesig 2 1 -> 1 |
| ddcms026 comparesig 2 2 -> 0 |
| |
| ddcms031 comparesig -20 -20 -> 0 |
| ddcms032 comparesig -20 -10 -> -1 |
| ddcms033 comparesig -20 00 -> -1 |
| ddcms034 comparesig -20 10 -> -1 |
| ddcms035 comparesig -20 20 -> -1 |
| ddcms036 comparesig -10 -20 -> 1 |
| ddcms037 comparesig -10 -10 -> 0 |
| ddcms038 comparesig -10 00 -> -1 |
| ddcms039 comparesig -10 10 -> -1 |
| ddcms040 comparesig -10 20 -> -1 |
| ddcms041 comparesig 00 -20 -> 1 |
| ddcms042 comparesig 00 -10 -> 1 |
| ddcms043 comparesig 00 00 -> 0 |
| ddcms044 comparesig 00 10 -> -1 |
| ddcms045 comparesig 00 20 -> -1 |
| ddcms046 comparesig 10 -20 -> 1 |
| ddcms047 comparesig 10 -10 -> 1 |
| ddcms048 comparesig 10 00 -> 1 |
| ddcms049 comparesig 10 10 -> 0 |
| ddcms050 comparesig 10 20 -> -1 |
| ddcms051 comparesig 20 -20 -> 1 |
| ddcms052 comparesig 20 -10 -> 1 |
| ddcms053 comparesig 20 00 -> 1 |
| ddcms055 comparesig 20 10 -> 1 |
| ddcms056 comparesig 20 20 -> 0 |
| |
| ddcms061 comparesig -2.0 -2.0 -> 0 |
| ddcms062 comparesig -2.0 -1.0 -> -1 |
| ddcms063 comparesig -2.0 0.0 -> -1 |
| ddcms064 comparesig -2.0 1.0 -> -1 |
| ddcms065 comparesig -2.0 2.0 -> -1 |
| ddcms066 comparesig -1.0 -2.0 -> 1 |
| ddcms067 comparesig -1.0 -1.0 -> 0 |
| ddcms068 comparesig -1.0 0.0 -> -1 |
| ddcms069 comparesig -1.0 1.0 -> -1 |
| ddcms070 comparesig -1.0 2.0 -> -1 |
| ddcms071 comparesig 0.0 -2.0 -> 1 |
| ddcms072 comparesig 0.0 -1.0 -> 1 |
| ddcms073 comparesig 0.0 0.0 -> 0 |
| ddcms074 comparesig 0.0 1.0 -> -1 |
| ddcms075 comparesig 0.0 2.0 -> -1 |
| ddcms076 comparesig 1.0 -2.0 -> 1 |
| ddcms077 comparesig 1.0 -1.0 -> 1 |
| ddcms078 comparesig 1.0 0.0 -> 1 |
| ddcms079 comparesig 1.0 1.0 -> 0 |
| ddcms080 comparesig 1.0 2.0 -> -1 |
| ddcms081 comparesig 2.0 -2.0 -> 1 |
| ddcms082 comparesig 2.0 -1.0 -> 1 |
| ddcms083 comparesig 2.0 0.0 -> 1 |
| ddcms085 comparesig 2.0 1.0 -> 1 |
| ddcms086 comparesig 2.0 2.0 -> 0 |
| |
| -- now some cases which might overflow if subtract were used |
| ddcms090 comparesig 9.999999999999999E+384 9.999999999999999E+384 -> 0 |
| ddcms091 comparesig -9.999999999999999E+384 9.999999999999999E+384 -> -1 |
| ddcms092 comparesig 9.999999999999999E+384 -9.999999999999999E+384 -> 1 |
| ddcms093 comparesig -9.999999999999999E+384 -9.999999999999999E+384 -> 0 |
| |
| -- some differing length/exponent cases |
| ddcms100 comparesig 7.0 7.0 -> 0 |
| ddcms101 comparesig 7.0 7 -> 0 |
| ddcms102 comparesig 7 7.0 -> 0 |
| ddcms103 comparesig 7E+0 7.0 -> 0 |
| ddcms104 comparesig 70E-1 7.0 -> 0 |
| ddcms105 comparesig 0.7E+1 7 -> 0 |
| ddcms106 comparesig 70E-1 7 -> 0 |
| ddcms107 comparesig 7.0 7E+0 -> 0 |
| ddcms108 comparesig 7.0 70E-1 -> 0 |
| ddcms109 comparesig 7 0.7E+1 -> 0 |
| ddcms110 comparesig 7 70E-1 -> 0 |
| |
| ddcms120 comparesig 8.0 7.0 -> 1 |
| ddcms121 comparesig 8.0 7 -> 1 |
| ddcms122 comparesig 8 7.0 -> 1 |
| ddcms123 comparesig 8E+0 7.0 -> 1 |
| ddcms124 comparesig 80E-1 7.0 -> 1 |
| ddcms125 comparesig 0.8E+1 7 -> 1 |
| ddcms126 comparesig 80E-1 7 -> 1 |
| ddcms127 comparesig 8.0 7E+0 -> 1 |
| ddcms128 comparesig 8.0 70E-1 -> 1 |
| ddcms129 comparesig 8 0.7E+1 -> 1 |
| ddcms130 comparesig 8 70E-1 -> 1 |
| |
| ddcms140 comparesig 8.0 9.0 -> -1 |
| ddcms141 comparesig 8.0 9 -> -1 |
| ddcms142 comparesig 8 9.0 -> -1 |
| ddcms143 comparesig 8E+0 9.0 -> -1 |
| ddcms144 comparesig 80E-1 9.0 -> -1 |
| ddcms145 comparesig 0.8E+1 9 -> -1 |
| ddcms146 comparesig 80E-1 9 -> -1 |
| ddcms147 comparesig 8.0 9E+0 -> -1 |
| ddcms148 comparesig 8.0 90E-1 -> -1 |
| ddcms149 comparesig 8 0.9E+1 -> -1 |
| ddcms150 comparesig 8 90E-1 -> -1 |
| |
| -- and again, with sign changes -+ .. |
| ddcms200 comparesig -7.0 7.0 -> -1 |
| ddcms201 comparesig -7.0 7 -> -1 |
| ddcms202 comparesig -7 7.0 -> -1 |
| ddcms203 comparesig -7E+0 7.0 -> -1 |
| ddcms204 comparesig -70E-1 7.0 -> -1 |
| ddcms205 comparesig -0.7E+1 7 -> -1 |
| ddcms206 comparesig -70E-1 7 -> -1 |
| ddcms207 comparesig -7.0 7E+0 -> -1 |
| ddcms208 comparesig -7.0 70E-1 -> -1 |
| ddcms209 comparesig -7 0.7E+1 -> -1 |
| ddcms210 comparesig -7 70E-1 -> -1 |
| |
| ddcms220 comparesig -8.0 7.0 -> -1 |
| ddcms221 comparesig -8.0 7 -> -1 |
| ddcms222 comparesig -8 7.0 -> -1 |
| ddcms223 comparesig -8E+0 7.0 -> -1 |
| ddcms224 comparesig -80E-1 7.0 -> -1 |
| ddcms225 comparesig -0.8E+1 7 -> -1 |
| ddcms226 comparesig -80E-1 7 -> -1 |
| ddcms227 comparesig -8.0 7E+0 -> -1 |
| ddcms228 comparesig -8.0 70E-1 -> -1 |
| ddcms229 comparesig -8 0.7E+1 -> -1 |
| ddcms230 comparesig -8 70E-1 -> -1 |
| |
| ddcms240 comparesig -8.0 9.0 -> -1 |
| ddcms241 comparesig -8.0 9 -> -1 |
| ddcms242 comparesig -8 9.0 -> -1 |
| ddcms243 comparesig -8E+0 9.0 -> -1 |
| ddcms244 comparesig -80E-1 9.0 -> -1 |
| ddcms245 comparesig -0.8E+1 9 -> -1 |
| ddcms246 comparesig -80E-1 9 -> -1 |
| ddcms247 comparesig -8.0 9E+0 -> -1 |
| ddcms248 comparesig -8.0 90E-1 -> -1 |
| ddcms249 comparesig -8 0.9E+1 -> -1 |
| ddcms250 comparesig -8 90E-1 -> -1 |
| |
| -- and again, with sign changes +- .. |
| ddcms300 comparesig 7.0 -7.0 -> 1 |
| ddcms301 comparesig 7.0 -7 -> 1 |
| ddcms302 comparesig 7 -7.0 -> 1 |
| ddcms303 comparesig 7E+0 -7.0 -> 1 |
| ddcms304 comparesig 70E-1 -7.0 -> 1 |
| ddcms305 comparesig .7E+1 -7 -> 1 |
| ddcms306 comparesig 70E-1 -7 -> 1 |
| ddcms307 comparesig 7.0 -7E+0 -> 1 |
| ddcms308 comparesig 7.0 -70E-1 -> 1 |
| ddcms309 comparesig 7 -.7E+1 -> 1 |
| ddcms310 comparesig 7 -70E-1 -> 1 |
| |
| ddcms320 comparesig 8.0 -7.0 -> 1 |
| ddcms321 comparesig 8.0 -7 -> 1 |
| ddcms322 comparesig 8 -7.0 -> 1 |
| ddcms323 comparesig 8E+0 -7.0 -> 1 |
| ddcms324 comparesig 80E-1 -7.0 -> 1 |
| ddcms325 comparesig .8E+1 -7 -> 1 |
| ddcms326 comparesig 80E-1 -7 -> 1 |
| ddcms327 comparesig 8.0 -7E+0 -> 1 |
| ddcms328 comparesig 8.0 -70E-1 -> 1 |
| ddcms329 comparesig 8 -.7E+1 -> 1 |
| ddcms330 comparesig 8 -70E-1 -> 1 |
| |
| ddcms340 comparesig 8.0 -9.0 -> 1 |
| ddcms341 comparesig 8.0 -9 -> 1 |
| ddcms342 comparesig 8 -9.0 -> 1 |
| ddcms343 comparesig 8E+0 -9.0 -> 1 |
| ddcms344 comparesig 80E-1 -9.0 -> 1 |
| ddcms345 comparesig .8E+1 -9 -> 1 |
| ddcms346 comparesig 80E-1 -9 -> 1 |
| ddcms347 comparesig 8.0 -9E+0 -> 1 |
| ddcms348 comparesig 8.0 -90E-1 -> 1 |
| ddcms349 comparesig 8 -.9E+1 -> 1 |
| ddcms350 comparesig 8 -90E-1 -> 1 |
| |
| -- and again, with sign changes -- .. |
| ddcms400 comparesig -7.0 -7.0 -> 0 |
| ddcms401 comparesig -7.0 -7 -> 0 |
| ddcms402 comparesig -7 -7.0 -> 0 |
| ddcms403 comparesig -7E+0 -7.0 -> 0 |
| ddcms404 comparesig -70E-1 -7.0 -> 0 |
| ddcms405 comparesig -.7E+1 -7 -> 0 |
| ddcms406 comparesig -70E-1 -7 -> 0 |
| ddcms407 comparesig -7.0 -7E+0 -> 0 |
| ddcms408 comparesig -7.0 -70E-1 -> 0 |
| ddcms409 comparesig -7 -.7E+1 -> 0 |
| ddcms410 comparesig -7 -70E-1 -> 0 |
| |
| ddcms420 comparesig -8.0 -7.0 -> -1 |
| ddcms421 comparesig -8.0 -7 -> -1 |
| ddcms422 comparesig -8 -7.0 -> -1 |
| ddcms423 comparesig -8E+0 -7.0 -> -1 |
| ddcms424 comparesig -80E-1 -7.0 -> -1 |
| ddcms425 comparesig -.8E+1 -7 -> -1 |
| ddcms426 comparesig -80E-1 -7 -> -1 |
| ddcms427 comparesig -8.0 -7E+0 -> -1 |
| ddcms428 comparesig -8.0 -70E-1 -> -1 |
| ddcms429 comparesig -8 -.7E+1 -> -1 |
| ddcms430 comparesig -8 -70E-1 -> -1 |
| |
| ddcms440 comparesig -8.0 -9.0 -> 1 |
| ddcms441 comparesig -8.0 -9 -> 1 |
| ddcms442 comparesig -8 -9.0 -> 1 |
| ddcms443 comparesig -8E+0 -9.0 -> 1 |
| ddcms444 comparesig -80E-1 -9.0 -> 1 |
| ddcms445 comparesig -.8E+1 -9 -> 1 |
| ddcms446 comparesig -80E-1 -9 -> 1 |
| ddcms447 comparesig -8.0 -9E+0 -> 1 |
| ddcms448 comparesig -8.0 -90E-1 -> 1 |
| ddcms449 comparesig -8 -.9E+1 -> 1 |
| ddcms450 comparesig -8 -90E-1 -> 1 |
| |
| |
| -- testcases that subtract to lots of zeros at boundaries [pgr] |
| ddcms473 comparesig 123.4560000000000E-89 123.456E-89 -> 0 |
| ddcms474 comparesig 123.456000000000E+89 123.456E+89 -> 0 |
| ddcms475 comparesig 123.45600000000E-89 123.456E-89 -> 0 |
| ddcms476 comparesig 123.4560000000E+89 123.456E+89 -> 0 |
| ddcms477 comparesig 123.456000000E-89 123.456E-89 -> 0 |
| ddcms478 comparesig 123.45600000E+89 123.456E+89 -> 0 |
| ddcms479 comparesig 123.4560000E-89 123.456E-89 -> 0 |
| ddcms480 comparesig 123.456000E+89 123.456E+89 -> 0 |
| ddcms481 comparesig 123.45600E-89 123.456E-89 -> 0 |
| ddcms482 comparesig 123.4560E+89 123.456E+89 -> 0 |
| ddcms483 comparesig 123.456E-89 123.456E-89 -> 0 |
| ddcms487 comparesig 123.456E+89 123.4560000000000E+89 -> 0 |
| ddcms488 comparesig 123.456E-89 123.456000000000E-89 -> 0 |
| ddcms489 comparesig 123.456E+89 123.45600000000E+89 -> 0 |
| ddcms490 comparesig 123.456E-89 123.4560000000E-89 -> 0 |
| ddcms491 comparesig 123.456E+89 123.456000000E+89 -> 0 |
| ddcms492 comparesig 123.456E-89 123.45600000E-89 -> 0 |
| ddcms493 comparesig 123.456E+89 123.4560000E+89 -> 0 |
| ddcms494 comparesig 123.456E-89 123.456000E-89 -> 0 |
| ddcms495 comparesig 123.456E+89 123.45600E+89 -> 0 |
| ddcms496 comparesig 123.456E-89 123.4560E-89 -> 0 |
| ddcms497 comparesig 123.456E+89 123.456E+89 -> 0 |
| |
| -- wide-ranging, around precision; signs equal |
| ddcms500 comparesig 1 1E-15 -> 1 |
| ddcms501 comparesig 1 1E-14 -> 1 |
| ddcms502 comparesig 1 1E-13 -> 1 |
| ddcms503 comparesig 1 1E-12 -> 1 |
| ddcms504 comparesig 1 1E-11 -> 1 |
| ddcms505 comparesig 1 1E-10 -> 1 |
| ddcms506 comparesig 1 1E-9 -> 1 |
| ddcms507 comparesig 1 1E-8 -> 1 |
| ddcms508 comparesig 1 1E-7 -> 1 |
| ddcms509 comparesig 1 1E-6 -> 1 |
| ddcms510 comparesig 1 1E-5 -> 1 |
| ddcms511 comparesig 1 1E-4 -> 1 |
| ddcms512 comparesig 1 1E-3 -> 1 |
| ddcms513 comparesig 1 1E-2 -> 1 |
| ddcms514 comparesig 1 1E-1 -> 1 |
| ddcms515 comparesig 1 1E-0 -> 0 |
| ddcms516 comparesig 1 1E+1 -> -1 |
| ddcms517 comparesig 1 1E+2 -> -1 |
| ddcms518 comparesig 1 1E+3 -> -1 |
| ddcms519 comparesig 1 1E+4 -> -1 |
| ddcms521 comparesig 1 1E+5 -> -1 |
| ddcms522 comparesig 1 1E+6 -> -1 |
| ddcms523 comparesig 1 1E+7 -> -1 |
| ddcms524 comparesig 1 1E+8 -> -1 |
| ddcms525 comparesig 1 1E+9 -> -1 |
| ddcms526 comparesig 1 1E+10 -> -1 |
| ddcms527 comparesig 1 1E+11 -> -1 |
| ddcms528 comparesig 1 1E+12 -> -1 |
| ddcms529 comparesig 1 1E+13 -> -1 |
| ddcms530 comparesig 1 1E+14 -> -1 |
| ddcms531 comparesig 1 1E+15 -> -1 |
| -- LR swap |
| ddcms540 comparesig 1E-15 1 -> -1 |
| ddcms541 comparesig 1E-14 1 -> -1 |
| ddcms542 comparesig 1E-13 1 -> -1 |
| ddcms543 comparesig 1E-12 1 -> -1 |
| ddcms544 comparesig 1E-11 1 -> -1 |
| ddcms545 comparesig 1E-10 1 -> -1 |
| ddcms546 comparesig 1E-9 1 -> -1 |
| ddcms547 comparesig 1E-8 1 -> -1 |
| ddcms548 comparesig 1E-7 1 -> -1 |
| ddcms549 comparesig 1E-6 1 -> -1 |
| ddcms550 comparesig 1E-5 1 -> -1 |
| ddcms551 comparesig 1E-4 1 -> -1 |
| ddcms552 comparesig 1E-3 1 -> -1 |
| ddcms553 comparesig 1E-2 1 -> -1 |
| ddcms554 comparesig 1E-1 1 -> -1 |
| ddcms555 comparesig 1E-0 1 -> 0 |
| ddcms556 comparesig 1E+1 1 -> 1 |
| ddcms557 comparesig 1E+2 1 -> 1 |
| ddcms558 comparesig 1E+3 1 -> 1 |
| ddcms559 comparesig 1E+4 1 -> 1 |
| ddcms561 comparesig 1E+5 1 -> 1 |
| ddcms562 comparesig 1E+6 1 -> 1 |
| ddcms563 comparesig 1E+7 1 -> 1 |
| ddcms564 comparesig 1E+8 1 -> 1 |
| ddcms565 comparesig 1E+9 1 -> 1 |
| ddcms566 comparesig 1E+10 1 -> 1 |
| ddcms567 comparesig 1E+11 1 -> 1 |
| ddcms568 comparesig 1E+12 1 -> 1 |
| ddcms569 comparesig 1E+13 1 -> 1 |
| ddcms570 comparesig 1E+14 1 -> 1 |
| ddcms571 comparesig 1E+15 1 -> 1 |
| -- similar with a useful coefficient, one side only |
| ddcms580 comparesig 0.000000987654321 1E-15 -> 1 |
| ddcms581 comparesig 0.000000987654321 1E-14 -> 1 |
| ddcms582 comparesig 0.000000987654321 1E-13 -> 1 |
| ddcms583 comparesig 0.000000987654321 1E-12 -> 1 |
| ddcms584 comparesig 0.000000987654321 1E-11 -> 1 |
| ddcms585 comparesig 0.000000987654321 1E-10 -> 1 |
| ddcms586 comparesig 0.000000987654321 1E-9 -> 1 |
| ddcms587 comparesig 0.000000987654321 1E-8 -> 1 |
| ddcms588 comparesig 0.000000987654321 1E-7 -> 1 |
| ddcms589 comparesig 0.000000987654321 1E-6 -> -1 |
| ddcms590 comparesig 0.000000987654321 1E-5 -> -1 |
| ddcms591 comparesig 0.000000987654321 1E-4 -> -1 |
| ddcms592 comparesig 0.000000987654321 1E-3 -> -1 |
| ddcms593 comparesig 0.000000987654321 1E-2 -> -1 |
| ddcms594 comparesig 0.000000987654321 1E-1 -> -1 |
| ddcms595 comparesig 0.000000987654321 1E-0 -> -1 |
| ddcms596 comparesig 0.000000987654321 1E+1 -> -1 |
| ddcms597 comparesig 0.000000987654321 1E+2 -> -1 |
| ddcms598 comparesig 0.000000987654321 1E+3 -> -1 |
| ddcms599 comparesig 0.000000987654321 1E+4 -> -1 |
| |
| -- check some unit-y traps |
| ddcms600 comparesig 12 12.2345 -> -1 |
| ddcms601 comparesig 12.0 12.2345 -> -1 |
| ddcms602 comparesig 12.00 12.2345 -> -1 |
| ddcms603 comparesig 12.000 12.2345 -> -1 |
| ddcms604 comparesig 12.0000 12.2345 -> -1 |
| ddcms605 comparesig 12.00000 12.2345 -> -1 |
| ddcms606 comparesig 12.000000 12.2345 -> -1 |
| ddcms607 comparesig 12.0000000 12.2345 -> -1 |
| ddcms608 comparesig 12.00000000 12.2345 -> -1 |
| ddcms609 comparesig 12.000000000 12.2345 -> -1 |
| ddcms610 comparesig 12.1234 12 -> 1 |
| ddcms611 comparesig 12.1234 12.0 -> 1 |
| ddcms612 comparesig 12.1234 12.00 -> 1 |
| ddcms613 comparesig 12.1234 12.000 -> 1 |
| ddcms614 comparesig 12.1234 12.0000 -> 1 |
| ddcms615 comparesig 12.1234 12.00000 -> 1 |
| ddcms616 comparesig 12.1234 12.000000 -> 1 |
| ddcms617 comparesig 12.1234 12.0000000 -> 1 |
| ddcms618 comparesig 12.1234 12.00000000 -> 1 |
| ddcms619 comparesig 12.1234 12.000000000 -> 1 |
| ddcms620 comparesig -12 -12.2345 -> 1 |
| ddcms621 comparesig -12.0 -12.2345 -> 1 |
| ddcms622 comparesig -12.00 -12.2345 -> 1 |
| ddcms623 comparesig -12.000 -12.2345 -> 1 |
| ddcms624 comparesig -12.0000 -12.2345 -> 1 |
| ddcms625 comparesig -12.00000 -12.2345 -> 1 |
| ddcms626 comparesig -12.000000 -12.2345 -> 1 |
| ddcms627 comparesig -12.0000000 -12.2345 -> 1 |
| ddcms628 comparesig -12.00000000 -12.2345 -> 1 |
| ddcms629 comparesig -12.000000000 -12.2345 -> 1 |
| ddcms630 comparesig -12.1234 -12 -> -1 |
| ddcms631 comparesig -12.1234 -12.0 -> -1 |
| ddcms632 comparesig -12.1234 -12.00 -> -1 |
| ddcms633 comparesig -12.1234 -12.000 -> -1 |
| ddcms634 comparesig -12.1234 -12.0000 -> -1 |
| ddcms635 comparesig -12.1234 -12.00000 -> -1 |
| ddcms636 comparesig -12.1234 -12.000000 -> -1 |
| ddcms637 comparesig -12.1234 -12.0000000 -> -1 |
| ddcms638 comparesig -12.1234 -12.00000000 -> -1 |
| ddcms639 comparesig -12.1234 -12.000000000 -> -1 |
| |
| -- extended zeros |
| ddcms640 comparesig 0 0 -> 0 |
| ddcms641 comparesig 0 -0 -> 0 |
| ddcms642 comparesig 0 -0.0 -> 0 |
| ddcms643 comparesig 0 0.0 -> 0 |
| ddcms644 comparesig -0 0 -> 0 |
| ddcms645 comparesig -0 -0 -> 0 |
| ddcms646 comparesig -0 -0.0 -> 0 |
| ddcms647 comparesig -0 0.0 -> 0 |
| ddcms648 comparesig 0.0 0 -> 0 |
| ddcms649 comparesig 0.0 -0 -> 0 |
| ddcms650 comparesig 0.0 -0.0 -> 0 |
| ddcms651 comparesig 0.0 0.0 -> 0 |
| ddcms652 comparesig -0.0 0 -> 0 |
| ddcms653 comparesig -0.0 -0 -> 0 |
| ddcms654 comparesig -0.0 -0.0 -> 0 |
| ddcms655 comparesig -0.0 0.0 -> 0 |
| |
| ddcms656 comparesig -0E1 0.0 -> 0 |
| ddcms657 comparesig -0E2 0.0 -> 0 |
| ddcms658 comparesig 0E1 0.0 -> 0 |
| ddcms659 comparesig 0E2 0.0 -> 0 |
| ddcms660 comparesig -0E1 0 -> 0 |
| ddcms661 comparesig -0E2 0 -> 0 |
| ddcms662 comparesig 0E1 0 -> 0 |
| ddcms663 comparesig 0E2 0 -> 0 |
| ddcms664 comparesig -0E1 -0E1 -> 0 |
| ddcms665 comparesig -0E2 -0E1 -> 0 |
| ddcms666 comparesig 0E1 -0E1 -> 0 |
| ddcms667 comparesig 0E2 -0E1 -> 0 |
| ddcms668 comparesig -0E1 -0E2 -> 0 |
| ddcms669 comparesig -0E2 -0E2 -> 0 |
| ddcms670 comparesig 0E1 -0E2 -> 0 |
| ddcms671 comparesig 0E2 -0E2 -> 0 |
| ddcms672 comparesig -0E1 0E1 -> 0 |
| ddcms673 comparesig -0E2 0E1 -> 0 |
| ddcms674 comparesig 0E1 0E1 -> 0 |
| ddcms675 comparesig 0E2 0E1 -> 0 |
| ddcms676 comparesig -0E1 0E2 -> 0 |
| ddcms677 comparesig -0E2 0E2 -> 0 |
| ddcms678 comparesig 0E1 0E2 -> 0 |
| ddcms679 comparesig 0E2 0E2 -> 0 |
| |
| -- trailing zeros; unit-y |
| ddcms680 comparesig 12 12 -> 0 |
| ddcms681 comparesig 12 12.0 -> 0 |
| ddcms682 comparesig 12 12.00 -> 0 |
| ddcms683 comparesig 12 12.000 -> 0 |
| ddcms684 comparesig 12 12.0000 -> 0 |
| ddcms685 comparesig 12 12.00000 -> 0 |
| ddcms686 comparesig 12 12.000000 -> 0 |
| ddcms687 comparesig 12 12.0000000 -> 0 |
| ddcms688 comparesig 12 12.00000000 -> 0 |
| ddcms689 comparesig 12 12.000000000 -> 0 |
| ddcms690 comparesig 12 12 -> 0 |
| ddcms691 comparesig 12.0 12 -> 0 |
| ddcms692 comparesig 12.00 12 -> 0 |
| ddcms693 comparesig 12.000 12 -> 0 |
| ddcms694 comparesig 12.0000 12 -> 0 |
| ddcms695 comparesig 12.00000 12 -> 0 |
| ddcms696 comparesig 12.000000 12 -> 0 |
| ddcms697 comparesig 12.0000000 12 -> 0 |
| ddcms698 comparesig 12.00000000 12 -> 0 |
| ddcms699 comparesig 12.000000000 12 -> 0 |
| |
| -- first, second, & last digit |
| ddcms700 comparesig 1234567890123456 1234567890123455 -> 1 |
| ddcms701 comparesig 1234567890123456 1234567890123456 -> 0 |
| ddcms702 comparesig 1234567890123456 1234567890123457 -> -1 |
| ddcms703 comparesig 1234567890123456 0234567890123456 -> 1 |
| ddcms704 comparesig 1234567890123456 1234567890123456 -> 0 |
| ddcms705 comparesig 1234567890123456 2234567890123456 -> -1 |
| ddcms706 comparesig 1134567890123456 1034567890123456 -> 1 |
| ddcms707 comparesig 1134567890123456 1134567890123456 -> 0 |
| ddcms708 comparesig 1134567890123456 1234567890123456 -> -1 |
| |
| -- miscellaneous |
| ddcms721 comparesig 12345678000 1 -> 1 |
| ddcms722 comparesig 1 12345678000 -> -1 |
| ddcms723 comparesig 1234567800 1 -> 1 |
| ddcms724 comparesig 1 1234567800 -> -1 |
| ddcms725 comparesig 1234567890 1 -> 1 |
| ddcms726 comparesig 1 1234567890 -> -1 |
| ddcms727 comparesig 1234567891 1 -> 1 |
| ddcms728 comparesig 1 1234567891 -> -1 |
| ddcms729 comparesig 12345678901 1 -> 1 |
| ddcms730 comparesig 1 12345678901 -> -1 |
| ddcms731 comparesig 1234567896 1 -> 1 |
| ddcms732 comparesig 1 1234567896 -> -1 |
| |
| -- residue cases at lower precision |
| ddcms740 comparesig 1 0.9999999 -> 1 |
| ddcms741 comparesig 1 0.999999 -> 1 |
| ddcms742 comparesig 1 0.99999 -> 1 |
| ddcms743 comparesig 1 1.0000 -> 0 |
| ddcms744 comparesig 1 1.00001 -> -1 |
| ddcms745 comparesig 1 1.000001 -> -1 |
| ddcms746 comparesig 1 1.0000001 -> -1 |
| ddcms750 comparesig 0.9999999 1 -> -1 |
| ddcms751 comparesig 0.999999 1 -> -1 |
| ddcms752 comparesig 0.99999 1 -> -1 |
| ddcms753 comparesig 1.0000 1 -> 0 |
| ddcms754 comparesig 1.00001 1 -> 1 |
| ddcms755 comparesig 1.000001 1 -> 1 |
| ddcms756 comparesig 1.0000001 1 -> 1 |
| |
| -- Specials |
| ddcms780 comparesig Inf -Inf -> 1 |
| ddcms781 comparesig Inf -1000 -> 1 |
| ddcms782 comparesig Inf -1 -> 1 |
| ddcms783 comparesig Inf -0 -> 1 |
| ddcms784 comparesig Inf 0 -> 1 |
| ddcms785 comparesig Inf 1 -> 1 |
| ddcms786 comparesig Inf 1000 -> 1 |
| ddcms787 comparesig Inf Inf -> 0 |
| ddcms788 comparesig -1000 Inf -> -1 |
| ddcms789 comparesig -Inf Inf -> -1 |
| ddcms790 comparesig -1 Inf -> -1 |
| ddcms791 comparesig -0 Inf -> -1 |
| ddcms792 comparesig 0 Inf -> -1 |
| ddcms793 comparesig 1 Inf -> -1 |
| ddcms794 comparesig 1000 Inf -> -1 |
| ddcms795 comparesig Inf Inf -> 0 |
| |
| ddcms800 comparesig -Inf -Inf -> 0 |
| ddcms801 comparesig -Inf -1000 -> -1 |
| ddcms802 comparesig -Inf -1 -> -1 |
| ddcms803 comparesig -Inf -0 -> -1 |
| ddcms804 comparesig -Inf 0 -> -1 |
| ddcms805 comparesig -Inf 1 -> -1 |
| ddcms806 comparesig -Inf 1000 -> -1 |
| ddcms807 comparesig -Inf Inf -> -1 |
| ddcms808 comparesig -Inf -Inf -> 0 |
| ddcms809 comparesig -1000 -Inf -> 1 |
| ddcms810 comparesig -1 -Inf -> 1 |
| ddcms811 comparesig -0 -Inf -> 1 |
| ddcms812 comparesig 0 -Inf -> 1 |
| ddcms813 comparesig 1 -Inf -> 1 |
| ddcms814 comparesig 1000 -Inf -> 1 |
| ddcms815 comparesig Inf -Inf -> 1 |
| |
| ddcms821 comparesig NaN -Inf -> NaN Invalid_operation |
| ddcms822 comparesig NaN -1000 -> NaN Invalid_operation |
| ddcms823 comparesig NaN -1 -> NaN Invalid_operation |
| ddcms824 comparesig NaN -0 -> NaN Invalid_operation |
| ddcms825 comparesig NaN 0 -> NaN Invalid_operation |
| ddcms826 comparesig NaN 1 -> NaN Invalid_operation |
| ddcms827 comparesig NaN 1000 -> NaN Invalid_operation |
| ddcms828 comparesig NaN Inf -> NaN Invalid_operation |
| ddcms829 comparesig NaN NaN -> NaN Invalid_operation |
| ddcms830 comparesig -Inf NaN -> NaN Invalid_operation |
| ddcms831 comparesig -1000 NaN -> NaN Invalid_operation |
| ddcms832 comparesig -1 NaN -> NaN Invalid_operation |
| ddcms833 comparesig -0 NaN -> NaN Invalid_operation |
| ddcms834 comparesig 0 NaN -> NaN Invalid_operation |
| ddcms835 comparesig 1 NaN -> NaN Invalid_operation |
| ddcms836 comparesig 1000 NaN -> NaN Invalid_operation |
| ddcms837 comparesig Inf NaN -> NaN Invalid_operation |
| ddcms838 comparesig -NaN -NaN -> -NaN Invalid_operation |
| ddcms839 comparesig +NaN -NaN -> NaN Invalid_operation |
| ddcms840 comparesig -NaN +NaN -> -NaN Invalid_operation |
| |
| ddcms841 comparesig sNaN -Inf -> NaN Invalid_operation |
| ddcms842 comparesig sNaN -1000 -> NaN Invalid_operation |
| ddcms843 comparesig sNaN -1 -> NaN Invalid_operation |
| ddcms844 comparesig sNaN -0 -> NaN Invalid_operation |
| ddcms845 comparesig sNaN 0 -> NaN Invalid_operation |
| ddcms846 comparesig sNaN 1 -> NaN Invalid_operation |
| ddcms847 comparesig sNaN 1000 -> NaN Invalid_operation |
| ddcms848 comparesig sNaN NaN -> NaN Invalid_operation |
| ddcms849 comparesig sNaN sNaN -> NaN Invalid_operation |
| ddcms850 comparesig NaN sNaN -> NaN Invalid_operation |
| ddcms851 comparesig -Inf sNaN -> NaN Invalid_operation |
| ddcms852 comparesig -1000 sNaN -> NaN Invalid_operation |
| ddcms853 comparesig -1 sNaN -> NaN Invalid_operation |
| ddcms854 comparesig -0 sNaN -> NaN Invalid_operation |
| ddcms855 comparesig 0 sNaN -> NaN Invalid_operation |
| ddcms856 comparesig 1 sNaN -> NaN Invalid_operation |
| ddcms857 comparesig 1000 sNaN -> NaN Invalid_operation |
| ddcms858 comparesig Inf sNaN -> NaN Invalid_operation |
| ddcms859 comparesig NaN sNaN -> NaN Invalid_operation |
| |
| -- propagating NaNs |
| ddcms860 comparesig NaN9 -Inf -> NaN9 Invalid_operation |
| ddcms861 comparesig NaN8 999 -> NaN8 Invalid_operation |
| ddcms862 comparesig NaN77 Inf -> NaN77 Invalid_operation |
| ddcms863 comparesig -NaN67 NaN5 -> -NaN67 Invalid_operation |
| ddcms864 comparesig -Inf -NaN4 -> -NaN4 Invalid_operation |
| ddcms865 comparesig -999 -NaN33 -> -NaN33 Invalid_operation |
| ddcms866 comparesig Inf NaN2 -> NaN2 Invalid_operation |
| ddcms867 comparesig -NaN41 -NaN42 -> -NaN41 Invalid_operation |
| ddcms868 comparesig +NaN41 -NaN42 -> NaN41 Invalid_operation |
| ddcms869 comparesig -NaN41 +NaN42 -> -NaN41 Invalid_operation |
| ddcms870 comparesig +NaN41 +NaN42 -> NaN41 Invalid_operation |
| |
| ddcms871 comparesig -sNaN99 -Inf -> -NaN99 Invalid_operation |
| ddcms872 comparesig sNaN98 -11 -> NaN98 Invalid_operation |
| ddcms873 comparesig sNaN97 NaN -> NaN97 Invalid_operation |
| ddcms874 comparesig sNaN16 sNaN94 -> NaN16 Invalid_operation |
| ddcms875 comparesig NaN85 sNaN83 -> NaN83 Invalid_operation |
| ddcms876 comparesig -Inf sNaN92 -> NaN92 Invalid_operation |
| ddcms877 comparesig 088 sNaN81 -> NaN81 Invalid_operation |
| ddcms878 comparesig Inf sNaN90 -> NaN90 Invalid_operation |
| ddcms879 comparesig NaN -sNaN89 -> -NaN89 Invalid_operation |
| |
| -- wide range |
| ddcms880 comparesig +1.23456789012345E-0 9E+384 -> -1 |
| ddcms881 comparesig 9E+384 +1.23456789012345E-0 -> 1 |
| ddcms882 comparesig +0.100 9E-383 -> 1 |
| ddcms883 comparesig 9E-383 +0.100 -> -1 |
| ddcms885 comparesig -1.23456789012345E-0 9E+384 -> -1 |
| ddcms886 comparesig 9E+384 -1.23456789012345E-0 -> 1 |
| ddcms887 comparesig -0.100 9E-383 -> -1 |
| ddcms888 comparesig 9E-383 -0.100 -> 1 |
| |
| -- signs |
| ddcms901 comparesig 1e+77 1e+11 -> 1 |
| ddcms902 comparesig 1e+77 -1e+11 -> 1 |
| ddcms903 comparesig -1e+77 1e+11 -> -1 |
| ddcms904 comparesig -1e+77 -1e+11 -> -1 |
| ddcms905 comparesig 1e-77 1e-11 -> -1 |
| ddcms906 comparesig 1e-77 -1e-11 -> 1 |
| ddcms907 comparesig -1e-77 1e-11 -> -1 |
| ddcms908 comparesig -1e-77 -1e-11 -> 1 |
| |
| -- Null tests |
| ddcms990 comparesig 10 # -> NaN Invalid_operation |
| ddcms991 comparesig # 10 -> NaN Invalid_operation |
