symbian-qemu-0.9.1-12/python-win32-2.6.1/lib/test/decimaltestdata/compare.decTest
changeset 1 2fb8b9db1c86
equal deleted inserted replaced
0:ffa851df0825 1:2fb8b9db1c86
       
     1 ------------------------------------------------------------------------
       
     2 -- compare.decTest -- decimal comparison that allows quiet NaNs       --
       
     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.58
       
    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 extended: 1
       
    27 
       
    28 precision:   9
       
    29 rounding:    half_up
       
    30 maxExponent: 999
       
    31 minexponent: -999
       
    32 
       
    33 -- sanity checks
       
    34 comx001 compare  -2  -2  -> 0
       
    35 comx002 compare  -2  -1  -> -1
       
    36 comx003 compare  -2   0  -> -1
       
    37 comx004 compare  -2   1  -> -1
       
    38 comx005 compare  -2   2  -> -1
       
    39 comx006 compare  -1  -2  -> 1
       
    40 comx007 compare  -1  -1  -> 0
       
    41 comx008 compare  -1   0  -> -1
       
    42 comx009 compare  -1   1  -> -1
       
    43 comx010 compare  -1   2  -> -1
       
    44 comx011 compare   0  -2  -> 1
       
    45 comx012 compare   0  -1  -> 1
       
    46 comx013 compare   0   0  -> 0
       
    47 comx014 compare   0   1  -> -1
       
    48 comx015 compare   0   2  -> -1
       
    49 comx016 compare   1  -2  -> 1
       
    50 comx017 compare   1  -1  -> 1
       
    51 comx018 compare   1   0  -> 1
       
    52 comx019 compare   1   1  -> 0
       
    53 comx020 compare   1   2  -> -1
       
    54 comx021 compare   2  -2  -> 1
       
    55 comx022 compare   2  -1  -> 1
       
    56 comx023 compare   2   0  -> 1
       
    57 comx025 compare   2   1  -> 1
       
    58 comx026 compare   2   2  -> 0
       
    59 
       
    60 comx031 compare  -20  -20  -> 0
       
    61 comx032 compare  -20  -10  -> -1
       
    62 comx033 compare  -20   00  -> -1
       
    63 comx034 compare  -20   10  -> -1
       
    64 comx035 compare  -20   20  -> -1
       
    65 comx036 compare  -10  -20  -> 1
       
    66 comx037 compare  -10  -10  -> 0
       
    67 comx038 compare  -10   00  -> -1
       
    68 comx039 compare  -10   10  -> -1
       
    69 comx040 compare  -10   20  -> -1
       
    70 comx041 compare   00  -20  -> 1
       
    71 comx042 compare   00  -10  -> 1
       
    72 comx043 compare   00   00  -> 0
       
    73 comx044 compare   00   10  -> -1
       
    74 comx045 compare   00   20  -> -1
       
    75 comx046 compare   10  -20  -> 1
       
    76 comx047 compare   10  -10  -> 1
       
    77 comx048 compare   10   00  -> 1
       
    78 comx049 compare   10   10  -> 0
       
    79 comx050 compare   10   20  -> -1
       
    80 comx051 compare   20  -20  -> 1
       
    81 comx052 compare   20  -10  -> 1
       
    82 comx053 compare   20   00  -> 1
       
    83 comx055 compare   20   10  -> 1
       
    84 comx056 compare   20   20  -> 0
       
    85 
       
    86 comx061 compare  -2.0  -2.0  -> 0
       
    87 comx062 compare  -2.0  -1.0  -> -1
       
    88 comx063 compare  -2.0   0.0  -> -1
       
    89 comx064 compare  -2.0   1.0  -> -1
       
    90 comx065 compare  -2.0   2.0  -> -1
       
    91 comx066 compare  -1.0  -2.0  -> 1
       
    92 comx067 compare  -1.0  -1.0  -> 0
       
    93 comx068 compare  -1.0   0.0  -> -1
       
    94 comx069 compare  -1.0   1.0  -> -1
       
    95 comx070 compare  -1.0   2.0  -> -1
       
    96 comx071 compare   0.0  -2.0  -> 1
       
    97 comx072 compare   0.0  -1.0  -> 1
       
    98 comx073 compare   0.0   0.0  -> 0
       
    99 comx074 compare   0.0   1.0  -> -1
       
   100 comx075 compare   0.0   2.0  -> -1
       
   101 comx076 compare   1.0  -2.0  -> 1
       
   102 comx077 compare   1.0  -1.0  -> 1
       
   103 comx078 compare   1.0   0.0  -> 1
       
   104 comx079 compare   1.0   1.0  -> 0
       
   105 comx080 compare   1.0   2.0  -> -1
       
   106 comx081 compare   2.0  -2.0  -> 1
       
   107 comx082 compare   2.0  -1.0  -> 1
       
   108 comx083 compare   2.0   0.0  -> 1
       
   109 comx085 compare   2.0   1.0  -> 1
       
   110 comx086 compare   2.0   2.0  -> 0
       
   111 
       
   112 -- now some cases which might overflow if subtract were used
       
   113 maxexponent: 999999999
       
   114 minexponent: -999999999
       
   115 comx095 compare  9.99999999E+999999999 9.99999999E+999999999  -> 0
       
   116 comx096 compare -9.99999999E+999999999 9.99999999E+999999999  -> -1
       
   117 comx097 compare  9.99999999E+999999999 -9.99999999E+999999999 -> 1
       
   118 comx098 compare -9.99999999E+999999999 -9.99999999E+999999999 -> 0
       
   119 
       
   120 -- some differing length/exponent cases
       
   121 comx100 compare   7.0    7.0    -> 0
       
   122 comx101 compare   7.0    7      -> 0
       
   123 comx102 compare   7      7.0    -> 0
       
   124 comx103 compare   7E+0   7.0    -> 0
       
   125 comx104 compare   70E-1  7.0    -> 0
       
   126 comx105 compare   0.7E+1 7      -> 0
       
   127 comx106 compare   70E-1  7      -> 0
       
   128 comx107 compare   7.0    7E+0   -> 0
       
   129 comx108 compare   7.0    70E-1  -> 0
       
   130 comx109 compare   7      0.7E+1 -> 0
       
   131 comx110 compare   7      70E-1  -> 0
       
   132 
       
   133 comx120 compare   8.0    7.0    -> 1
       
   134 comx121 compare   8.0    7      -> 1
       
   135 comx122 compare   8      7.0    -> 1
       
   136 comx123 compare   8E+0   7.0    -> 1
       
   137 comx124 compare   80E-1  7.0    -> 1
       
   138 comx125 compare   0.8E+1 7      -> 1
       
   139 comx126 compare   80E-1  7      -> 1
       
   140 comx127 compare   8.0    7E+0   -> 1
       
   141 comx128 compare   8.0    70E-1  -> 1
       
   142 comx129 compare   8      0.7E+1  -> 1
       
   143 comx130 compare   8      70E-1  -> 1
       
   144 
       
   145 comx140 compare   8.0    9.0    -> -1
       
   146 comx141 compare   8.0    9      -> -1
       
   147 comx142 compare   8      9.0    -> -1
       
   148 comx143 compare   8E+0   9.0    -> -1
       
   149 comx144 compare   80E-1  9.0    -> -1
       
   150 comx145 compare   0.8E+1 9      -> -1
       
   151 comx146 compare   80E-1  9      -> -1
       
   152 comx147 compare   8.0    9E+0   -> -1
       
   153 comx148 compare   8.0    90E-1  -> -1
       
   154 comx149 compare   8      0.9E+1 -> -1
       
   155 comx150 compare   8      90E-1  -> -1
       
   156 
       
   157 -- and again, with sign changes -+ ..
       
   158 comx200 compare  -7.0    7.0    -> -1
       
   159 comx201 compare  -7.0    7      -> -1
       
   160 comx202 compare  -7      7.0    -> -1
       
   161 comx203 compare  -7E+0   7.0    -> -1
       
   162 comx204 compare  -70E-1  7.0    -> -1
       
   163 comx205 compare  -0.7E+1 7      -> -1
       
   164 comx206 compare  -70E-1  7      -> -1
       
   165 comx207 compare  -7.0    7E+0   -> -1
       
   166 comx208 compare  -7.0    70E-1  -> -1
       
   167 comx209 compare  -7      0.7E+1 -> -1
       
   168 comx210 compare  -7      70E-1  -> -1
       
   169 
       
   170 comx220 compare  -8.0    7.0    -> -1
       
   171 comx221 compare  -8.0    7      -> -1
       
   172 comx222 compare  -8      7.0    -> -1
       
   173 comx223 compare  -8E+0   7.0    -> -1
       
   174 comx224 compare  -80E-1  7.0    -> -1
       
   175 comx225 compare  -0.8E+1 7      -> -1
       
   176 comx226 compare  -80E-1  7      -> -1
       
   177 comx227 compare  -8.0    7E+0   -> -1
       
   178 comx228 compare  -8.0    70E-1  -> -1
       
   179 comx229 compare  -8      0.7E+1 -> -1
       
   180 comx230 compare  -8      70E-1  -> -1
       
   181 
       
   182 comx240 compare  -8.0    9.0    -> -1
       
   183 comx241 compare  -8.0    9      -> -1
       
   184 comx242 compare  -8      9.0    -> -1
       
   185 comx243 compare  -8E+0   9.0    -> -1
       
   186 comx244 compare  -80E-1  9.0    -> -1
       
   187 comx245 compare  -0.8E+1 9      -> -1
       
   188 comx246 compare  -80E-1  9      -> -1
       
   189 comx247 compare  -8.0    9E+0   -> -1
       
   190 comx248 compare  -8.0    90E-1  -> -1
       
   191 comx249 compare  -8      0.9E+1 -> -1
       
   192 comx250 compare  -8      90E-1  -> -1
       
   193 
       
   194 -- and again, with sign changes +- ..
       
   195 comx300 compare   7.0    -7.0    -> 1
       
   196 comx301 compare   7.0    -7      -> 1
       
   197 comx302 compare   7      -7.0    -> 1
       
   198 comx303 compare   7E+0   -7.0    -> 1
       
   199 comx304 compare   70E-1  -7.0    -> 1
       
   200 comx305 compare   .7E+1  -7      -> 1
       
   201 comx306 compare   70E-1  -7      -> 1
       
   202 comx307 compare   7.0    -7E+0   -> 1
       
   203 comx308 compare   7.0    -70E-1  -> 1
       
   204 comx309 compare   7      -.7E+1  -> 1
       
   205 comx310 compare   7      -70E-1  -> 1
       
   206 
       
   207 comx320 compare   8.0    -7.0    -> 1
       
   208 comx321 compare   8.0    -7      -> 1
       
   209 comx322 compare   8      -7.0    -> 1
       
   210 comx323 compare   8E+0   -7.0    -> 1
       
   211 comx324 compare   80E-1  -7.0    -> 1
       
   212 comx325 compare   .8E+1  -7      -> 1
       
   213 comx326 compare   80E-1  -7      -> 1
       
   214 comx327 compare   8.0    -7E+0   -> 1
       
   215 comx328 compare   8.0    -70E-1  -> 1
       
   216 comx329 compare   8      -.7E+1  -> 1
       
   217 comx330 compare   8      -70E-1  -> 1
       
   218 
       
   219 comx340 compare   8.0    -9.0    -> 1
       
   220 comx341 compare   8.0    -9      -> 1
       
   221 comx342 compare   8      -9.0    -> 1
       
   222 comx343 compare   8E+0   -9.0    -> 1
       
   223 comx344 compare   80E-1  -9.0    -> 1
       
   224 comx345 compare   .8E+1  -9      -> 1
       
   225 comx346 compare   80E-1  -9      -> 1
       
   226 comx347 compare   8.0    -9E+0   -> 1
       
   227 comx348 compare   8.0    -90E-1  -> 1
       
   228 comx349 compare   8      -.9E+1  -> 1
       
   229 comx350 compare   8      -90E-1  -> 1
       
   230 
       
   231 -- and again, with sign changes -- ..
       
   232 comx400 compare   -7.0    -7.0    -> 0
       
   233 comx401 compare   -7.0    -7      -> 0
       
   234 comx402 compare   -7      -7.0    -> 0
       
   235 comx403 compare   -7E+0   -7.0    -> 0
       
   236 comx404 compare   -70E-1  -7.0    -> 0
       
   237 comx405 compare   -.7E+1  -7      -> 0
       
   238 comx406 compare   -70E-1  -7      -> 0
       
   239 comx407 compare   -7.0    -7E+0   -> 0
       
   240 comx408 compare   -7.0    -70E-1  -> 0
       
   241 comx409 compare   -7      -.7E+1  -> 0
       
   242 comx410 compare   -7      -70E-1  -> 0
       
   243 
       
   244 comx420 compare   -8.0    -7.0    -> -1
       
   245 comx421 compare   -8.0    -7      -> -1
       
   246 comx422 compare   -8      -7.0    -> -1
       
   247 comx423 compare   -8E+0   -7.0    -> -1
       
   248 comx424 compare   -80E-1  -7.0    -> -1
       
   249 comx425 compare   -.8E+1  -7      -> -1
       
   250 comx426 compare   -80E-1  -7      -> -1
       
   251 comx427 compare   -8.0    -7E+0   -> -1
       
   252 comx428 compare   -8.0    -70E-1  -> -1
       
   253 comx429 compare   -8      -.7E+1  -> -1
       
   254 comx430 compare   -8      -70E-1  -> -1
       
   255 
       
   256 comx440 compare   -8.0    -9.0    -> 1
       
   257 comx441 compare   -8.0    -9      -> 1
       
   258 comx442 compare   -8      -9.0    -> 1
       
   259 comx443 compare   -8E+0   -9.0    -> 1
       
   260 comx444 compare   -80E-1  -9.0    -> 1
       
   261 comx445 compare   -.8E+1  -9      -> 1
       
   262 comx446 compare   -80E-1  -9      -> 1
       
   263 comx447 compare   -8.0    -9E+0   -> 1
       
   264 comx448 compare   -8.0    -90E-1  -> 1
       
   265 comx449 compare   -8      -.9E+1  -> 1
       
   266 comx450 compare   -8      -90E-1  -> 1
       
   267 
       
   268 -- misalignment traps for little-endian
       
   269 comx451 compare      1.0       0.1  -> 1
       
   270 comx452 compare      0.1       1.0  -> -1
       
   271 comx453 compare     10.0       0.1  -> 1
       
   272 comx454 compare      0.1      10.0  -> -1
       
   273 comx455 compare      100       1.0  -> 1
       
   274 comx456 compare      1.0       100  -> -1
       
   275 comx457 compare     1000      10.0  -> 1
       
   276 comx458 compare     10.0      1000  -> -1
       
   277 comx459 compare    10000     100.0  -> 1
       
   278 comx460 compare    100.0     10000  -> -1
       
   279 comx461 compare   100000    1000.0  -> 1
       
   280 comx462 compare   1000.0    100000  -> -1
       
   281 comx463 compare  1000000   10000.0  -> 1
       
   282 comx464 compare  10000.0   1000000  -> -1
       
   283 
       
   284 -- testcases that subtract to lots of zeros at boundaries [pgr]
       
   285 precision: 40
       
   286 comx470 compare 123.4560000000000000E789 123.456E789 -> 0
       
   287 comx471 compare 123.456000000000000E-89 123.456E-89 -> 0
       
   288 comx472 compare 123.45600000000000E789 123.456E789 -> 0
       
   289 comx473 compare 123.4560000000000E-89 123.456E-89 -> 0
       
   290 comx474 compare 123.456000000000E789 123.456E789 -> 0
       
   291 comx475 compare 123.45600000000E-89 123.456E-89 -> 0
       
   292 comx476 compare 123.4560000000E789 123.456E789 -> 0
       
   293 comx477 compare 123.456000000E-89 123.456E-89 -> 0
       
   294 comx478 compare 123.45600000E789 123.456E789 -> 0
       
   295 comx479 compare 123.4560000E-89 123.456E-89 -> 0
       
   296 comx480 compare 123.456000E789 123.456E789 -> 0
       
   297 comx481 compare 123.45600E-89 123.456E-89 -> 0
       
   298 comx482 compare 123.4560E789 123.456E789 -> 0
       
   299 comx483 compare 123.456E-89 123.456E-89 -> 0
       
   300 comx484 compare 123.456E-89 123.4560000000000000E-89 -> 0
       
   301 comx485 compare 123.456E789 123.456000000000000E789 -> 0
       
   302 comx486 compare 123.456E-89 123.45600000000000E-89 -> 0
       
   303 comx487 compare 123.456E789 123.4560000000000E789 -> 0
       
   304 comx488 compare 123.456E-89 123.456000000000E-89 -> 0
       
   305 comx489 compare 123.456E789 123.45600000000E789 -> 0
       
   306 comx490 compare 123.456E-89 123.4560000000E-89 -> 0
       
   307 comx491 compare 123.456E789 123.456000000E789 -> 0
       
   308 comx492 compare 123.456E-89 123.45600000E-89 -> 0
       
   309 comx493 compare 123.456E789 123.4560000E789 -> 0
       
   310 comx494 compare 123.456E-89 123.456000E-89 -> 0
       
   311 comx495 compare 123.456E789 123.45600E789 -> 0
       
   312 comx496 compare 123.456E-89 123.4560E-89 -> 0
       
   313 comx497 compare 123.456E789 123.456E789 -> 0
       
   314 
       
   315 -- wide-ranging, around precision; signs equal
       
   316 precision: 9
       
   317 comx500 compare    1     1E-15    -> 1
       
   318 comx501 compare    1     1E-14    -> 1
       
   319 comx502 compare    1     1E-13    -> 1
       
   320 comx503 compare    1     1E-12    -> 1
       
   321 comx504 compare    1     1E-11    -> 1
       
   322 comx505 compare    1     1E-10    -> 1
       
   323 comx506 compare    1     1E-9     -> 1
       
   324 comx507 compare    1     1E-8     -> 1
       
   325 comx508 compare    1     1E-7     -> 1
       
   326 comx509 compare    1     1E-6     -> 1
       
   327 comx510 compare    1     1E-5     -> 1
       
   328 comx511 compare    1     1E-4     -> 1
       
   329 comx512 compare    1     1E-3     -> 1
       
   330 comx513 compare    1     1E-2     -> 1
       
   331 comx514 compare    1     1E-1     -> 1
       
   332 comx515 compare    1     1E-0     -> 0
       
   333 comx516 compare    1     1E+1     -> -1
       
   334 comx517 compare    1     1E+2     -> -1
       
   335 comx518 compare    1     1E+3     -> -1
       
   336 comx519 compare    1     1E+4     -> -1
       
   337 comx521 compare    1     1E+5     -> -1
       
   338 comx522 compare    1     1E+6     -> -1
       
   339 comx523 compare    1     1E+7     -> -1
       
   340 comx524 compare    1     1E+8     -> -1
       
   341 comx525 compare    1     1E+9     -> -1
       
   342 comx526 compare    1     1E+10    -> -1
       
   343 comx527 compare    1     1E+11    -> -1
       
   344 comx528 compare    1     1E+12    -> -1
       
   345 comx529 compare    1     1E+13    -> -1
       
   346 comx530 compare    1     1E+14    -> -1
       
   347 comx531 compare    1     1E+15    -> -1
       
   348 -- LR swap
       
   349 comx540 compare    1E-15  1       -> -1
       
   350 comx541 compare    1E-14  1       -> -1
       
   351 comx542 compare    1E-13  1       -> -1
       
   352 comx543 compare    1E-12  1       -> -1
       
   353 comx544 compare    1E-11  1       -> -1
       
   354 comx545 compare    1E-10  1       -> -1
       
   355 comx546 compare    1E-9   1       -> -1
       
   356 comx547 compare    1E-8   1       -> -1
       
   357 comx548 compare    1E-7   1       -> -1
       
   358 comx549 compare    1E-6   1       -> -1
       
   359 comx550 compare    1E-5   1       -> -1
       
   360 comx551 compare    1E-4   1       -> -1
       
   361 comx552 compare    1E-3   1       -> -1
       
   362 comx553 compare    1E-2   1       -> -1
       
   363 comx554 compare    1E-1   1       -> -1
       
   364 comx555 compare    1E-0   1       ->  0
       
   365 comx556 compare    1E+1   1       ->  1
       
   366 comx557 compare    1E+2   1       ->  1
       
   367 comx558 compare    1E+3   1       ->  1
       
   368 comx559 compare    1E+4   1       ->  1
       
   369 comx561 compare    1E+5   1       ->  1
       
   370 comx562 compare    1E+6   1       ->  1
       
   371 comx563 compare    1E+7   1       ->  1
       
   372 comx564 compare    1E+8   1       ->  1
       
   373 comx565 compare    1E+9   1       ->  1
       
   374 comx566 compare    1E+10  1       ->  1
       
   375 comx567 compare    1E+11  1       ->  1
       
   376 comx568 compare    1E+12  1       ->  1
       
   377 comx569 compare    1E+13  1       ->  1
       
   378 comx570 compare    1E+14  1       ->  1
       
   379 comx571 compare    1E+15  1       ->  1
       
   380 -- similar with a useful coefficient, one side only
       
   381 comx580 compare  0.000000987654321     1E-15    -> 1
       
   382 comx581 compare  0.000000987654321     1E-14    -> 1
       
   383 comx582 compare  0.000000987654321     1E-13    -> 1
       
   384 comx583 compare  0.000000987654321     1E-12    -> 1
       
   385 comx584 compare  0.000000987654321     1E-11    -> 1
       
   386 comx585 compare  0.000000987654321     1E-10    -> 1
       
   387 comx586 compare  0.000000987654321     1E-9     -> 1
       
   388 comx587 compare  0.000000987654321     1E-8     -> 1
       
   389 comx588 compare  0.000000987654321     1E-7     -> 1
       
   390 comx589 compare  0.000000987654321     1E-6     -> -1
       
   391 comx590 compare  0.000000987654321     1E-5     -> -1
       
   392 comx591 compare  0.000000987654321     1E-4     -> -1
       
   393 comx592 compare  0.000000987654321     1E-3     -> -1
       
   394 comx593 compare  0.000000987654321     1E-2     -> -1
       
   395 comx594 compare  0.000000987654321     1E-1     -> -1
       
   396 comx595 compare  0.000000987654321     1E-0     -> -1
       
   397 comx596 compare  0.000000987654321     1E+1     -> -1
       
   398 comx597 compare  0.000000987654321     1E+2     -> -1
       
   399 comx598 compare  0.000000987654321     1E+3     -> -1
       
   400 comx599 compare  0.000000987654321     1E+4     -> -1
       
   401 
       
   402 -- check some unit-y traps
       
   403 precision: 20
       
   404 comx600 compare   12            12.2345 -> -1
       
   405 comx601 compare   12.0          12.2345 -> -1
       
   406 comx602 compare   12.00         12.2345 -> -1
       
   407 comx603 compare   12.000        12.2345 -> -1
       
   408 comx604 compare   12.0000       12.2345 -> -1
       
   409 comx605 compare   12.00000      12.2345 -> -1
       
   410 comx606 compare   12.000000     12.2345 -> -1
       
   411 comx607 compare   12.0000000    12.2345 -> -1
       
   412 comx608 compare   12.00000000   12.2345 -> -1
       
   413 comx609 compare   12.000000000  12.2345 -> -1
       
   414 comx610 compare   12.1234 12            ->  1
       
   415 comx611 compare   12.1234 12.0          ->  1
       
   416 comx612 compare   12.1234 12.00         ->  1
       
   417 comx613 compare   12.1234 12.000        ->  1
       
   418 comx614 compare   12.1234 12.0000       ->  1
       
   419 comx615 compare   12.1234 12.00000      ->  1
       
   420 comx616 compare   12.1234 12.000000     ->  1
       
   421 comx617 compare   12.1234 12.0000000    ->  1
       
   422 comx618 compare   12.1234 12.00000000   ->  1
       
   423 comx619 compare   12.1234 12.000000000  ->  1
       
   424 comx620 compare  -12           -12.2345 ->  1
       
   425 comx621 compare  -12.0         -12.2345 ->  1
       
   426 comx622 compare  -12.00        -12.2345 ->  1
       
   427 comx623 compare  -12.000       -12.2345 ->  1
       
   428 comx624 compare  -12.0000      -12.2345 ->  1
       
   429 comx625 compare  -12.00000     -12.2345 ->  1
       
   430 comx626 compare  -12.000000    -12.2345 ->  1
       
   431 comx627 compare  -12.0000000   -12.2345 ->  1
       
   432 comx628 compare  -12.00000000  -12.2345 ->  1
       
   433 comx629 compare  -12.000000000 -12.2345 ->  1
       
   434 comx630 compare  -12.1234 -12           -> -1
       
   435 comx631 compare  -12.1234 -12.0         -> -1
       
   436 comx632 compare  -12.1234 -12.00        -> -1
       
   437 comx633 compare  -12.1234 -12.000       -> -1
       
   438 comx634 compare  -12.1234 -12.0000      -> -1
       
   439 comx635 compare  -12.1234 -12.00000     -> -1
       
   440 comx636 compare  -12.1234 -12.000000    -> -1
       
   441 comx637 compare  -12.1234 -12.0000000   -> -1
       
   442 comx638 compare  -12.1234 -12.00000000  -> -1
       
   443 comx639 compare  -12.1234 -12.000000000 -> -1
       
   444 precision: 9
       
   445 
       
   446 -- extended zeros
       
   447 comx640 compare   0     0   -> 0
       
   448 comx641 compare   0    -0   -> 0
       
   449 comx642 compare   0    -0.0 -> 0
       
   450 comx643 compare   0     0.0 -> 0
       
   451 comx644 compare  -0     0   -> 0
       
   452 comx645 compare  -0    -0   -> 0
       
   453 comx646 compare  -0    -0.0 -> 0
       
   454 comx647 compare  -0     0.0 -> 0
       
   455 comx648 compare   0.0   0   -> 0
       
   456 comx649 compare   0.0  -0   -> 0
       
   457 comx650 compare   0.0  -0.0 -> 0
       
   458 comx651 compare   0.0   0.0 -> 0
       
   459 comx652 compare  -0.0   0   -> 0
       
   460 comx653 compare  -0.0  -0   -> 0
       
   461 comx654 compare  -0.0  -0.0 -> 0
       
   462 comx655 compare  -0.0   0.0 -> 0
       
   463 
       
   464 comx656 compare  -0E1   0.0 -> 0
       
   465 comx657 compare  -0E2   0.0 -> 0
       
   466 comx658 compare   0E1   0.0 -> 0
       
   467 comx659 compare   0E2   0.0 -> 0
       
   468 comx660 compare  -0E1   0   -> 0
       
   469 comx661 compare  -0E2   0   -> 0
       
   470 comx662 compare   0E1   0   -> 0
       
   471 comx663 compare   0E2   0   -> 0
       
   472 comx664 compare  -0E1  -0E1 -> 0
       
   473 comx665 compare  -0E2  -0E1 -> 0
       
   474 comx666 compare   0E1  -0E1 -> 0
       
   475 comx667 compare   0E2  -0E1 -> 0
       
   476 comx668 compare  -0E1  -0E2 -> 0
       
   477 comx669 compare  -0E2  -0E2 -> 0
       
   478 comx670 compare   0E1  -0E2 -> 0
       
   479 comx671 compare   0E2  -0E2 -> 0
       
   480 comx672 compare  -0E1   0E1 -> 0
       
   481 comx673 compare  -0E2   0E1 -> 0
       
   482 comx674 compare   0E1   0E1 -> 0
       
   483 comx675 compare   0E2   0E1 -> 0
       
   484 comx676 compare  -0E1   0E2 -> 0
       
   485 comx677 compare  -0E2   0E2 -> 0
       
   486 comx678 compare   0E1   0E2 -> 0
       
   487 comx679 compare   0E2   0E2 -> 0
       
   488 
       
   489 -- trailing zeros; unit-y
       
   490 precision: 20
       
   491 comx680 compare   12    12           -> 0
       
   492 comx681 compare   12    12.0         -> 0
       
   493 comx682 compare   12    12.00        -> 0
       
   494 comx683 compare   12    12.000       -> 0
       
   495 comx684 compare   12    12.0000      -> 0
       
   496 comx685 compare   12    12.00000     -> 0
       
   497 comx686 compare   12    12.000000    -> 0
       
   498 comx687 compare   12    12.0000000   -> 0
       
   499 comx688 compare   12    12.00000000  -> 0
       
   500 comx689 compare   12    12.000000000 -> 0
       
   501 comx690 compare   12              12 -> 0
       
   502 comx691 compare   12.0            12 -> 0
       
   503 comx692 compare   12.00           12 -> 0
       
   504 comx693 compare   12.000          12 -> 0
       
   505 comx694 compare   12.0000         12 -> 0
       
   506 comx695 compare   12.00000        12 -> 0
       
   507 comx696 compare   12.000000       12 -> 0
       
   508 comx697 compare   12.0000000      12 -> 0
       
   509 comx698 compare   12.00000000     12 -> 0
       
   510 comx699 compare   12.000000000    12 -> 0
       
   511 
       
   512 -- long operand checks
       
   513 maxexponent: 999
       
   514 minexponent: -999
       
   515 precision: 9
       
   516 comx701 compare 12345678000  1 ->  1
       
   517 comx702 compare 1 12345678000  -> -1
       
   518 comx703 compare 1234567800   1 ->  1
       
   519 comx704 compare 1 1234567800   -> -1
       
   520 comx705 compare 1234567890   1 ->  1
       
   521 comx706 compare 1 1234567890   -> -1
       
   522 comx707 compare 1234567891   1 ->  1
       
   523 comx708 compare 1 1234567891   -> -1
       
   524 comx709 compare 12345678901  1 ->  1
       
   525 comx710 compare 1 12345678901  -> -1
       
   526 comx711 compare 1234567896   1 ->  1
       
   527 comx712 compare 1 1234567896   -> -1
       
   528 comx713 compare -1234567891  1 -> -1
       
   529 comx714 compare 1 -1234567891  ->  1
       
   530 comx715 compare -12345678901 1 -> -1
       
   531 comx716 compare 1 -12345678901 ->  1
       
   532 comx717 compare -1234567896  1 -> -1
       
   533 comx718 compare 1 -1234567896  ->  1
       
   534 
       
   535 precision: 15
       
   536 -- same with plenty of precision
       
   537 comx721 compare 12345678000 1 -> 1
       
   538 comx722 compare 1 12345678000 -> -1
       
   539 comx723 compare 1234567800  1 -> 1
       
   540 comx724 compare 1 1234567800  -> -1
       
   541 comx725 compare 1234567890  1 -> 1
       
   542 comx726 compare 1 1234567890  -> -1
       
   543 comx727 compare 1234567891  1 -> 1
       
   544 comx728 compare 1 1234567891  -> -1
       
   545 comx729 compare 12345678901 1 -> 1
       
   546 comx730 compare 1 12345678901 -> -1
       
   547 comx731 compare 1234567896  1 -> 1
       
   548 comx732 compare 1 1234567896  -> -1
       
   549 
       
   550 -- residue cases
       
   551 precision: 5
       
   552 comx740 compare  1  0.9999999  -> 1
       
   553 comx741 compare  1  0.999999   -> 1
       
   554 comx742 compare  1  0.99999    -> 1
       
   555 comx743 compare  1  1.0000     -> 0
       
   556 comx744 compare  1  1.00001    -> -1
       
   557 comx745 compare  1  1.000001   -> -1
       
   558 comx746 compare  1  1.0000001  -> -1
       
   559 comx750 compare  0.9999999  1  -> -1
       
   560 comx751 compare  0.999999   1  -> -1
       
   561 comx752 compare  0.99999    1  -> -1
       
   562 comx753 compare  1.0000     1  -> 0
       
   563 comx754 compare  1.00001    1  -> 1
       
   564 comx755 compare  1.000001   1  -> 1
       
   565 comx756 compare  1.0000001  1  -> 1
       
   566 
       
   567 -- a selection of longies
       
   568 comx760 compare -36852134.84194296250843579428931 -5830629.8347085025808756560357940 -> -1
       
   569 comx761 compare -36852134.84194296250843579428931 -36852134.84194296250843579428931  -> 0
       
   570 comx762 compare -36852134.94194296250843579428931 -36852134.84194296250843579428931  -> -1
       
   571 comx763 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   572 -- precisions above or below the difference should have no effect
       
   573 precision:   11
       
   574 comx764 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   575 precision:   10
       
   576 comx765 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   577 precision:    9
       
   578 comx766 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   579 precision:    8
       
   580 comx767 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   581 precision:    7
       
   582 comx768 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   583 precision:    6
       
   584 comx769 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   585 precision:    5
       
   586 comx770 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   587 precision:    4
       
   588 comx771 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   589 precision:    3
       
   590 comx772 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   591 precision:    2
       
   592 comx773 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   593 precision:    1
       
   594 comx774 compare -36852134.84194296250843579428931 -36852134.94194296250843579428931  -> 1
       
   595 
       
   596 -- Specials
       
   597 precision:   9
       
   598 comx780 compare  Inf  -Inf   ->  1
       
   599 comx781 compare  Inf  -1000  ->  1
       
   600 comx782 compare  Inf  -1     ->  1
       
   601 comx783 compare  Inf  -0     ->  1
       
   602 comx784 compare  Inf   0     ->  1
       
   603 comx785 compare  Inf   1     ->  1
       
   604 comx786 compare  Inf   1000  ->  1
       
   605 comx787 compare  Inf   Inf   ->  0
       
   606 comx788 compare -1000  Inf   -> -1
       
   607 comx789 compare -Inf   Inf   -> -1
       
   608 comx790 compare -1     Inf   -> -1
       
   609 comx791 compare -0     Inf   -> -1
       
   610 comx792 compare  0     Inf   -> -1
       
   611 comx793 compare  1     Inf   -> -1
       
   612 comx794 compare  1000  Inf   -> -1
       
   613 comx795 compare  Inf   Inf   ->  0
       
   614 
       
   615 comx800 compare -Inf  -Inf   ->  0
       
   616 comx801 compare -Inf  -1000  -> -1
       
   617 comx802 compare -Inf  -1     -> -1
       
   618 comx803 compare -Inf  -0     -> -1
       
   619 comx804 compare -Inf   0     -> -1
       
   620 comx805 compare -Inf   1     -> -1
       
   621 comx806 compare -Inf   1000  -> -1
       
   622 comx807 compare -Inf   Inf   -> -1
       
   623 comx808 compare -Inf  -Inf   ->  0
       
   624 comx809 compare -1000 -Inf   ->  1
       
   625 comx810 compare -1    -Inf   ->  1
       
   626 comx811 compare -0    -Inf   ->  1
       
   627 comx812 compare  0    -Inf   ->  1
       
   628 comx813 compare  1    -Inf   ->  1
       
   629 comx814 compare  1000 -Inf   ->  1
       
   630 comx815 compare  Inf  -Inf   ->  1
       
   631 
       
   632 comx821 compare  NaN -Inf    ->  NaN
       
   633 comx822 compare  NaN -1000   ->  NaN
       
   634 comx823 compare  NaN -1      ->  NaN
       
   635 comx824 compare  NaN -0      ->  NaN
       
   636 comx825 compare  NaN  0      ->  NaN
       
   637 comx826 compare  NaN  1      ->  NaN
       
   638 comx827 compare  NaN  1000   ->  NaN
       
   639 comx828 compare  NaN  Inf    ->  NaN
       
   640 comx829 compare  NaN  NaN    ->  NaN
       
   641 comx830 compare -Inf  NaN    ->  NaN
       
   642 comx831 compare -1000 NaN    ->  NaN
       
   643 comx832 compare -1    NaN    ->  NaN
       
   644 comx833 compare -0    NaN    ->  NaN
       
   645 comx834 compare  0    NaN    ->  NaN
       
   646 comx835 compare  1    NaN    ->  NaN
       
   647 comx836 compare  1000 NaN    ->  NaN
       
   648 comx837 compare  Inf  NaN    ->  NaN
       
   649 comx838 compare -NaN -NaN    -> -NaN
       
   650 comx839 compare +NaN -NaN    ->  NaN
       
   651 comx840 compare -NaN +NaN    -> -NaN
       
   652 
       
   653 comx841 compare  sNaN -Inf   ->  NaN  Invalid_operation
       
   654 comx842 compare  sNaN -1000  ->  NaN  Invalid_operation
       
   655 comx843 compare  sNaN -1     ->  NaN  Invalid_operation
       
   656 comx844 compare  sNaN -0     ->  NaN  Invalid_operation
       
   657 comx845 compare  sNaN  0     ->  NaN  Invalid_operation
       
   658 comx846 compare  sNaN  1     ->  NaN  Invalid_operation
       
   659 comx847 compare  sNaN  1000  ->  NaN  Invalid_operation
       
   660 comx848 compare  sNaN  NaN   ->  NaN  Invalid_operation
       
   661 comx849 compare  sNaN sNaN   ->  NaN  Invalid_operation
       
   662 comx850 compare  NaN  sNaN   ->  NaN  Invalid_operation
       
   663 comx851 compare -Inf  sNaN   ->  NaN  Invalid_operation
       
   664 comx852 compare -1000 sNaN   ->  NaN  Invalid_operation
       
   665 comx853 compare -1    sNaN   ->  NaN  Invalid_operation
       
   666 comx854 compare -0    sNaN   ->  NaN  Invalid_operation
       
   667 comx855 compare  0    sNaN   ->  NaN  Invalid_operation
       
   668 comx856 compare  1    sNaN   ->  NaN  Invalid_operation
       
   669 comx857 compare  1000 sNaN   ->  NaN  Invalid_operation
       
   670 comx858 compare  Inf  sNaN   ->  NaN  Invalid_operation
       
   671 comx859 compare  NaN  sNaN   ->  NaN  Invalid_operation
       
   672 
       
   673 -- propagating NaNs
       
   674 comx860 compare  NaN9 -Inf   ->  NaN9
       
   675 comx861 compare  NaN8  999   ->  NaN8
       
   676 comx862 compare  NaN77 Inf   ->  NaN77
       
   677 comx863 compare -NaN67 NaN5  -> -NaN67
       
   678 comx864 compare -Inf  -NaN4  -> -NaN4
       
   679 comx865 compare -999  -NaN33 -> -NaN33
       
   680 comx866 compare  Inf   NaN2  ->  NaN2
       
   681 comx867 compare -NaN41 -NaN42 -> -NaN41
       
   682 comx868 compare +NaN41 -NaN42 ->  NaN41
       
   683 comx869 compare -NaN41 +NaN42 -> -NaN41
       
   684 comx870 compare +NaN41 +NaN42 ->  NaN41
       
   685 
       
   686 comx871 compare -sNaN99 -Inf    -> -NaN99 Invalid_operation
       
   687 comx872 compare  sNaN98 -11     ->  NaN98 Invalid_operation
       
   688 comx873 compare  sNaN97  NaN    ->  NaN97 Invalid_operation
       
   689 comx874 compare  sNaN16 sNaN94  ->  NaN16 Invalid_operation
       
   690 comx875 compare  NaN85  sNaN83  ->  NaN83 Invalid_operation
       
   691 comx876 compare -Inf    sNaN92  ->  NaN92 Invalid_operation
       
   692 comx877 compare  088    sNaN81  ->  NaN81 Invalid_operation
       
   693 comx878 compare  Inf    sNaN90  ->  NaN90 Invalid_operation
       
   694 comx879 compare  NaN   -sNaN89  -> -NaN89 Invalid_operation
       
   695 
       
   696 -- overflow and underflow tests .. subnormal results now allowed
       
   697 maxExponent: 999999999
       
   698 minexponent: -999999999
       
   699 comx880 compare +1.23456789012345E-0 9E+999999999 -> -1
       
   700 comx881 compare 9E+999999999 +1.23456789012345E-0 ->  1
       
   701 comx882 compare +0.100 9E-999999999               ->  1
       
   702 comx883 compare 9E-999999999 +0.100               -> -1
       
   703 comx885 compare -1.23456789012345E-0 9E+999999999 -> -1
       
   704 comx886 compare 9E+999999999 -1.23456789012345E-0 ->  1
       
   705 comx887 compare -0.100 9E-999999999               -> -1
       
   706 comx888 compare 9E-999999999 -0.100               ->  1
       
   707 
       
   708 comx889 compare 1e-599999999 1e-400000001   -> -1
       
   709 comx890 compare 1e-599999999 1e-400000000   -> -1
       
   710 comx891 compare 1e-600000000 1e-400000000   -> -1
       
   711 comx892 compare 9e-999999998 0.01           -> -1
       
   712 comx893 compare 9e-999999998 0.1            -> -1
       
   713 comx894 compare 0.01 9e-999999998           ->  1
       
   714 comx895 compare 1e599999999 1e400000001     ->  1
       
   715 comx896 compare 1e599999999 1e400000000     ->  1
       
   716 comx897 compare 1e600000000 1e400000000     ->  1
       
   717 comx898 compare 9e999999998 100             ->  1
       
   718 comx899 compare 9e999999998 10              ->  1
       
   719 comx900 compare 100  9e999999998            -> -1
       
   720 -- signs
       
   721 comx901 compare  1e+777777777  1e+411111111 ->  1
       
   722 comx902 compare  1e+777777777 -1e+411111111 ->  1
       
   723 comx903 compare -1e+777777777  1e+411111111 -> -1
       
   724 comx904 compare -1e+777777777 -1e+411111111 -> -1
       
   725 comx905 compare  1e-777777777  1e-411111111 -> -1
       
   726 comx906 compare  1e-777777777 -1e-411111111 ->  1
       
   727 comx907 compare -1e-777777777  1e-411111111 -> -1
       
   728 comx908 compare -1e-777777777 -1e-411111111 ->  1
       
   729 
       
   730 -- spread zeros
       
   731 comx910 compare   0E-383  0       ->  0
       
   732 comx911 compare   0E-383 -0       ->  0
       
   733 comx912 compare  -0E-383  0       ->  0
       
   734 comx913 compare  -0E-383 -0       ->  0
       
   735 comx914 compare   0E-383  0E+384  ->  0
       
   736 comx915 compare   0E-383 -0E+384  ->  0
       
   737 comx916 compare  -0E-383  0E+384  ->  0
       
   738 comx917 compare  -0E-383 -0E+384  ->  0
       
   739 comx918 compare   0       0E+384  ->  0
       
   740 comx919 compare   0      -0E+384  ->  0
       
   741 comx920 compare  -0       0E+384  ->  0
       
   742 comx921 compare  -0      -0E+384  ->  0
       
   743 comx930 compare   0E+384  0       ->  0
       
   744 comx931 compare   0E+384 -0       ->  0
       
   745 comx932 compare  -0E+384  0       ->  0
       
   746 comx933 compare  -0E+384 -0       ->  0
       
   747 comx934 compare   0E+384  0E-383  ->  0
       
   748 comx935 compare   0E+384 -0E-383  ->  0
       
   749 comx936 compare  -0E+384  0E-383  ->  0
       
   750 comx937 compare  -0E+384 -0E-383  ->  0
       
   751 comx938 compare   0       0E-383  ->  0
       
   752 comx939 compare   0      -0E-383  ->  0
       
   753 comx940 compare  -0       0E-383  ->  0
       
   754 comx941 compare  -0      -0E-383  ->  0
       
   755 
       
   756 -- Null tests
       
   757 comx990 compare 10  # -> NaN Invalid_operation
       
   758 comx991 compare  # 10 -> NaN Invalid_operation