| ------------------------------------------------------------------------ |
| -- dqCompareTotalMag.decTest -- decQuad comparison; abs. total order -- |
| -- 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). |
| -- Similarly, comparetotal will have some radically different paths |
| -- than compare. |
| |
| -- All operands and results are decQuads. |
| extended: 1 |
| clamp: 1 |
| precision: 34 |
| maxExponent: 6144 |
| minExponent: -6143 |
| rounding: half_even |
| |
| -- sanity checks |
| dqctm001 comparetotmag -2 -2 -> 0 |
| dqctm002 comparetotmag -2 -1 -> 1 |
| dqctm003 comparetotmag -2 0 -> 1 |
| dqctm004 comparetotmag -2 1 -> 1 |
| dqctm005 comparetotmag -2 2 -> 0 |
| dqctm006 comparetotmag -1 -2 -> -1 |
| dqctm007 comparetotmag -1 -1 -> 0 |
| dqctm008 comparetotmag -1 0 -> 1 |
| dqctm009 comparetotmag -1 1 -> 0 |
| dqctm010 comparetotmag -1 2 -> -1 |
| dqctm011 comparetotmag 0 -2 -> -1 |
| dqctm012 comparetotmag 0 -1 -> -1 |
| dqctm013 comparetotmag 0 0 -> 0 |
| dqctm014 comparetotmag 0 1 -> -1 |
| dqctm015 comparetotmag 0 2 -> -1 |
| dqctm016 comparetotmag 1 -2 -> -1 |
| dqctm017 comparetotmag 1 -1 -> 0 |
| dqctm018 comparetotmag 1 0 -> 1 |
| dqctm019 comparetotmag 1 1 -> 0 |
| dqctm020 comparetotmag 1 2 -> -1 |
| dqctm021 comparetotmag 2 -2 -> 0 |
| dqctm022 comparetotmag 2 -1 -> 1 |
| dqctm023 comparetotmag 2 0 -> 1 |
| dqctm025 comparetotmag 2 1 -> 1 |
| dqctm026 comparetotmag 2 2 -> 0 |
| |
| dqctm031 comparetotmag -20 -20 -> 0 |
| dqctm032 comparetotmag -20 -10 -> 1 |
| dqctm033 comparetotmag -20 00 -> 1 |
| dqctm034 comparetotmag -20 10 -> 1 |
| dqctm035 comparetotmag -20 20 -> 0 |
| dqctm036 comparetotmag -10 -20 -> -1 |
| dqctm037 comparetotmag -10 -10 -> 0 |
| dqctm038 comparetotmag -10 00 -> 1 |
| dqctm039 comparetotmag -10 10 -> 0 |
| dqctm040 comparetotmag -10 20 -> -1 |
| dqctm041 comparetotmag 00 -20 -> -1 |
| dqctm042 comparetotmag 00 -10 -> -1 |
| dqctm043 comparetotmag 00 00 -> 0 |
| dqctm044 comparetotmag 00 10 -> -1 |
| dqctm045 comparetotmag 00 20 -> -1 |
| dqctm046 comparetotmag 10 -20 -> -1 |
| dqctm047 comparetotmag 10 -10 -> 0 |
| dqctm048 comparetotmag 10 00 -> 1 |
| dqctm049 comparetotmag 10 10 -> 0 |
| dqctm050 comparetotmag 10 20 -> -1 |
| dqctm051 comparetotmag 20 -20 -> 0 |
| dqctm052 comparetotmag 20 -10 -> 1 |
| dqctm053 comparetotmag 20 00 -> 1 |
| dqctm055 comparetotmag 20 10 -> 1 |
| dqctm056 comparetotmag 20 20 -> 0 |
| |
| dqctm061 comparetotmag -2.0 -2.0 -> 0 |
| dqctm062 comparetotmag -2.0 -1.0 -> 1 |
| dqctm063 comparetotmag -2.0 0.0 -> 1 |
| dqctm064 comparetotmag -2.0 1.0 -> 1 |
| dqctm065 comparetotmag -2.0 2.0 -> 0 |
| dqctm066 comparetotmag -1.0 -2.0 -> -1 |
| dqctm067 comparetotmag -1.0 -1.0 -> 0 |
| dqctm068 comparetotmag -1.0 0.0 -> 1 |
| dqctm069 comparetotmag -1.0 1.0 -> 0 |
| dqctm070 comparetotmag -1.0 2.0 -> -1 |
| dqctm071 comparetotmag 0.0 -2.0 -> -1 |
| dqctm072 comparetotmag 0.0 -1.0 -> -1 |
| dqctm073 comparetotmag 0.0 0.0 -> 0 |
| dqctm074 comparetotmag 0.0 1.0 -> -1 |
| dqctm075 comparetotmag 0.0 2.0 -> -1 |
| dqctm076 comparetotmag 1.0 -2.0 -> -1 |
| dqctm077 comparetotmag 1.0 -1.0 -> 0 |
| dqctm078 comparetotmag 1.0 0.0 -> 1 |
| dqctm079 comparetotmag 1.0 1.0 -> 0 |
| dqctm080 comparetotmag 1.0 2.0 -> -1 |
| dqctm081 comparetotmag 2.0 -2.0 -> 0 |
| dqctm082 comparetotmag 2.0 -1.0 -> 1 |
| dqctm083 comparetotmag 2.0 0.0 -> 1 |
| dqctm085 comparetotmag 2.0 1.0 -> 1 |
| dqctm086 comparetotmag 2.0 2.0 -> 0 |
| |
| -- now some cases which might overflow if subtract were used |
| dqctm090 comparetotmag 9.99999999999999999999999999999E+6144 9.99999999999999999999999999999E+6144 -> 0 |
| dqctm091 comparetotmag -9.99999999999999999999999999999E+6144 9.99999999999999999999999999999E+6144 -> 0 |
| dqctm092 comparetotmag 9.99999999999999999999999999999E+6144 -9.99999999999999999999999999999E+6144 -> 0 |
| dqctm093 comparetotmag -9.99999999999999999999999999999E+6144 -9.99999999999999999999999999999E+6144 -> 0 |
| |
| -- some differing length/exponent cases |
| -- in this first group, compare would compare all equal |
| dqctm100 comparetotmag 7.0 7.0 -> 0 |
| dqctm101 comparetotmag 7.0 7 -> -1 |
| dqctm102 comparetotmag 7 7.0 -> 1 |
| dqctm103 comparetotmag 7E+0 7.0 -> 1 |
| dqctm104 comparetotmag 70E-1 7.0 -> 0 |
| dqctm105 comparetotmag 0.7E+1 7 -> 0 |
| dqctm106 comparetotmag 70E-1 7 -> -1 |
| dqctm107 comparetotmag 7.0 7E+0 -> -1 |
| dqctm108 comparetotmag 7.0 70E-1 -> 0 |
| dqctm109 comparetotmag 7 0.7E+1 -> 0 |
| dqctm110 comparetotmag 7 70E-1 -> 1 |
| |
| dqctm120 comparetotmag 8.0 7.0 -> 1 |
| dqctm121 comparetotmag 8.0 7 -> 1 |
| dqctm122 comparetotmag 8 7.0 -> 1 |
| dqctm123 comparetotmag 8E+0 7.0 -> 1 |
| dqctm124 comparetotmag 80E-1 7.0 -> 1 |
| dqctm125 comparetotmag 0.8E+1 7 -> 1 |
| dqctm126 comparetotmag 80E-1 7 -> 1 |
| dqctm127 comparetotmag 8.0 7E+0 -> 1 |
| dqctm128 comparetotmag 8.0 70E-1 -> 1 |
| dqctm129 comparetotmag 8 0.7E+1 -> 1 |
| dqctm130 comparetotmag 8 70E-1 -> 1 |
| |
| dqctm140 comparetotmag 8.0 9.0 -> -1 |
| dqctm141 comparetotmag 8.0 9 -> -1 |
| dqctm142 comparetotmag 8 9.0 -> -1 |
| dqctm143 comparetotmag 8E+0 9.0 -> -1 |
| dqctm144 comparetotmag 80E-1 9.0 -> -1 |
| dqctm145 comparetotmag 0.8E+1 9 -> -1 |
| dqctm146 comparetotmag 80E-1 9 -> -1 |
| dqctm147 comparetotmag 8.0 9E+0 -> -1 |
| dqctm148 comparetotmag 8.0 90E-1 -> -1 |
| dqctm149 comparetotmag 8 0.9E+1 -> -1 |
| dqctm150 comparetotmag 8 90E-1 -> -1 |
| |
| -- and again, with sign changes -+ .. |
| dqctm200 comparetotmag -7.0 7.0 -> 0 |
| dqctm201 comparetotmag -7.0 7 -> -1 |
| dqctm202 comparetotmag -7 7.0 -> 1 |
| dqctm203 comparetotmag -7E+0 7.0 -> 1 |
| dqctm204 comparetotmag -70E-1 7.0 -> 0 |
| dqctm205 comparetotmag -0.7E+1 7 -> 0 |
| dqctm206 comparetotmag -70E-1 7 -> -1 |
| dqctm207 comparetotmag -7.0 7E+0 -> -1 |
| dqctm208 comparetotmag -7.0 70E-1 -> 0 |
| dqctm209 comparetotmag -7 0.7E+1 -> 0 |
| dqctm210 comparetotmag -7 70E-1 -> 1 |
| |
| dqctm220 comparetotmag -8.0 7.0 -> 1 |
| dqctm221 comparetotmag -8.0 7 -> 1 |
| dqctm222 comparetotmag -8 7.0 -> 1 |
| dqctm223 comparetotmag -8E+0 7.0 -> 1 |
| dqctm224 comparetotmag -80E-1 7.0 -> 1 |
| dqctm225 comparetotmag -0.8E+1 7 -> 1 |
| dqctm226 comparetotmag -80E-1 7 -> 1 |
| dqctm227 comparetotmag -8.0 7E+0 -> 1 |
| dqctm228 comparetotmag -8.0 70E-1 -> 1 |
| dqctm229 comparetotmag -8 0.7E+1 -> 1 |
| dqctm230 comparetotmag -8 70E-1 -> 1 |
| |
| dqctm240 comparetotmag -8.0 9.0 -> -1 |
| dqctm241 comparetotmag -8.0 9 -> -1 |
| dqctm242 comparetotmag -8 9.0 -> -1 |
| dqctm243 comparetotmag -8E+0 9.0 -> -1 |
| dqctm244 comparetotmag -80E-1 9.0 -> -1 |
| dqctm245 comparetotmag -0.8E+1 9 -> -1 |
| dqctm246 comparetotmag -80E-1 9 -> -1 |
| dqctm247 comparetotmag -8.0 9E+0 -> -1 |
| dqctm248 comparetotmag -8.0 90E-1 -> -1 |
| dqctm249 comparetotmag -8 0.9E+1 -> -1 |
| dqctm250 comparetotmag -8 90E-1 -> -1 |
| |
| -- and again, with sign changes +- .. |
| dqctm300 comparetotmag 7.0 -7.0 -> 0 |
| dqctm301 comparetotmag 7.0 -7 -> -1 |
| dqctm302 comparetotmag 7 -7.0 -> 1 |
| dqctm303 comparetotmag 7E+0 -7.0 -> 1 |
| dqctm304 comparetotmag 70E-1 -7.0 -> 0 |
| dqctm305 comparetotmag .7E+1 -7 -> 0 |
| dqctm306 comparetotmag 70E-1 -7 -> -1 |
| dqctm307 comparetotmag 7.0 -7E+0 -> -1 |
| dqctm308 comparetotmag 7.0 -70E-1 -> 0 |
| dqctm309 comparetotmag 7 -.7E+1 -> 0 |
| dqctm310 comparetotmag 7 -70E-1 -> 1 |
| |
| dqctm320 comparetotmag 8.0 -7.0 -> 1 |
| dqctm321 comparetotmag 8.0 -7 -> 1 |
| dqctm322 comparetotmag 8 -7.0 -> 1 |
| dqctm323 comparetotmag 8E+0 -7.0 -> 1 |
| dqctm324 comparetotmag 80E-1 -7.0 -> 1 |
| dqctm325 comparetotmag .8E+1 -7 -> 1 |
| dqctm326 comparetotmag 80E-1 -7 -> 1 |
| dqctm327 comparetotmag 8.0 -7E+0 -> 1 |
| dqctm328 comparetotmag 8.0 -70E-1 -> 1 |
| dqctm329 comparetotmag 8 -.7E+1 -> 1 |
| dqctm330 comparetotmag 8 -70E-1 -> 1 |
| |
| dqctm340 comparetotmag 8.0 -9.0 -> -1 |
| dqctm341 comparetotmag 8.0 -9 -> -1 |
| dqctm342 comparetotmag 8 -9.0 -> -1 |
| dqctm343 comparetotmag 8E+0 -9.0 -> -1 |
| dqctm344 comparetotmag 80E-1 -9.0 -> -1 |
| dqctm345 comparetotmag .8E+1 -9 -> -1 |
| dqctm346 comparetotmag 80E-1 -9 -> -1 |
| dqctm347 comparetotmag 8.0 -9E+0 -> -1 |
| dqctm348 comparetotmag 8.0 -90E-1 -> -1 |
| dqctm349 comparetotmag 8 -.9E+1 -> -1 |
| dqctm350 comparetotmag 8 -90E-1 -> -1 |
| |
| -- and again, with sign changes -- .. |
| dqctm400 comparetotmag -7.0 -7.0 -> 0 |
| dqctm401 comparetotmag -7.0 -7 -> -1 |
| dqctm402 comparetotmag -7 -7.0 -> 1 |
| dqctm403 comparetotmag -7E+0 -7.0 -> 1 |
| dqctm404 comparetotmag -70E-1 -7.0 -> 0 |
| dqctm405 comparetotmag -.7E+1 -7 -> 0 |
| dqctm406 comparetotmag -70E-1 -7 -> -1 |
| dqctm407 comparetotmag -7.0 -7E+0 -> -1 |
| dqctm408 comparetotmag -7.0 -70E-1 -> 0 |
| dqctm409 comparetotmag -7 -.7E+1 -> 0 |
| dqctm410 comparetotmag -7 -70E-1 -> 1 |
| |
| dqctm420 comparetotmag -8.0 -7.0 -> 1 |
| dqctm421 comparetotmag -8.0 -7 -> 1 |
| dqctm422 comparetotmag -8 -7.0 -> 1 |
| dqctm423 comparetotmag -8E+0 -7.0 -> 1 |
| dqctm424 comparetotmag -80E-1 -7.0 -> 1 |
| dqctm425 comparetotmag -.8E+1 -7 -> 1 |
| dqctm426 comparetotmag -80E-1 -7 -> 1 |
| dqctm427 comparetotmag -8.0 -7E+0 -> 1 |
| dqctm428 comparetotmag -8.0 -70E-1 -> 1 |
| dqctm429 comparetotmag -8 -.7E+1 -> 1 |
| dqctm430 comparetotmag -8 -70E-1 -> 1 |
| |
| dqctm440 comparetotmag -8.0 -9.0 -> -1 |
| dqctm441 comparetotmag -8.0 -9 -> -1 |
| dqctm442 comparetotmag -8 -9.0 -> -1 |
| dqctm443 comparetotmag -8E+0 -9.0 -> -1 |
| dqctm444 comparetotmag -80E-1 -9.0 -> -1 |
| dqctm445 comparetotmag -.8E+1 -9 -> -1 |
| dqctm446 comparetotmag -80E-1 -9 -> -1 |
| dqctm447 comparetotmag -8.0 -9E+0 -> -1 |
| dqctm448 comparetotmag -8.0 -90E-1 -> -1 |
| dqctm449 comparetotmag -8 -.9E+1 -> -1 |
| dqctm450 comparetotmag -8 -90E-1 -> -1 |
| |
| |
| -- testcases that subtract to lots of zeros at boundaries [pgr] |
| dqctm473 comparetotmag 123.4560000000000E-89 123.456E-89 -> -1 |
| dqctm474 comparetotmag 123.456000000000E+89 123.456E+89 -> -1 |
| dqctm475 comparetotmag 123.45600000000E-89 123.456E-89 -> -1 |
| dqctm476 comparetotmag 123.4560000000E+89 123.456E+89 -> -1 |
| dqctm477 comparetotmag 123.456000000E-89 123.456E-89 -> -1 |
| dqctm478 comparetotmag 123.45600000E+89 123.456E+89 -> -1 |
| dqctm479 comparetotmag 123.4560000E-89 123.456E-89 -> -1 |
| dqctm480 comparetotmag 123.456000E+89 123.456E+89 -> -1 |
| dqctm481 comparetotmag 123.45600E-89 123.456E-89 -> -1 |
| dqctm482 comparetotmag 123.4560E+89 123.456E+89 -> -1 |
| dqctm483 comparetotmag 123.456E-89 123.456E-89 -> 0 |
| dqctm487 comparetotmag 123.456E+89 123.4560000000000E+89 -> 1 |
| dqctm488 comparetotmag 123.456E-89 123.456000000000E-89 -> 1 |
| dqctm489 comparetotmag 123.456E+89 123.45600000000E+89 -> 1 |
| dqctm490 comparetotmag 123.456E-89 123.4560000000E-89 -> 1 |
| dqctm491 comparetotmag 123.456E+89 123.456000000E+89 -> 1 |
| dqctm492 comparetotmag 123.456E-89 123.45600000E-89 -> 1 |
| dqctm493 comparetotmag 123.456E+89 123.4560000E+89 -> 1 |
| dqctm494 comparetotmag 123.456E-89 123.456000E-89 -> 1 |
| dqctm495 comparetotmag 123.456E+89 123.45600E+89 -> 1 |
| dqctm496 comparetotmag 123.456E-89 123.4560E-89 -> 1 |
| dqctm497 comparetotmag 123.456E+89 123.456E+89 -> 0 |
| |
| -- wide-ranging, around precision; signs equal |
| dqctm498 comparetotmag 1 1E-17 -> 1 |
| dqctm499 comparetotmag 1 1E-16 -> 1 |
| dqctm500 comparetotmag 1 1E-15 -> 1 |
| dqctm501 comparetotmag 1 1E-14 -> 1 |
| dqctm502 comparetotmag 1 1E-13 -> 1 |
| dqctm503 comparetotmag 1 1E-12 -> 1 |
| dqctm504 comparetotmag 1 1E-11 -> 1 |
| dqctm505 comparetotmag 1 1E-10 -> 1 |
| dqctm506 comparetotmag 1 1E-9 -> 1 |
| dqctm507 comparetotmag 1 1E-8 -> 1 |
| dqctm508 comparetotmag 1 1E-7 -> 1 |
| dqctm509 comparetotmag 1 1E-6 -> 1 |
| dqctm510 comparetotmag 1 1E-5 -> 1 |
| dqctm511 comparetotmag 1 1E-4 -> 1 |
| dqctm512 comparetotmag 1 1E-3 -> 1 |
| dqctm513 comparetotmag 1 1E-2 -> 1 |
| dqctm514 comparetotmag 1 1E-1 -> 1 |
| dqctm515 comparetotmag 1 1E-0 -> 0 |
| dqctm516 comparetotmag 1 1E+1 -> -1 |
| dqctm517 comparetotmag 1 1E+2 -> -1 |
| dqctm518 comparetotmag 1 1E+3 -> -1 |
| dqctm519 comparetotmag 1 1E+4 -> -1 |
| dqctm521 comparetotmag 1 1E+5 -> -1 |
| dqctm522 comparetotmag 1 1E+6 -> -1 |
| dqctm523 comparetotmag 1 1E+7 -> -1 |
| dqctm524 comparetotmag 1 1E+8 -> -1 |
| dqctm525 comparetotmag 1 1E+9 -> -1 |
| dqctm526 comparetotmag 1 1E+10 -> -1 |
| dqctm527 comparetotmag 1 1E+11 -> -1 |
| dqctm528 comparetotmag 1 1E+12 -> -1 |
| dqctm529 comparetotmag 1 1E+13 -> -1 |
| dqctm530 comparetotmag 1 1E+14 -> -1 |
| dqctm531 comparetotmag 1 1E+15 -> -1 |
| dqctm532 comparetotmag 1 1E+16 -> -1 |
| dqctm533 comparetotmag 1 1E+17 -> -1 |
| -- LR swap |
| dqctm538 comparetotmag 1E-17 1 -> -1 |
| dqctm539 comparetotmag 1E-16 1 -> -1 |
| dqctm540 comparetotmag 1E-15 1 -> -1 |
| dqctm541 comparetotmag 1E-14 1 -> -1 |
| dqctm542 comparetotmag 1E-13 1 -> -1 |
| dqctm543 comparetotmag 1E-12 1 -> -1 |
| dqctm544 comparetotmag 1E-11 1 -> -1 |
| dqctm545 comparetotmag 1E-10 1 -> -1 |
| dqctm546 comparetotmag 1E-9 1 -> -1 |
| dqctm547 comparetotmag 1E-8 1 -> -1 |
| dqctm548 comparetotmag 1E-7 1 -> -1 |
| dqctm549 comparetotmag 1E-6 1 -> -1 |
| dqctm550 comparetotmag 1E-5 1 -> -1 |
| dqctm551 comparetotmag 1E-4 1 -> -1 |
| dqctm552 comparetotmag 1E-3 1 -> -1 |
| dqctm553 comparetotmag 1E-2 1 -> -1 |
| dqctm554 comparetotmag 1E-1 1 -> -1 |
| dqctm555 comparetotmag 1E-0 1 -> 0 |
| dqctm556 comparetotmag 1E+1 1 -> 1 |
| dqctm557 comparetotmag 1E+2 1 -> 1 |
| dqctm558 comparetotmag 1E+3 1 -> 1 |
| dqctm559 comparetotmag 1E+4 1 -> 1 |
| dqctm561 comparetotmag 1E+5 1 -> 1 |
| dqctm562 comparetotmag 1E+6 1 -> 1 |
| dqctm563 comparetotmag 1E+7 1 -> 1 |
| dqctm564 comparetotmag 1E+8 1 -> 1 |
| dqctm565 comparetotmag 1E+9 1 -> 1 |
| dqctm566 comparetotmag 1E+10 1 -> 1 |
| dqctm567 comparetotmag 1E+11 1 -> 1 |
| dqctm568 comparetotmag 1E+12 1 -> 1 |
| dqctm569 comparetotmag 1E+13 1 -> 1 |
| dqctm570 comparetotmag 1E+14 1 -> 1 |
| dqctm571 comparetotmag 1E+15 1 -> 1 |
| dqctm572 comparetotmag 1E+16 1 -> 1 |
| dqctm573 comparetotmag 1E+17 1 -> 1 |
| -- similar with a useful coefficient, one side only |
| dqctm578 comparetotmag 0.000000987654321 1E-17 -> 1 |
| dqctm579 comparetotmag 0.000000987654321 1E-16 -> 1 |
| dqctm580 comparetotmag 0.000000987654321 1E-15 -> 1 |
| dqctm581 comparetotmag 0.000000987654321 1E-14 -> 1 |
| dqctm582 comparetotmag 0.000000987654321 1E-13 -> 1 |
| dqctm583 comparetotmag 0.000000987654321 1E-12 -> 1 |
| dqctm584 comparetotmag 0.000000987654321 1E-11 -> 1 |
| dqctm585 comparetotmag 0.000000987654321 1E-10 -> 1 |
| dqctm586 comparetotmag 0.000000987654321 1E-9 -> 1 |
| dqctm587 comparetotmag 0.000000987654321 1E-8 -> 1 |
| dqctm588 comparetotmag 0.000000987654321 1E-7 -> 1 |
| dqctm589 comparetotmag 0.000000987654321 1E-6 -> -1 |
| dqctm590 comparetotmag 0.000000987654321 1E-5 -> -1 |
| dqctm591 comparetotmag 0.000000987654321 1E-4 -> -1 |
| dqctm592 comparetotmag 0.000000987654321 1E-3 -> -1 |
| dqctm593 comparetotmag 0.000000987654321 1E-2 -> -1 |
| dqctm594 comparetotmag 0.000000987654321 1E-1 -> -1 |
| dqctm595 comparetotmag 0.000000987654321 1E-0 -> -1 |
| dqctm596 comparetotmag 0.000000987654321 1E+1 -> -1 |
| dqctm597 comparetotmag 0.000000987654321 1E+2 -> -1 |
| dqctm598 comparetotmag 0.000000987654321 1E+3 -> -1 |
| dqctm599 comparetotmag 0.000000987654321 1E+4 -> -1 |
| |
| -- check some unit-y traps |
| dqctm600 comparetotmag 12 12.2345 -> -1 |
| dqctm601 comparetotmag 12.0 12.2345 -> -1 |
| dqctm602 comparetotmag 12.00 12.2345 -> -1 |
| dqctm603 comparetotmag 12.000 12.2345 -> -1 |
| dqctm604 comparetotmag 12.0000 12.2345 -> -1 |
| dqctm605 comparetotmag 12.00000 12.2345 -> -1 |
| dqctm606 comparetotmag 12.000000 12.2345 -> -1 |
| dqctm607 comparetotmag 12.0000000 12.2345 -> -1 |
| dqctm608 comparetotmag 12.00000000 12.2345 -> -1 |
| dqctm609 comparetotmag 12.000000000 12.2345 -> -1 |
| dqctm610 comparetotmag 12.1234 12 -> 1 |
| dqctm611 comparetotmag 12.1234 12.0 -> 1 |
| dqctm612 comparetotmag 12.1234 12.00 -> 1 |
| dqctm613 comparetotmag 12.1234 12.000 -> 1 |
| dqctm614 comparetotmag 12.1234 12.0000 -> 1 |
| dqctm615 comparetotmag 12.1234 12.00000 -> 1 |
| dqctm616 comparetotmag 12.1234 12.000000 -> 1 |
| dqctm617 comparetotmag 12.1234 12.0000000 -> 1 |
| dqctm618 comparetotmag 12.1234 12.00000000 -> 1 |
| dqctm619 comparetotmag 12.1234 12.000000000 -> 1 |
| dqctm620 comparetotmag -12 -12.2345 -> -1 |
| dqctm621 comparetotmag -12.0 -12.2345 -> -1 |
| dqctm622 comparetotmag -12.00 -12.2345 -> -1 |
| dqctm623 comparetotmag -12.000 -12.2345 -> -1 |
| dqctm624 comparetotmag -12.0000 -12.2345 -> -1 |
| dqctm625 comparetotmag -12.00000 -12.2345 -> -1 |
| dqctm626 comparetotmag -12.000000 -12.2345 -> -1 |
| dqctm627 comparetotmag -12.0000000 -12.2345 -> -1 |
| dqctm628 comparetotmag -12.00000000 -12.2345 -> -1 |
| dqctm629 comparetotmag -12.000000000 -12.2345 -> -1 |
| dqctm630 comparetotmag -12.1234 -12 -> 1 |
| dqctm631 comparetotmag -12.1234 -12.0 -> 1 |
| dqctm632 comparetotmag -12.1234 -12.00 -> 1 |
| dqctm633 comparetotmag -12.1234 -12.000 -> 1 |
| dqctm634 comparetotmag -12.1234 -12.0000 -> 1 |
| dqctm635 comparetotmag -12.1234 -12.00000 -> 1 |
| dqctm636 comparetotmag -12.1234 -12.000000 -> 1 |
| dqctm637 comparetotmag -12.1234 -12.0000000 -> 1 |
| dqctm638 comparetotmag -12.1234 -12.00000000 -> 1 |
| dqctm639 comparetotmag -12.1234 -12.000000000 -> 1 |
| |
| -- extended zeros |
| dqctm640 comparetotmag 0 0 -> 0 |
| dqctm641 comparetotmag 0 -0 -> 0 |
| dqctm642 comparetotmag 0 -0.0 -> 1 |
| dqctm643 comparetotmag 0 0.0 -> 1 |
| dqctm644 comparetotmag -0 0 -> 0 |
| dqctm645 comparetotmag -0 -0 -> 0 |
| dqctm646 comparetotmag -0 -0.0 -> 1 |
| dqctm647 comparetotmag -0 0.0 -> 1 |
| dqctm648 comparetotmag 0.0 0 -> -1 |
| dqctm649 comparetotmag 0.0 -0 -> -1 |
| dqctm650 comparetotmag 0.0 -0.0 -> 0 |
| dqctm651 comparetotmag 0.0 0.0 -> 0 |
| dqctm652 comparetotmag -0.0 0 -> -1 |
| dqctm653 comparetotmag -0.0 -0 -> -1 |
| dqctm654 comparetotmag -0.0 -0.0 -> 0 |
| dqctm655 comparetotmag -0.0 0.0 -> 0 |
| |
| dqctm656 comparetotmag -0E1 0.0 -> 1 |
| dqctm657 comparetotmag -0E2 0.0 -> 1 |
| dqctm658 comparetotmag 0E1 0.0 -> 1 |
| dqctm659 comparetotmag 0E2 0.0 -> 1 |
| dqctm660 comparetotmag -0E1 0 -> 1 |
| dqctm661 comparetotmag -0E2 0 -> 1 |
| dqctm662 comparetotmag 0E1 0 -> 1 |
| dqctm663 comparetotmag 0E2 0 -> 1 |
| dqctm664 comparetotmag -0E1 -0E1 -> 0 |
| dqctm665 comparetotmag -0E2 -0E1 -> 1 |
| dqctm666 comparetotmag 0E1 -0E1 -> 0 |
| dqctm667 comparetotmag 0E2 -0E1 -> 1 |
| dqctm668 comparetotmag -0E1 -0E2 -> -1 |
| dqctm669 comparetotmag -0E2 -0E2 -> 0 |
| dqctm670 comparetotmag 0E1 -0E2 -> -1 |
| dqctm671 comparetotmag 0E2 -0E2 -> 0 |
| dqctm672 comparetotmag -0E1 0E1 -> 0 |
| dqctm673 comparetotmag -0E2 0E1 -> 1 |
| dqctm674 comparetotmag 0E1 0E1 -> 0 |
| dqctm675 comparetotmag 0E2 0E1 -> 1 |
| dqctm676 comparetotmag -0E1 0E2 -> -1 |
| dqctm677 comparetotmag -0E2 0E2 -> 0 |
| dqctm678 comparetotmag 0E1 0E2 -> -1 |
| dqctm679 comparetotmag 0E2 0E2 -> 0 |
| |
| -- trailing zeros; unit-y |
| dqctm680 comparetotmag 12 12 -> 0 |
| dqctm681 comparetotmag 12 12.0 -> 1 |
| dqctm682 comparetotmag 12 12.00 -> 1 |
| dqctm683 comparetotmag 12 12.000 -> 1 |
| dqctm684 comparetotmag 12 12.0000 -> 1 |
| dqctm685 comparetotmag 12 12.00000 -> 1 |
| dqctm686 comparetotmag 12 12.000000 -> 1 |
| dqctm687 comparetotmag 12 12.0000000 -> 1 |
| dqctm688 comparetotmag 12 12.00000000 -> 1 |
| dqctm689 comparetotmag 12 12.000000000 -> 1 |
| dqctm690 comparetotmag 12 12 -> 0 |
| dqctm691 comparetotmag 12.0 12 -> -1 |
| dqctm692 comparetotmag 12.00 12 -> -1 |
| dqctm693 comparetotmag 12.000 12 -> -1 |
| dqctm694 comparetotmag 12.0000 12 -> -1 |
| dqctm695 comparetotmag 12.00000 12 -> -1 |
| dqctm696 comparetotmag 12.000000 12 -> -1 |
| dqctm697 comparetotmag 12.0000000 12 -> -1 |
| dqctm698 comparetotmag 12.00000000 12 -> -1 |
| dqctm699 comparetotmag 12.000000000 12 -> -1 |
| |
| -- old long operand checks |
| dqctm701 comparetotmag 12345678000 1 -> 1 |
| dqctm702 comparetotmag 1 12345678000 -> -1 |
| dqctm703 comparetotmag 1234567800 1 -> 1 |
| dqctm704 comparetotmag 1 1234567800 -> -1 |
| dqctm705 comparetotmag 1234567890 1 -> 1 |
| dqctm706 comparetotmag 1 1234567890 -> -1 |
| dqctm707 comparetotmag 1234567891 1 -> 1 |
| dqctm708 comparetotmag 1 1234567891 -> -1 |
| dqctm709 comparetotmag 12345678901 1 -> 1 |
| dqctm710 comparetotmag 1 12345678901 -> -1 |
| dqctm711 comparetotmag 1234567896 1 -> 1 |
| dqctm712 comparetotmag 1 1234567896 -> -1 |
| dqctm713 comparetotmag -1234567891 1 -> 1 |
| dqctm714 comparetotmag 1 -1234567891 -> -1 |
| dqctm715 comparetotmag -12345678901 1 -> 1 |
| dqctm716 comparetotmag 1 -12345678901 -> -1 |
| dqctm717 comparetotmag -1234567896 1 -> 1 |
| dqctm718 comparetotmag 1 -1234567896 -> -1 |
| |
| -- old residue cases |
| dqctm740 comparetotmag 1 0.9999999 -> 1 |
| dqctm741 comparetotmag 1 0.999999 -> 1 |
| dqctm742 comparetotmag 1 0.99999 -> 1 |
| dqctm743 comparetotmag 1 1.0000 -> 1 |
| dqctm744 comparetotmag 1 1.00001 -> -1 |
| dqctm745 comparetotmag 1 1.000001 -> -1 |
| dqctm746 comparetotmag 1 1.0000001 -> -1 |
| dqctm750 comparetotmag 0.9999999 1 -> -1 |
| dqctm751 comparetotmag 0.999999 1 -> -1 |
| dqctm752 comparetotmag 0.99999 1 -> -1 |
| dqctm753 comparetotmag 1.0000 1 -> -1 |
| dqctm754 comparetotmag 1.00001 1 -> 1 |
| dqctm755 comparetotmag 1.000001 1 -> 1 |
| dqctm756 comparetotmag 1.0000001 1 -> 1 |
| |
| -- Specials |
| dqctm780 comparetotmag Inf -Inf -> 0 |
| dqctm781 comparetotmag Inf -1000 -> 1 |
| dqctm782 comparetotmag Inf -1 -> 1 |
| dqctm783 comparetotmag Inf -0 -> 1 |
| dqctm784 comparetotmag Inf 0 -> 1 |
| dqctm785 comparetotmag Inf 1 -> 1 |
| dqctm786 comparetotmag Inf 1000 -> 1 |
| dqctm787 comparetotmag Inf Inf -> 0 |
| dqctm788 comparetotmag -1000 Inf -> -1 |
| dqctm789 comparetotmag -Inf Inf -> 0 |
| dqctm790 comparetotmag -1 Inf -> -1 |
| dqctm791 comparetotmag -0 Inf -> -1 |
| dqctm792 comparetotmag 0 Inf -> -1 |
| dqctm793 comparetotmag 1 Inf -> -1 |
| dqctm794 comparetotmag 1000 Inf -> -1 |
| dqctm795 comparetotmag Inf Inf -> 0 |
| |
| dqctm800 comparetotmag -Inf -Inf -> 0 |
| dqctm801 comparetotmag -Inf -1000 -> 1 |
| dqctm802 comparetotmag -Inf -1 -> 1 |
| dqctm803 comparetotmag -Inf -0 -> 1 |
| dqctm804 comparetotmag -Inf 0 -> 1 |
| dqctm805 comparetotmag -Inf 1 -> 1 |
| dqctm806 comparetotmag -Inf 1000 -> 1 |
| dqctm807 comparetotmag -Inf Inf -> 0 |
| dqctm808 comparetotmag -Inf -Inf -> 0 |
| dqctm809 comparetotmag -1000 -Inf -> -1 |
| dqctm810 comparetotmag -1 -Inf -> -1 |
| dqctm811 comparetotmag -0 -Inf -> -1 |
| dqctm812 comparetotmag 0 -Inf -> -1 |
| dqctm813 comparetotmag 1 -Inf -> -1 |
| dqctm814 comparetotmag 1000 -Inf -> -1 |
| dqctm815 comparetotmag Inf -Inf -> 0 |
| |
| dqctm821 comparetotmag NaN -Inf -> 1 |
| dqctm822 comparetotmag NaN -1000 -> 1 |
| dqctm823 comparetotmag NaN -1 -> 1 |
| dqctm824 comparetotmag NaN -0 -> 1 |
| dqctm825 comparetotmag NaN 0 -> 1 |
| dqctm826 comparetotmag NaN 1 -> 1 |
| dqctm827 comparetotmag NaN 1000 -> 1 |
| dqctm828 comparetotmag NaN Inf -> 1 |
| dqctm829 comparetotmag NaN NaN -> 0 |
| dqctm830 comparetotmag -Inf NaN -> -1 |
| dqctm831 comparetotmag -1000 NaN -> -1 |
| dqctm832 comparetotmag -1 NaN -> -1 |
| dqctm833 comparetotmag -0 NaN -> -1 |
| dqctm834 comparetotmag 0 NaN -> -1 |
| dqctm835 comparetotmag 1 NaN -> -1 |
| dqctm836 comparetotmag 1000 NaN -> -1 |
| dqctm837 comparetotmag Inf NaN -> -1 |
| dqctm838 comparetotmag -NaN -NaN -> 0 |
| dqctm839 comparetotmag +NaN -NaN -> 0 |
| dqctm840 comparetotmag -NaN +NaN -> 0 |
| |
| dqctm841 comparetotmag sNaN -sNaN -> 0 |
| dqctm842 comparetotmag sNaN -NaN -> -1 |
| dqctm843 comparetotmag sNaN -Inf -> 1 |
| dqctm844 comparetotmag sNaN -1000 -> 1 |
| dqctm845 comparetotmag sNaN -1 -> 1 |
| dqctm846 comparetotmag sNaN -0 -> 1 |
| dqctm847 comparetotmag sNaN 0 -> 1 |
| dqctm848 comparetotmag sNaN 1 -> 1 |
| dqctm849 comparetotmag sNaN 1000 -> 1 |
| dqctm850 comparetotmag sNaN NaN -> -1 |
| dqctm851 comparetotmag sNaN sNaN -> 0 |
| |
| dqctm852 comparetotmag -sNaN sNaN -> 0 |
| dqctm853 comparetotmag -NaN sNaN -> 1 |
| dqctm854 comparetotmag -Inf sNaN -> -1 |
| dqctm855 comparetotmag -1000 sNaN -> -1 |
| dqctm856 comparetotmag -1 sNaN -> -1 |
| dqctm857 comparetotmag -0 sNaN -> -1 |
| dqctm858 comparetotmag 0 sNaN -> -1 |
| dqctm859 comparetotmag 1 sNaN -> -1 |
| dqctm860 comparetotmag 1000 sNaN -> -1 |
| dqctm861 comparetotmag Inf sNaN -> -1 |
| dqctm862 comparetotmag NaN sNaN -> 1 |
| dqctm863 comparetotmag sNaN sNaN -> 0 |
| |
| dqctm871 comparetotmag -sNaN -sNaN -> 0 |
| dqctm872 comparetotmag -sNaN -NaN -> -1 |
| dqctm873 comparetotmag -sNaN -Inf -> 1 |
| dqctm874 comparetotmag -sNaN -1000 -> 1 |
| dqctm875 comparetotmag -sNaN -1 -> 1 |
| dqctm876 comparetotmag -sNaN -0 -> 1 |
| dqctm877 comparetotmag -sNaN 0 -> 1 |
| dqctm878 comparetotmag -sNaN 1 -> 1 |
| dqctm879 comparetotmag -sNaN 1000 -> 1 |
| dqctm880 comparetotmag -sNaN NaN -> -1 |
| dqctm881 comparetotmag -sNaN sNaN -> 0 |
| |
| dqctm882 comparetotmag -sNaN -sNaN -> 0 |
| dqctm883 comparetotmag -NaN -sNaN -> 1 |
| dqctm884 comparetotmag -Inf -sNaN -> -1 |
| dqctm885 comparetotmag -1000 -sNaN -> -1 |
| dqctm886 comparetotmag -1 -sNaN -> -1 |
| dqctm887 comparetotmag -0 -sNaN -> -1 |
| dqctm888 comparetotmag 0 -sNaN -> -1 |
| dqctm889 comparetotmag 1 -sNaN -> -1 |
| dqctm890 comparetotmag 1000 -sNaN -> -1 |
| dqctm891 comparetotmag Inf -sNaN -> -1 |
| dqctm892 comparetotmag NaN -sNaN -> 1 |
| dqctm893 comparetotmag sNaN -sNaN -> 0 |
| |
| -- NaNs with payload |
| dqctm960 comparetotmag NaN9 -Inf -> 1 |
| dqctm961 comparetotmag NaN8 999 -> 1 |
| dqctm962 comparetotmag NaN77 Inf -> 1 |
| dqctm963 comparetotmag -NaN67 NaN5 -> 1 |
| dqctm964 comparetotmag -Inf -NaN4 -> -1 |
| dqctm965 comparetotmag -999 -NaN33 -> -1 |
| dqctm966 comparetotmag Inf NaN2 -> -1 |
| |
| dqctm970 comparetotmag -NaN41 -NaN42 -> -1 |
| dqctm971 comparetotmag +NaN41 -NaN42 -> -1 |
| dqctm972 comparetotmag -NaN41 +NaN42 -> -1 |
| dqctm973 comparetotmag +NaN41 +NaN42 -> -1 |
| dqctm974 comparetotmag -NaN42 -NaN01 -> 1 |
| dqctm975 comparetotmag +NaN42 -NaN01 -> 1 |
| dqctm976 comparetotmag -NaN42 +NaN01 -> 1 |
| dqctm977 comparetotmag +NaN42 +NaN01 -> 1 |
| |
| dqctm980 comparetotmag -sNaN771 -sNaN772 -> -1 |
| dqctm981 comparetotmag +sNaN771 -sNaN772 -> -1 |
| dqctm982 comparetotmag -sNaN771 +sNaN772 -> -1 |
| dqctm983 comparetotmag +sNaN771 +sNaN772 -> -1 |
| dqctm984 comparetotmag -sNaN772 -sNaN771 -> 1 |
| dqctm985 comparetotmag +sNaN772 -sNaN771 -> 1 |
| dqctm986 comparetotmag -sNaN772 +sNaN771 -> 1 |
| dqctm987 comparetotmag +sNaN772 +sNaN771 -> 1 |
| |
| dqctm991 comparetotmag -sNaN99 -Inf -> 1 |
| dqctm992 comparetotmag sNaN98 -11 -> 1 |
| dqctm993 comparetotmag sNaN97 NaN -> -1 |
| dqctm994 comparetotmag sNaN16 sNaN94 -> -1 |
| dqctm995 comparetotmag NaN85 sNaN83 -> 1 |
| dqctm996 comparetotmag -Inf sNaN92 -> -1 |
| dqctm997 comparetotmag 088 sNaN81 -> -1 |
| dqctm998 comparetotmag Inf sNaN90 -> -1 |
| dqctm999 comparetotmag NaN -sNaN89 -> 1 |
| |
| -- spread zeros |
| dqctm1110 comparetotmag 0E-6143 0 -> -1 |
| dqctm1111 comparetotmag 0E-6143 -0 -> -1 |
| dqctm1112 comparetotmag -0E-6143 0 -> -1 |
| dqctm1113 comparetotmag -0E-6143 -0 -> -1 |
| dqctm1114 comparetotmag 0E-6143 0E+6144 -> -1 |
| dqctm1115 comparetotmag 0E-6143 -0E+6144 -> -1 |
| dqctm1116 comparetotmag -0E-6143 0E+6144 -> -1 |
| dqctm1117 comparetotmag -0E-6143 -0E+6144 -> -1 |
| dqctm1118 comparetotmag 0 0E+6144 -> -1 |
| dqctm1119 comparetotmag 0 -0E+6144 -> -1 |
| dqctm1120 comparetotmag -0 0E+6144 -> -1 |
| dqctm1121 comparetotmag -0 -0E+6144 -> -1 |
| |
| dqctm1130 comparetotmag 0E+6144 0 -> 1 |
| dqctm1131 comparetotmag 0E+6144 -0 -> 1 |
| dqctm1132 comparetotmag -0E+6144 0 -> 1 |
| dqctm1133 comparetotmag -0E+6144 -0 -> 1 |
| dqctm1134 comparetotmag 0E+6144 0E-6143 -> 1 |
| dqctm1135 comparetotmag 0E+6144 -0E-6143 -> 1 |
| dqctm1136 comparetotmag -0E+6144 0E-6143 -> 1 |
| dqctm1137 comparetotmag -0E+6144 -0E-6143 -> 1 |
| dqctm1138 comparetotmag 0 0E-6143 -> 1 |
| dqctm1139 comparetotmag 0 -0E-6143 -> 1 |
| dqctm1140 comparetotmag -0 0E-6143 -> 1 |
| dqctm1141 comparetotmag -0 -0E-6143 -> 1 |
| |
| -- Null tests |
| dqctm9990 comparetotmag 10 # -> NaN Invalid_operation |
| dqctm9991 comparetotmag # 10 -> NaN Invalid_operation |
