| Georg Brandl | faa9ad2 | 2011-03-05 15:06:13 +0100 | [diff] [blame] | 1 | ------------------------------------------------------------------------ |
| 2 | -- dqCompareTotalMag.decTest -- decQuad comparison; abs. total order -- |
| 3 | -- Copyright (c) IBM Corporation, 1981, 2008. All rights reserved. -- |
| 4 | ------------------------------------------------------------------------ |
| 5 | -- Please see the document "General Decimal Arithmetic Testcases" -- |
| 6 | -- at http://www2.hursley.ibm.com/decimal for the description of -- |
| 7 | -- these testcases. -- |
| 8 | -- -- |
| 9 | -- These testcases are experimental ('beta' versions), and they -- |
| 10 | -- may contain errors. They are offered on an as-is basis. In -- |
| 11 | -- particular, achieving the same results as the tests here is not -- |
| 12 | -- a guarantee that an implementation complies with any Standard -- |
| 13 | -- or specification. The tests are not exhaustive. -- |
| 14 | -- -- |
| 15 | -- Please send comments, suggestions, and corrections to the author: -- |
| 16 | -- Mike Cowlishaw, IBM Fellow -- |
| 17 | -- IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK -- |
| 18 | -- mfc@uk.ibm.com -- |
| 19 | ------------------------------------------------------------------------ |
| 20 | version: 2.59 |
| 21 | |
| 22 | -- 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 | -- Similarly, comparetotal will have some radically different paths |
| 26 | -- than compare. |
| 27 | |
| 28 | -- All operands and results are decQuads. |
| 29 | extended: 1 |
| 30 | clamp: 1 |
| 31 | precision: 34 |
| 32 | maxExponent: 6144 |
| 33 | minExponent: -6143 |
| 34 | rounding: half_even |
| 35 | |
| 36 | -- sanity checks |
| 37 | dqctm001 comparetotmag -2 -2 -> 0 |
| 38 | dqctm002 comparetotmag -2 -1 -> 1 |
| 39 | dqctm003 comparetotmag -2 0 -> 1 |
| 40 | dqctm004 comparetotmag -2 1 -> 1 |
| 41 | dqctm005 comparetotmag -2 2 -> 0 |
| 42 | dqctm006 comparetotmag -1 -2 -> -1 |
| 43 | dqctm007 comparetotmag -1 -1 -> 0 |
| 44 | dqctm008 comparetotmag -1 0 -> 1 |
| 45 | dqctm009 comparetotmag -1 1 -> 0 |
| 46 | dqctm010 comparetotmag -1 2 -> -1 |
| 47 | dqctm011 comparetotmag 0 -2 -> -1 |
| 48 | dqctm012 comparetotmag 0 -1 -> -1 |
| 49 | dqctm013 comparetotmag 0 0 -> 0 |
| 50 | dqctm014 comparetotmag 0 1 -> -1 |
| 51 | dqctm015 comparetotmag 0 2 -> -1 |
| 52 | dqctm016 comparetotmag 1 -2 -> -1 |
| 53 | dqctm017 comparetotmag 1 -1 -> 0 |
| 54 | dqctm018 comparetotmag 1 0 -> 1 |
| 55 | dqctm019 comparetotmag 1 1 -> 0 |
| 56 | dqctm020 comparetotmag 1 2 -> -1 |
| 57 | dqctm021 comparetotmag 2 -2 -> 0 |
| 58 | dqctm022 comparetotmag 2 -1 -> 1 |
| 59 | dqctm023 comparetotmag 2 0 -> 1 |
| 60 | dqctm025 comparetotmag 2 1 -> 1 |
| 61 | dqctm026 comparetotmag 2 2 -> 0 |
| 62 | |
| 63 | dqctm031 comparetotmag -20 -20 -> 0 |
| 64 | dqctm032 comparetotmag -20 -10 -> 1 |
| 65 | dqctm033 comparetotmag -20 00 -> 1 |
| 66 | dqctm034 comparetotmag -20 10 -> 1 |
| 67 | dqctm035 comparetotmag -20 20 -> 0 |
| 68 | dqctm036 comparetotmag -10 -20 -> -1 |
| 69 | dqctm037 comparetotmag -10 -10 -> 0 |
| 70 | dqctm038 comparetotmag -10 00 -> 1 |
| 71 | dqctm039 comparetotmag -10 10 -> 0 |
| 72 | dqctm040 comparetotmag -10 20 -> -1 |
| 73 | dqctm041 comparetotmag 00 -20 -> -1 |
| 74 | dqctm042 comparetotmag 00 -10 -> -1 |
| 75 | dqctm043 comparetotmag 00 00 -> 0 |
| 76 | dqctm044 comparetotmag 00 10 -> -1 |
| 77 | dqctm045 comparetotmag 00 20 -> -1 |
| 78 | dqctm046 comparetotmag 10 -20 -> -1 |
| 79 | dqctm047 comparetotmag 10 -10 -> 0 |
| 80 | dqctm048 comparetotmag 10 00 -> 1 |
| 81 | dqctm049 comparetotmag 10 10 -> 0 |
| 82 | dqctm050 comparetotmag 10 20 -> -1 |
| 83 | dqctm051 comparetotmag 20 -20 -> 0 |
| 84 | dqctm052 comparetotmag 20 -10 -> 1 |
| 85 | dqctm053 comparetotmag 20 00 -> 1 |
| 86 | dqctm055 comparetotmag 20 10 -> 1 |
| 87 | dqctm056 comparetotmag 20 20 -> 0 |
| 88 | |
| 89 | dqctm061 comparetotmag -2.0 -2.0 -> 0 |
| 90 | dqctm062 comparetotmag -2.0 -1.0 -> 1 |
| 91 | dqctm063 comparetotmag -2.0 0.0 -> 1 |
| 92 | dqctm064 comparetotmag -2.0 1.0 -> 1 |
| 93 | dqctm065 comparetotmag -2.0 2.0 -> 0 |
| 94 | dqctm066 comparetotmag -1.0 -2.0 -> -1 |
| 95 | dqctm067 comparetotmag -1.0 -1.0 -> 0 |
| 96 | dqctm068 comparetotmag -1.0 0.0 -> 1 |
| 97 | dqctm069 comparetotmag -1.0 1.0 -> 0 |
| 98 | dqctm070 comparetotmag -1.0 2.0 -> -1 |
| 99 | dqctm071 comparetotmag 0.0 -2.0 -> -1 |
| 100 | dqctm072 comparetotmag 0.0 -1.0 -> -1 |
| 101 | dqctm073 comparetotmag 0.0 0.0 -> 0 |
| 102 | dqctm074 comparetotmag 0.0 1.0 -> -1 |
| 103 | dqctm075 comparetotmag 0.0 2.0 -> -1 |
| 104 | dqctm076 comparetotmag 1.0 -2.0 -> -1 |
| 105 | dqctm077 comparetotmag 1.0 -1.0 -> 0 |
| 106 | dqctm078 comparetotmag 1.0 0.0 -> 1 |
| 107 | dqctm079 comparetotmag 1.0 1.0 -> 0 |
| 108 | dqctm080 comparetotmag 1.0 2.0 -> -1 |
| 109 | dqctm081 comparetotmag 2.0 -2.0 -> 0 |
| 110 | dqctm082 comparetotmag 2.0 -1.0 -> 1 |
| 111 | dqctm083 comparetotmag 2.0 0.0 -> 1 |
| 112 | dqctm085 comparetotmag 2.0 1.0 -> 1 |
| 113 | dqctm086 comparetotmag 2.0 2.0 -> 0 |
| 114 | |
| 115 | -- now some cases which might overflow if subtract were used |
| 116 | dqctm090 comparetotmag 9.99999999999999999999999999999E+6144 9.99999999999999999999999999999E+6144 -> 0 |
| 117 | dqctm091 comparetotmag -9.99999999999999999999999999999E+6144 9.99999999999999999999999999999E+6144 -> 0 |
| 118 | dqctm092 comparetotmag 9.99999999999999999999999999999E+6144 -9.99999999999999999999999999999E+6144 -> 0 |
| 119 | dqctm093 comparetotmag -9.99999999999999999999999999999E+6144 -9.99999999999999999999999999999E+6144 -> 0 |
| 120 | |
| 121 | -- some differing length/exponent cases |
| 122 | -- in this first group, compare would compare all equal |
| 123 | dqctm100 comparetotmag 7.0 7.0 -> 0 |
| 124 | dqctm101 comparetotmag 7.0 7 -> -1 |
| 125 | dqctm102 comparetotmag 7 7.0 -> 1 |
| 126 | dqctm103 comparetotmag 7E+0 7.0 -> 1 |
| 127 | dqctm104 comparetotmag 70E-1 7.0 -> 0 |
| 128 | dqctm105 comparetotmag 0.7E+1 7 -> 0 |
| 129 | dqctm106 comparetotmag 70E-1 7 -> -1 |
| 130 | dqctm107 comparetotmag 7.0 7E+0 -> -1 |
| 131 | dqctm108 comparetotmag 7.0 70E-1 -> 0 |
| 132 | dqctm109 comparetotmag 7 0.7E+1 -> 0 |
| 133 | dqctm110 comparetotmag 7 70E-1 -> 1 |
| 134 | |
| 135 | dqctm120 comparetotmag 8.0 7.0 -> 1 |
| 136 | dqctm121 comparetotmag 8.0 7 -> 1 |
| 137 | dqctm122 comparetotmag 8 7.0 -> 1 |
| 138 | dqctm123 comparetotmag 8E+0 7.0 -> 1 |
| 139 | dqctm124 comparetotmag 80E-1 7.0 -> 1 |
| 140 | dqctm125 comparetotmag 0.8E+1 7 -> 1 |
| 141 | dqctm126 comparetotmag 80E-1 7 -> 1 |
| 142 | dqctm127 comparetotmag 8.0 7E+0 -> 1 |
| 143 | dqctm128 comparetotmag 8.0 70E-1 -> 1 |
| 144 | dqctm129 comparetotmag 8 0.7E+1 -> 1 |
| 145 | dqctm130 comparetotmag 8 70E-1 -> 1 |
| 146 | |
| 147 | dqctm140 comparetotmag 8.0 9.0 -> -1 |
| 148 | dqctm141 comparetotmag 8.0 9 -> -1 |
| 149 | dqctm142 comparetotmag 8 9.0 -> -1 |
| 150 | dqctm143 comparetotmag 8E+0 9.0 -> -1 |
| 151 | dqctm144 comparetotmag 80E-1 9.0 -> -1 |
| 152 | dqctm145 comparetotmag 0.8E+1 9 -> -1 |
| 153 | dqctm146 comparetotmag 80E-1 9 -> -1 |
| 154 | dqctm147 comparetotmag 8.0 9E+0 -> -1 |
| 155 | dqctm148 comparetotmag 8.0 90E-1 -> -1 |
| 156 | dqctm149 comparetotmag 8 0.9E+1 -> -1 |
| 157 | dqctm150 comparetotmag 8 90E-1 -> -1 |
| 158 | |
| 159 | -- and again, with sign changes -+ .. |
| 160 | dqctm200 comparetotmag -7.0 7.0 -> 0 |
| 161 | dqctm201 comparetotmag -7.0 7 -> -1 |
| 162 | dqctm202 comparetotmag -7 7.0 -> 1 |
| 163 | dqctm203 comparetotmag -7E+0 7.0 -> 1 |
| 164 | dqctm204 comparetotmag -70E-1 7.0 -> 0 |
| 165 | dqctm205 comparetotmag -0.7E+1 7 -> 0 |
| 166 | dqctm206 comparetotmag -70E-1 7 -> -1 |
| 167 | dqctm207 comparetotmag -7.0 7E+0 -> -1 |
| 168 | dqctm208 comparetotmag -7.0 70E-1 -> 0 |
| 169 | dqctm209 comparetotmag -7 0.7E+1 -> 0 |
| 170 | dqctm210 comparetotmag -7 70E-1 -> 1 |
| 171 | |
| 172 | dqctm220 comparetotmag -8.0 7.0 -> 1 |
| 173 | dqctm221 comparetotmag -8.0 7 -> 1 |
| 174 | dqctm222 comparetotmag -8 7.0 -> 1 |
| 175 | dqctm223 comparetotmag -8E+0 7.0 -> 1 |
| 176 | dqctm224 comparetotmag -80E-1 7.0 -> 1 |
| 177 | dqctm225 comparetotmag -0.8E+1 7 -> 1 |
| 178 | dqctm226 comparetotmag -80E-1 7 -> 1 |
| 179 | dqctm227 comparetotmag -8.0 7E+0 -> 1 |
| 180 | dqctm228 comparetotmag -8.0 70E-1 -> 1 |
| 181 | dqctm229 comparetotmag -8 0.7E+1 -> 1 |
| 182 | dqctm230 comparetotmag -8 70E-1 -> 1 |
| 183 | |
| 184 | dqctm240 comparetotmag -8.0 9.0 -> -1 |
| 185 | dqctm241 comparetotmag -8.0 9 -> -1 |
| 186 | dqctm242 comparetotmag -8 9.0 -> -1 |
| 187 | dqctm243 comparetotmag -8E+0 9.0 -> -1 |
| 188 | dqctm244 comparetotmag -80E-1 9.0 -> -1 |
| 189 | dqctm245 comparetotmag -0.8E+1 9 -> -1 |
| 190 | dqctm246 comparetotmag -80E-1 9 -> -1 |
| 191 | dqctm247 comparetotmag -8.0 9E+0 -> -1 |
| 192 | dqctm248 comparetotmag -8.0 90E-1 -> -1 |
| 193 | dqctm249 comparetotmag -8 0.9E+1 -> -1 |
| 194 | dqctm250 comparetotmag -8 90E-1 -> -1 |
| 195 | |
| 196 | -- and again, with sign changes +- .. |
| 197 | dqctm300 comparetotmag 7.0 -7.0 -> 0 |
| 198 | dqctm301 comparetotmag 7.0 -7 -> -1 |
| 199 | dqctm302 comparetotmag 7 -7.0 -> 1 |
| 200 | dqctm303 comparetotmag 7E+0 -7.0 -> 1 |
| 201 | dqctm304 comparetotmag 70E-1 -7.0 -> 0 |
| 202 | dqctm305 comparetotmag .7E+1 -7 -> 0 |
| 203 | dqctm306 comparetotmag 70E-1 -7 -> -1 |
| 204 | dqctm307 comparetotmag 7.0 -7E+0 -> -1 |
| 205 | dqctm308 comparetotmag 7.0 -70E-1 -> 0 |
| 206 | dqctm309 comparetotmag 7 -.7E+1 -> 0 |
| 207 | dqctm310 comparetotmag 7 -70E-1 -> 1 |
| 208 | |
| 209 | dqctm320 comparetotmag 8.0 -7.0 -> 1 |
| 210 | dqctm321 comparetotmag 8.0 -7 -> 1 |
| 211 | dqctm322 comparetotmag 8 -7.0 -> 1 |
| 212 | dqctm323 comparetotmag 8E+0 -7.0 -> 1 |
| 213 | dqctm324 comparetotmag 80E-1 -7.0 -> 1 |
| 214 | dqctm325 comparetotmag .8E+1 -7 -> 1 |
| 215 | dqctm326 comparetotmag 80E-1 -7 -> 1 |
| 216 | dqctm327 comparetotmag 8.0 -7E+0 -> 1 |
| 217 | dqctm328 comparetotmag 8.0 -70E-1 -> 1 |
| 218 | dqctm329 comparetotmag 8 -.7E+1 -> 1 |
| 219 | dqctm330 comparetotmag 8 -70E-1 -> 1 |
| 220 | |
| 221 | dqctm340 comparetotmag 8.0 -9.0 -> -1 |
| 222 | dqctm341 comparetotmag 8.0 -9 -> -1 |
| 223 | dqctm342 comparetotmag 8 -9.0 -> -1 |
| 224 | dqctm343 comparetotmag 8E+0 -9.0 -> -1 |
| 225 | dqctm344 comparetotmag 80E-1 -9.0 -> -1 |
| 226 | dqctm345 comparetotmag .8E+1 -9 -> -1 |
| 227 | dqctm346 comparetotmag 80E-1 -9 -> -1 |
| 228 | dqctm347 comparetotmag 8.0 -9E+0 -> -1 |
| 229 | dqctm348 comparetotmag 8.0 -90E-1 -> -1 |
| 230 | dqctm349 comparetotmag 8 -.9E+1 -> -1 |
| 231 | dqctm350 comparetotmag 8 -90E-1 -> -1 |
| 232 | |
| 233 | -- and again, with sign changes -- .. |
| 234 | dqctm400 comparetotmag -7.0 -7.0 -> 0 |
| 235 | dqctm401 comparetotmag -7.0 -7 -> -1 |
| 236 | dqctm402 comparetotmag -7 -7.0 -> 1 |
| 237 | dqctm403 comparetotmag -7E+0 -7.0 -> 1 |
| 238 | dqctm404 comparetotmag -70E-1 -7.0 -> 0 |
| 239 | dqctm405 comparetotmag -.7E+1 -7 -> 0 |
| 240 | dqctm406 comparetotmag -70E-1 -7 -> -1 |
| 241 | dqctm407 comparetotmag -7.0 -7E+0 -> -1 |
| 242 | dqctm408 comparetotmag -7.0 -70E-1 -> 0 |
| 243 | dqctm409 comparetotmag -7 -.7E+1 -> 0 |
| 244 | dqctm410 comparetotmag -7 -70E-1 -> 1 |
| 245 | |
| 246 | dqctm420 comparetotmag -8.0 -7.0 -> 1 |
| 247 | dqctm421 comparetotmag -8.0 -7 -> 1 |
| 248 | dqctm422 comparetotmag -8 -7.0 -> 1 |
| 249 | dqctm423 comparetotmag -8E+0 -7.0 -> 1 |
| 250 | dqctm424 comparetotmag -80E-1 -7.0 -> 1 |
| 251 | dqctm425 comparetotmag -.8E+1 -7 -> 1 |
| 252 | dqctm426 comparetotmag -80E-1 -7 -> 1 |
| 253 | dqctm427 comparetotmag -8.0 -7E+0 -> 1 |
| 254 | dqctm428 comparetotmag -8.0 -70E-1 -> 1 |
| 255 | dqctm429 comparetotmag -8 -.7E+1 -> 1 |
| 256 | dqctm430 comparetotmag -8 -70E-1 -> 1 |
| 257 | |
| 258 | dqctm440 comparetotmag -8.0 -9.0 -> -1 |
| 259 | dqctm441 comparetotmag -8.0 -9 -> -1 |
| 260 | dqctm442 comparetotmag -8 -9.0 -> -1 |
| 261 | dqctm443 comparetotmag -8E+0 -9.0 -> -1 |
| 262 | dqctm444 comparetotmag -80E-1 -9.0 -> -1 |
| 263 | dqctm445 comparetotmag -.8E+1 -9 -> -1 |
| 264 | dqctm446 comparetotmag -80E-1 -9 -> -1 |
| 265 | dqctm447 comparetotmag -8.0 -9E+0 -> -1 |
| 266 | dqctm448 comparetotmag -8.0 -90E-1 -> -1 |
| 267 | dqctm449 comparetotmag -8 -.9E+1 -> -1 |
| 268 | dqctm450 comparetotmag -8 -90E-1 -> -1 |
| 269 | |
| 270 | |
| 271 | -- testcases that subtract to lots of zeros at boundaries [pgr] |
| 272 | dqctm473 comparetotmag 123.4560000000000E-89 123.456E-89 -> -1 |
| 273 | dqctm474 comparetotmag 123.456000000000E+89 123.456E+89 -> -1 |
| 274 | dqctm475 comparetotmag 123.45600000000E-89 123.456E-89 -> -1 |
| 275 | dqctm476 comparetotmag 123.4560000000E+89 123.456E+89 -> -1 |
| 276 | dqctm477 comparetotmag 123.456000000E-89 123.456E-89 -> -1 |
| 277 | dqctm478 comparetotmag 123.45600000E+89 123.456E+89 -> -1 |
| 278 | dqctm479 comparetotmag 123.4560000E-89 123.456E-89 -> -1 |
| 279 | dqctm480 comparetotmag 123.456000E+89 123.456E+89 -> -1 |
| 280 | dqctm481 comparetotmag 123.45600E-89 123.456E-89 -> -1 |
| 281 | dqctm482 comparetotmag 123.4560E+89 123.456E+89 -> -1 |
| 282 | dqctm483 comparetotmag 123.456E-89 123.456E-89 -> 0 |
| 283 | dqctm487 comparetotmag 123.456E+89 123.4560000000000E+89 -> 1 |
| 284 | dqctm488 comparetotmag 123.456E-89 123.456000000000E-89 -> 1 |
| 285 | dqctm489 comparetotmag 123.456E+89 123.45600000000E+89 -> 1 |
| 286 | dqctm490 comparetotmag 123.456E-89 123.4560000000E-89 -> 1 |
| 287 | dqctm491 comparetotmag 123.456E+89 123.456000000E+89 -> 1 |
| 288 | dqctm492 comparetotmag 123.456E-89 123.45600000E-89 -> 1 |
| 289 | dqctm493 comparetotmag 123.456E+89 123.4560000E+89 -> 1 |
| 290 | dqctm494 comparetotmag 123.456E-89 123.456000E-89 -> 1 |
| 291 | dqctm495 comparetotmag 123.456E+89 123.45600E+89 -> 1 |
| 292 | dqctm496 comparetotmag 123.456E-89 123.4560E-89 -> 1 |
| 293 | dqctm497 comparetotmag 123.456E+89 123.456E+89 -> 0 |
| 294 | |
| 295 | -- wide-ranging, around precision; signs equal |
| 296 | dqctm498 comparetotmag 1 1E-17 -> 1 |
| 297 | dqctm499 comparetotmag 1 1E-16 -> 1 |
| 298 | dqctm500 comparetotmag 1 1E-15 -> 1 |
| 299 | dqctm501 comparetotmag 1 1E-14 -> 1 |
| 300 | dqctm502 comparetotmag 1 1E-13 -> 1 |
| 301 | dqctm503 comparetotmag 1 1E-12 -> 1 |
| 302 | dqctm504 comparetotmag 1 1E-11 -> 1 |
| 303 | dqctm505 comparetotmag 1 1E-10 -> 1 |
| 304 | dqctm506 comparetotmag 1 1E-9 -> 1 |
| 305 | dqctm507 comparetotmag 1 1E-8 -> 1 |
| 306 | dqctm508 comparetotmag 1 1E-7 -> 1 |
| 307 | dqctm509 comparetotmag 1 1E-6 -> 1 |
| 308 | dqctm510 comparetotmag 1 1E-5 -> 1 |
| 309 | dqctm511 comparetotmag 1 1E-4 -> 1 |
| 310 | dqctm512 comparetotmag 1 1E-3 -> 1 |
| 311 | dqctm513 comparetotmag 1 1E-2 -> 1 |
| 312 | dqctm514 comparetotmag 1 1E-1 -> 1 |
| 313 | dqctm515 comparetotmag 1 1E-0 -> 0 |
| 314 | dqctm516 comparetotmag 1 1E+1 -> -1 |
| 315 | dqctm517 comparetotmag 1 1E+2 -> -1 |
| 316 | dqctm518 comparetotmag 1 1E+3 -> -1 |
| 317 | dqctm519 comparetotmag 1 1E+4 -> -1 |
| 318 | dqctm521 comparetotmag 1 1E+5 -> -1 |
| 319 | dqctm522 comparetotmag 1 1E+6 -> -1 |
| 320 | dqctm523 comparetotmag 1 1E+7 -> -1 |
| 321 | dqctm524 comparetotmag 1 1E+8 -> -1 |
| 322 | dqctm525 comparetotmag 1 1E+9 -> -1 |
| 323 | dqctm526 comparetotmag 1 1E+10 -> -1 |
| 324 | dqctm527 comparetotmag 1 1E+11 -> -1 |
| 325 | dqctm528 comparetotmag 1 1E+12 -> -1 |
| 326 | dqctm529 comparetotmag 1 1E+13 -> -1 |
| 327 | dqctm530 comparetotmag 1 1E+14 -> -1 |
| 328 | dqctm531 comparetotmag 1 1E+15 -> -1 |
| 329 | dqctm532 comparetotmag 1 1E+16 -> -1 |
| 330 | dqctm533 comparetotmag 1 1E+17 -> -1 |
| 331 | -- LR swap |
| 332 | dqctm538 comparetotmag 1E-17 1 -> -1 |
| 333 | dqctm539 comparetotmag 1E-16 1 -> -1 |
| 334 | dqctm540 comparetotmag 1E-15 1 -> -1 |
| 335 | dqctm541 comparetotmag 1E-14 1 -> -1 |
| 336 | dqctm542 comparetotmag 1E-13 1 -> -1 |
| 337 | dqctm543 comparetotmag 1E-12 1 -> -1 |
| 338 | dqctm544 comparetotmag 1E-11 1 -> -1 |
| 339 | dqctm545 comparetotmag 1E-10 1 -> -1 |
| 340 | dqctm546 comparetotmag 1E-9 1 -> -1 |
| 341 | dqctm547 comparetotmag 1E-8 1 -> -1 |
| 342 | dqctm548 comparetotmag 1E-7 1 -> -1 |
| 343 | dqctm549 comparetotmag 1E-6 1 -> -1 |
| 344 | dqctm550 comparetotmag 1E-5 1 -> -1 |
| 345 | dqctm551 comparetotmag 1E-4 1 -> -1 |
| 346 | dqctm552 comparetotmag 1E-3 1 -> -1 |
| 347 | dqctm553 comparetotmag 1E-2 1 -> -1 |
| 348 | dqctm554 comparetotmag 1E-1 1 -> -1 |
| 349 | dqctm555 comparetotmag 1E-0 1 -> 0 |
| 350 | dqctm556 comparetotmag 1E+1 1 -> 1 |
| 351 | dqctm557 comparetotmag 1E+2 1 -> 1 |
| 352 | dqctm558 comparetotmag 1E+3 1 -> 1 |
| 353 | dqctm559 comparetotmag 1E+4 1 -> 1 |
| 354 | dqctm561 comparetotmag 1E+5 1 -> 1 |
| 355 | dqctm562 comparetotmag 1E+6 1 -> 1 |
| 356 | dqctm563 comparetotmag 1E+7 1 -> 1 |
| 357 | dqctm564 comparetotmag 1E+8 1 -> 1 |
| 358 | dqctm565 comparetotmag 1E+9 1 -> 1 |
| 359 | dqctm566 comparetotmag 1E+10 1 -> 1 |
| 360 | dqctm567 comparetotmag 1E+11 1 -> 1 |
| 361 | dqctm568 comparetotmag 1E+12 1 -> 1 |
| 362 | dqctm569 comparetotmag 1E+13 1 -> 1 |
| 363 | dqctm570 comparetotmag 1E+14 1 -> 1 |
| 364 | dqctm571 comparetotmag 1E+15 1 -> 1 |
| 365 | dqctm572 comparetotmag 1E+16 1 -> 1 |
| 366 | dqctm573 comparetotmag 1E+17 1 -> 1 |
| 367 | -- similar with a useful coefficient, one side only |
| 368 | dqctm578 comparetotmag 0.000000987654321 1E-17 -> 1 |
| 369 | dqctm579 comparetotmag 0.000000987654321 1E-16 -> 1 |
| 370 | dqctm580 comparetotmag 0.000000987654321 1E-15 -> 1 |
| 371 | dqctm581 comparetotmag 0.000000987654321 1E-14 -> 1 |
| 372 | dqctm582 comparetotmag 0.000000987654321 1E-13 -> 1 |
| 373 | dqctm583 comparetotmag 0.000000987654321 1E-12 -> 1 |
| 374 | dqctm584 comparetotmag 0.000000987654321 1E-11 -> 1 |
| 375 | dqctm585 comparetotmag 0.000000987654321 1E-10 -> 1 |
| 376 | dqctm586 comparetotmag 0.000000987654321 1E-9 -> 1 |
| 377 | dqctm587 comparetotmag 0.000000987654321 1E-8 -> 1 |
| 378 | dqctm588 comparetotmag 0.000000987654321 1E-7 -> 1 |
| 379 | dqctm589 comparetotmag 0.000000987654321 1E-6 -> -1 |
| 380 | dqctm590 comparetotmag 0.000000987654321 1E-5 -> -1 |
| 381 | dqctm591 comparetotmag 0.000000987654321 1E-4 -> -1 |
| 382 | dqctm592 comparetotmag 0.000000987654321 1E-3 -> -1 |
| 383 | dqctm593 comparetotmag 0.000000987654321 1E-2 -> -1 |
| 384 | dqctm594 comparetotmag 0.000000987654321 1E-1 -> -1 |
| 385 | dqctm595 comparetotmag 0.000000987654321 1E-0 -> -1 |
| 386 | dqctm596 comparetotmag 0.000000987654321 1E+1 -> -1 |
| 387 | dqctm597 comparetotmag 0.000000987654321 1E+2 -> -1 |
| 388 | dqctm598 comparetotmag 0.000000987654321 1E+3 -> -1 |
| 389 | dqctm599 comparetotmag 0.000000987654321 1E+4 -> -1 |
| 390 | |
| 391 | -- check some unit-y traps |
| 392 | dqctm600 comparetotmag 12 12.2345 -> -1 |
| 393 | dqctm601 comparetotmag 12.0 12.2345 -> -1 |
| 394 | dqctm602 comparetotmag 12.00 12.2345 -> -1 |
| 395 | dqctm603 comparetotmag 12.000 12.2345 -> -1 |
| 396 | dqctm604 comparetotmag 12.0000 12.2345 -> -1 |
| 397 | dqctm605 comparetotmag 12.00000 12.2345 -> -1 |
| 398 | dqctm606 comparetotmag 12.000000 12.2345 -> -1 |
| 399 | dqctm607 comparetotmag 12.0000000 12.2345 -> -1 |
| 400 | dqctm608 comparetotmag 12.00000000 12.2345 -> -1 |
| 401 | dqctm609 comparetotmag 12.000000000 12.2345 -> -1 |
| 402 | dqctm610 comparetotmag 12.1234 12 -> 1 |
| 403 | dqctm611 comparetotmag 12.1234 12.0 -> 1 |
| 404 | dqctm612 comparetotmag 12.1234 12.00 -> 1 |
| 405 | dqctm613 comparetotmag 12.1234 12.000 -> 1 |
| 406 | dqctm614 comparetotmag 12.1234 12.0000 -> 1 |
| 407 | dqctm615 comparetotmag 12.1234 12.00000 -> 1 |
| 408 | dqctm616 comparetotmag 12.1234 12.000000 -> 1 |
| 409 | dqctm617 comparetotmag 12.1234 12.0000000 -> 1 |
| 410 | dqctm618 comparetotmag 12.1234 12.00000000 -> 1 |
| 411 | dqctm619 comparetotmag 12.1234 12.000000000 -> 1 |
| 412 | dqctm620 comparetotmag -12 -12.2345 -> -1 |
| 413 | dqctm621 comparetotmag -12.0 -12.2345 -> -1 |
| 414 | dqctm622 comparetotmag -12.00 -12.2345 -> -1 |
| 415 | dqctm623 comparetotmag -12.000 -12.2345 -> -1 |
| 416 | dqctm624 comparetotmag -12.0000 -12.2345 -> -1 |
| 417 | dqctm625 comparetotmag -12.00000 -12.2345 -> -1 |
| 418 | dqctm626 comparetotmag -12.000000 -12.2345 -> -1 |
| 419 | dqctm627 comparetotmag -12.0000000 -12.2345 -> -1 |
| 420 | dqctm628 comparetotmag -12.00000000 -12.2345 -> -1 |
| 421 | dqctm629 comparetotmag -12.000000000 -12.2345 -> -1 |
| 422 | dqctm630 comparetotmag -12.1234 -12 -> 1 |
| 423 | dqctm631 comparetotmag -12.1234 -12.0 -> 1 |
| 424 | dqctm632 comparetotmag -12.1234 -12.00 -> 1 |
| 425 | dqctm633 comparetotmag -12.1234 -12.000 -> 1 |
| 426 | dqctm634 comparetotmag -12.1234 -12.0000 -> 1 |
| 427 | dqctm635 comparetotmag -12.1234 -12.00000 -> 1 |
| 428 | dqctm636 comparetotmag -12.1234 -12.000000 -> 1 |
| 429 | dqctm637 comparetotmag -12.1234 -12.0000000 -> 1 |
| 430 | dqctm638 comparetotmag -12.1234 -12.00000000 -> 1 |
| 431 | dqctm639 comparetotmag -12.1234 -12.000000000 -> 1 |
| 432 | |
| 433 | -- extended zeros |
| 434 | dqctm640 comparetotmag 0 0 -> 0 |
| 435 | dqctm641 comparetotmag 0 -0 -> 0 |
| 436 | dqctm642 comparetotmag 0 -0.0 -> 1 |
| 437 | dqctm643 comparetotmag 0 0.0 -> 1 |
| 438 | dqctm644 comparetotmag -0 0 -> 0 |
| 439 | dqctm645 comparetotmag -0 -0 -> 0 |
| 440 | dqctm646 comparetotmag -0 -0.0 -> 1 |
| 441 | dqctm647 comparetotmag -0 0.0 -> 1 |
| 442 | dqctm648 comparetotmag 0.0 0 -> -1 |
| 443 | dqctm649 comparetotmag 0.0 -0 -> -1 |
| 444 | dqctm650 comparetotmag 0.0 -0.0 -> 0 |
| 445 | dqctm651 comparetotmag 0.0 0.0 -> 0 |
| 446 | dqctm652 comparetotmag -0.0 0 -> -1 |
| 447 | dqctm653 comparetotmag -0.0 -0 -> -1 |
| 448 | dqctm654 comparetotmag -0.0 -0.0 -> 0 |
| 449 | dqctm655 comparetotmag -0.0 0.0 -> 0 |
| 450 | |
| 451 | dqctm656 comparetotmag -0E1 0.0 -> 1 |
| 452 | dqctm657 comparetotmag -0E2 0.0 -> 1 |
| 453 | dqctm658 comparetotmag 0E1 0.0 -> 1 |
| 454 | dqctm659 comparetotmag 0E2 0.0 -> 1 |
| 455 | dqctm660 comparetotmag -0E1 0 -> 1 |
| 456 | dqctm661 comparetotmag -0E2 0 -> 1 |
| 457 | dqctm662 comparetotmag 0E1 0 -> 1 |
| 458 | dqctm663 comparetotmag 0E2 0 -> 1 |
| 459 | dqctm664 comparetotmag -0E1 -0E1 -> 0 |
| 460 | dqctm665 comparetotmag -0E2 -0E1 -> 1 |
| 461 | dqctm666 comparetotmag 0E1 -0E1 -> 0 |
| 462 | dqctm667 comparetotmag 0E2 -0E1 -> 1 |
| 463 | dqctm668 comparetotmag -0E1 -0E2 -> -1 |
| 464 | dqctm669 comparetotmag -0E2 -0E2 -> 0 |
| 465 | dqctm670 comparetotmag 0E1 -0E2 -> -1 |
| 466 | dqctm671 comparetotmag 0E2 -0E2 -> 0 |
| 467 | dqctm672 comparetotmag -0E1 0E1 -> 0 |
| 468 | dqctm673 comparetotmag -0E2 0E1 -> 1 |
| 469 | dqctm674 comparetotmag 0E1 0E1 -> 0 |
| 470 | dqctm675 comparetotmag 0E2 0E1 -> 1 |
| 471 | dqctm676 comparetotmag -0E1 0E2 -> -1 |
| 472 | dqctm677 comparetotmag -0E2 0E2 -> 0 |
| 473 | dqctm678 comparetotmag 0E1 0E2 -> -1 |
| 474 | dqctm679 comparetotmag 0E2 0E2 -> 0 |
| 475 | |
| 476 | -- trailing zeros; unit-y |
| 477 | dqctm680 comparetotmag 12 12 -> 0 |
| 478 | dqctm681 comparetotmag 12 12.0 -> 1 |
| 479 | dqctm682 comparetotmag 12 12.00 -> 1 |
| 480 | dqctm683 comparetotmag 12 12.000 -> 1 |
| 481 | dqctm684 comparetotmag 12 12.0000 -> 1 |
| 482 | dqctm685 comparetotmag 12 12.00000 -> 1 |
| 483 | dqctm686 comparetotmag 12 12.000000 -> 1 |
| 484 | dqctm687 comparetotmag 12 12.0000000 -> 1 |
| 485 | dqctm688 comparetotmag 12 12.00000000 -> 1 |
| 486 | dqctm689 comparetotmag 12 12.000000000 -> 1 |
| 487 | dqctm690 comparetotmag 12 12 -> 0 |
| 488 | dqctm691 comparetotmag 12.0 12 -> -1 |
| 489 | dqctm692 comparetotmag 12.00 12 -> -1 |
| 490 | dqctm693 comparetotmag 12.000 12 -> -1 |
| 491 | dqctm694 comparetotmag 12.0000 12 -> -1 |
| 492 | dqctm695 comparetotmag 12.00000 12 -> -1 |
| 493 | dqctm696 comparetotmag 12.000000 12 -> -1 |
| 494 | dqctm697 comparetotmag 12.0000000 12 -> -1 |
| 495 | dqctm698 comparetotmag 12.00000000 12 -> -1 |
| 496 | dqctm699 comparetotmag 12.000000000 12 -> -1 |
| 497 | |
| 498 | -- old long operand checks |
| 499 | dqctm701 comparetotmag 12345678000 1 -> 1 |
| 500 | dqctm702 comparetotmag 1 12345678000 -> -1 |
| 501 | dqctm703 comparetotmag 1234567800 1 -> 1 |
| 502 | dqctm704 comparetotmag 1 1234567800 -> -1 |
| 503 | dqctm705 comparetotmag 1234567890 1 -> 1 |
| 504 | dqctm706 comparetotmag 1 1234567890 -> -1 |
| 505 | dqctm707 comparetotmag 1234567891 1 -> 1 |
| 506 | dqctm708 comparetotmag 1 1234567891 -> -1 |
| 507 | dqctm709 comparetotmag 12345678901 1 -> 1 |
| 508 | dqctm710 comparetotmag 1 12345678901 -> -1 |
| 509 | dqctm711 comparetotmag 1234567896 1 -> 1 |
| 510 | dqctm712 comparetotmag 1 1234567896 -> -1 |
| 511 | dqctm713 comparetotmag -1234567891 1 -> 1 |
| 512 | dqctm714 comparetotmag 1 -1234567891 -> -1 |
| 513 | dqctm715 comparetotmag -12345678901 1 -> 1 |
| 514 | dqctm716 comparetotmag 1 -12345678901 -> -1 |
| 515 | dqctm717 comparetotmag -1234567896 1 -> 1 |
| 516 | dqctm718 comparetotmag 1 -1234567896 -> -1 |
| 517 | |
| 518 | -- old residue cases |
| 519 | dqctm740 comparetotmag 1 0.9999999 -> 1 |
| 520 | dqctm741 comparetotmag 1 0.999999 -> 1 |
| 521 | dqctm742 comparetotmag 1 0.99999 -> 1 |
| 522 | dqctm743 comparetotmag 1 1.0000 -> 1 |
| 523 | dqctm744 comparetotmag 1 1.00001 -> -1 |
| 524 | dqctm745 comparetotmag 1 1.000001 -> -1 |
| 525 | dqctm746 comparetotmag 1 1.0000001 -> -1 |
| 526 | dqctm750 comparetotmag 0.9999999 1 -> -1 |
| 527 | dqctm751 comparetotmag 0.999999 1 -> -1 |
| 528 | dqctm752 comparetotmag 0.99999 1 -> -1 |
| 529 | dqctm753 comparetotmag 1.0000 1 -> -1 |
| 530 | dqctm754 comparetotmag 1.00001 1 -> 1 |
| 531 | dqctm755 comparetotmag 1.000001 1 -> 1 |
| 532 | dqctm756 comparetotmag 1.0000001 1 -> 1 |
| 533 | |
| 534 | -- Specials |
| 535 | dqctm780 comparetotmag Inf -Inf -> 0 |
| 536 | dqctm781 comparetotmag Inf -1000 -> 1 |
| 537 | dqctm782 comparetotmag Inf -1 -> 1 |
| 538 | dqctm783 comparetotmag Inf -0 -> 1 |
| 539 | dqctm784 comparetotmag Inf 0 -> 1 |
| 540 | dqctm785 comparetotmag Inf 1 -> 1 |
| 541 | dqctm786 comparetotmag Inf 1000 -> 1 |
| 542 | dqctm787 comparetotmag Inf Inf -> 0 |
| 543 | dqctm788 comparetotmag -1000 Inf -> -1 |
| 544 | dqctm789 comparetotmag -Inf Inf -> 0 |
| 545 | dqctm790 comparetotmag -1 Inf -> -1 |
| 546 | dqctm791 comparetotmag -0 Inf -> -1 |
| 547 | dqctm792 comparetotmag 0 Inf -> -1 |
| 548 | dqctm793 comparetotmag 1 Inf -> -1 |
| 549 | dqctm794 comparetotmag 1000 Inf -> -1 |
| 550 | dqctm795 comparetotmag Inf Inf -> 0 |
| 551 | |
| 552 | dqctm800 comparetotmag -Inf -Inf -> 0 |
| 553 | dqctm801 comparetotmag -Inf -1000 -> 1 |
| 554 | dqctm802 comparetotmag -Inf -1 -> 1 |
| 555 | dqctm803 comparetotmag -Inf -0 -> 1 |
| 556 | dqctm804 comparetotmag -Inf 0 -> 1 |
| 557 | dqctm805 comparetotmag -Inf 1 -> 1 |
| 558 | dqctm806 comparetotmag -Inf 1000 -> 1 |
| 559 | dqctm807 comparetotmag -Inf Inf -> 0 |
| 560 | dqctm808 comparetotmag -Inf -Inf -> 0 |
| 561 | dqctm809 comparetotmag -1000 -Inf -> -1 |
| 562 | dqctm810 comparetotmag -1 -Inf -> -1 |
| 563 | dqctm811 comparetotmag -0 -Inf -> -1 |
| 564 | dqctm812 comparetotmag 0 -Inf -> -1 |
| 565 | dqctm813 comparetotmag 1 -Inf -> -1 |
| 566 | dqctm814 comparetotmag 1000 -Inf -> -1 |
| 567 | dqctm815 comparetotmag Inf -Inf -> 0 |
| 568 | |
| 569 | dqctm821 comparetotmag NaN -Inf -> 1 |
| 570 | dqctm822 comparetotmag NaN -1000 -> 1 |
| 571 | dqctm823 comparetotmag NaN -1 -> 1 |
| 572 | dqctm824 comparetotmag NaN -0 -> 1 |
| 573 | dqctm825 comparetotmag NaN 0 -> 1 |
| 574 | dqctm826 comparetotmag NaN 1 -> 1 |
| 575 | dqctm827 comparetotmag NaN 1000 -> 1 |
| 576 | dqctm828 comparetotmag NaN Inf -> 1 |
| 577 | dqctm829 comparetotmag NaN NaN -> 0 |
| 578 | dqctm830 comparetotmag -Inf NaN -> -1 |
| 579 | dqctm831 comparetotmag -1000 NaN -> -1 |
| 580 | dqctm832 comparetotmag -1 NaN -> -1 |
| 581 | dqctm833 comparetotmag -0 NaN -> -1 |
| 582 | dqctm834 comparetotmag 0 NaN -> -1 |
| 583 | dqctm835 comparetotmag 1 NaN -> -1 |
| 584 | dqctm836 comparetotmag 1000 NaN -> -1 |
| 585 | dqctm837 comparetotmag Inf NaN -> -1 |
| 586 | dqctm838 comparetotmag -NaN -NaN -> 0 |
| 587 | dqctm839 comparetotmag +NaN -NaN -> 0 |
| 588 | dqctm840 comparetotmag -NaN +NaN -> 0 |
| 589 | |
| 590 | dqctm841 comparetotmag sNaN -sNaN -> 0 |
| 591 | dqctm842 comparetotmag sNaN -NaN -> -1 |
| 592 | dqctm843 comparetotmag sNaN -Inf -> 1 |
| 593 | dqctm844 comparetotmag sNaN -1000 -> 1 |
| 594 | dqctm845 comparetotmag sNaN -1 -> 1 |
| 595 | dqctm846 comparetotmag sNaN -0 -> 1 |
| 596 | dqctm847 comparetotmag sNaN 0 -> 1 |
| 597 | dqctm848 comparetotmag sNaN 1 -> 1 |
| 598 | dqctm849 comparetotmag sNaN 1000 -> 1 |
| 599 | dqctm850 comparetotmag sNaN NaN -> -1 |
| 600 | dqctm851 comparetotmag sNaN sNaN -> 0 |
| 601 | |
| 602 | dqctm852 comparetotmag -sNaN sNaN -> 0 |
| 603 | dqctm853 comparetotmag -NaN sNaN -> 1 |
| 604 | dqctm854 comparetotmag -Inf sNaN -> -1 |
| 605 | dqctm855 comparetotmag -1000 sNaN -> -1 |
| 606 | dqctm856 comparetotmag -1 sNaN -> -1 |
| 607 | dqctm857 comparetotmag -0 sNaN -> -1 |
| 608 | dqctm858 comparetotmag 0 sNaN -> -1 |
| 609 | dqctm859 comparetotmag 1 sNaN -> -1 |
| 610 | dqctm860 comparetotmag 1000 sNaN -> -1 |
| 611 | dqctm861 comparetotmag Inf sNaN -> -1 |
| 612 | dqctm862 comparetotmag NaN sNaN -> 1 |
| 613 | dqctm863 comparetotmag sNaN sNaN -> 0 |
| 614 | |
| 615 | dqctm871 comparetotmag -sNaN -sNaN -> 0 |
| 616 | dqctm872 comparetotmag -sNaN -NaN -> -1 |
| 617 | dqctm873 comparetotmag -sNaN -Inf -> 1 |
| 618 | dqctm874 comparetotmag -sNaN -1000 -> 1 |
| 619 | dqctm875 comparetotmag -sNaN -1 -> 1 |
| 620 | dqctm876 comparetotmag -sNaN -0 -> 1 |
| 621 | dqctm877 comparetotmag -sNaN 0 -> 1 |
| 622 | dqctm878 comparetotmag -sNaN 1 -> 1 |
| 623 | dqctm879 comparetotmag -sNaN 1000 -> 1 |
| 624 | dqctm880 comparetotmag -sNaN NaN -> -1 |
| 625 | dqctm881 comparetotmag -sNaN sNaN -> 0 |
| 626 | |
| 627 | dqctm882 comparetotmag -sNaN -sNaN -> 0 |
| 628 | dqctm883 comparetotmag -NaN -sNaN -> 1 |
| 629 | dqctm884 comparetotmag -Inf -sNaN -> -1 |
| 630 | dqctm885 comparetotmag -1000 -sNaN -> -1 |
| 631 | dqctm886 comparetotmag -1 -sNaN -> -1 |
| 632 | dqctm887 comparetotmag -0 -sNaN -> -1 |
| 633 | dqctm888 comparetotmag 0 -sNaN -> -1 |
| 634 | dqctm889 comparetotmag 1 -sNaN -> -1 |
| 635 | dqctm890 comparetotmag 1000 -sNaN -> -1 |
| 636 | dqctm891 comparetotmag Inf -sNaN -> -1 |
| 637 | dqctm892 comparetotmag NaN -sNaN -> 1 |
| 638 | dqctm893 comparetotmag sNaN -sNaN -> 0 |
| 639 | |
| 640 | -- NaNs with payload |
| 641 | dqctm960 comparetotmag NaN9 -Inf -> 1 |
| 642 | dqctm961 comparetotmag NaN8 999 -> 1 |
| 643 | dqctm962 comparetotmag NaN77 Inf -> 1 |
| 644 | dqctm963 comparetotmag -NaN67 NaN5 -> 1 |
| 645 | dqctm964 comparetotmag -Inf -NaN4 -> -1 |
| 646 | dqctm965 comparetotmag -999 -NaN33 -> -1 |
| 647 | dqctm966 comparetotmag Inf NaN2 -> -1 |
| 648 | |
| 649 | dqctm970 comparetotmag -NaN41 -NaN42 -> -1 |
| 650 | dqctm971 comparetotmag +NaN41 -NaN42 -> -1 |
| 651 | dqctm972 comparetotmag -NaN41 +NaN42 -> -1 |
| 652 | dqctm973 comparetotmag +NaN41 +NaN42 -> -1 |
| 653 | dqctm974 comparetotmag -NaN42 -NaN01 -> 1 |
| 654 | dqctm975 comparetotmag +NaN42 -NaN01 -> 1 |
| 655 | dqctm976 comparetotmag -NaN42 +NaN01 -> 1 |
| 656 | dqctm977 comparetotmag +NaN42 +NaN01 -> 1 |
| 657 | |
| 658 | dqctm980 comparetotmag -sNaN771 -sNaN772 -> -1 |
| 659 | dqctm981 comparetotmag +sNaN771 -sNaN772 -> -1 |
| 660 | dqctm982 comparetotmag -sNaN771 +sNaN772 -> -1 |
| 661 | dqctm983 comparetotmag +sNaN771 +sNaN772 -> -1 |
| 662 | dqctm984 comparetotmag -sNaN772 -sNaN771 -> 1 |
| 663 | dqctm985 comparetotmag +sNaN772 -sNaN771 -> 1 |
| 664 | dqctm986 comparetotmag -sNaN772 +sNaN771 -> 1 |
| 665 | dqctm987 comparetotmag +sNaN772 +sNaN771 -> 1 |
| 666 | |
| 667 | dqctm991 comparetotmag -sNaN99 -Inf -> 1 |
| 668 | dqctm992 comparetotmag sNaN98 -11 -> 1 |
| 669 | dqctm993 comparetotmag sNaN97 NaN -> -1 |
| 670 | dqctm994 comparetotmag sNaN16 sNaN94 -> -1 |
| 671 | dqctm995 comparetotmag NaN85 sNaN83 -> 1 |
| 672 | dqctm996 comparetotmag -Inf sNaN92 -> -1 |
| 673 | dqctm997 comparetotmag 088 sNaN81 -> -1 |
| 674 | dqctm998 comparetotmag Inf sNaN90 -> -1 |
| 675 | dqctm999 comparetotmag NaN -sNaN89 -> 1 |
| 676 | |
| 677 | -- spread zeros |
| 678 | dqctm1110 comparetotmag 0E-6143 0 -> -1 |
| 679 | dqctm1111 comparetotmag 0E-6143 -0 -> -1 |
| 680 | dqctm1112 comparetotmag -0E-6143 0 -> -1 |
| 681 | dqctm1113 comparetotmag -0E-6143 -0 -> -1 |
| 682 | dqctm1114 comparetotmag 0E-6143 0E+6144 -> -1 |
| 683 | dqctm1115 comparetotmag 0E-6143 -0E+6144 -> -1 |
| 684 | dqctm1116 comparetotmag -0E-6143 0E+6144 -> -1 |
| 685 | dqctm1117 comparetotmag -0E-6143 -0E+6144 -> -1 |
| 686 | dqctm1118 comparetotmag 0 0E+6144 -> -1 |
| 687 | dqctm1119 comparetotmag 0 -0E+6144 -> -1 |
| 688 | dqctm1120 comparetotmag -0 0E+6144 -> -1 |
| 689 | dqctm1121 comparetotmag -0 -0E+6144 -> -1 |
| 690 | |
| 691 | dqctm1130 comparetotmag 0E+6144 0 -> 1 |
| 692 | dqctm1131 comparetotmag 0E+6144 -0 -> 1 |
| 693 | dqctm1132 comparetotmag -0E+6144 0 -> 1 |
| 694 | dqctm1133 comparetotmag -0E+6144 -0 -> 1 |
| 695 | dqctm1134 comparetotmag 0E+6144 0E-6143 -> 1 |
| 696 | dqctm1135 comparetotmag 0E+6144 -0E-6143 -> 1 |
| 697 | dqctm1136 comparetotmag -0E+6144 0E-6143 -> 1 |
| 698 | dqctm1137 comparetotmag -0E+6144 -0E-6143 -> 1 |
| 699 | dqctm1138 comparetotmag 0 0E-6143 -> 1 |
| 700 | dqctm1139 comparetotmag 0 -0E-6143 -> 1 |
| 701 | dqctm1140 comparetotmag -0 0E-6143 -> 1 |
| 702 | dqctm1141 comparetotmag -0 -0E-6143 -> 1 |
| 703 | |
| 704 | -- Null tests |
| 705 | dqctm9990 comparetotmag 10 # -> NaN Invalid_operation |
| 706 | dqctm9991 comparetotmag # 10 -> NaN Invalid_operation |