| Georg Brandl | faa9ad2 | 2011-03-05 15:06:13 +0100 | [diff] [blame^] | 1 | ------------------------------------------------------------------------ |
| 2 | -- ddNextMinus.decTest -- decDouble next that is less [754r nextdown] -- |
| 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 | -- All operands and results are decDoubles. |
| 23 | precision: 16 |
| 24 | maxExponent: 384 |
| 25 | minExponent: -383 |
| 26 | extended: 1 |
| 27 | clamp: 1 |
| 28 | rounding: half_even |
| 29 | |
| 30 | ddnextm001 nextminus 0.9999999999999995 -> 0.9999999999999994 |
| 31 | ddnextm002 nextminus 0.9999999999999996 -> 0.9999999999999995 |
| 32 | ddnextm003 nextminus 0.9999999999999997 -> 0.9999999999999996 |
| 33 | ddnextm004 nextminus 0.9999999999999998 -> 0.9999999999999997 |
| 34 | ddnextm005 nextminus 0.9999999999999999 -> 0.9999999999999998 |
| 35 | ddnextm006 nextminus 1.000000000000000 -> 0.9999999999999999 |
| 36 | ddnextm007 nextminus 1.0 -> 0.9999999999999999 |
| 37 | ddnextm008 nextminus 1 -> 0.9999999999999999 |
| 38 | ddnextm009 nextminus 1.000000000000001 -> 1.000000000000000 |
| 39 | ddnextm010 nextminus 1.000000000000002 -> 1.000000000000001 |
| 40 | ddnextm011 nextminus 1.000000000000003 -> 1.000000000000002 |
| 41 | ddnextm012 nextminus 1.000000000000004 -> 1.000000000000003 |
| 42 | ddnextm013 nextminus 1.000000000000005 -> 1.000000000000004 |
| 43 | ddnextm014 nextminus 1.000000000000006 -> 1.000000000000005 |
| 44 | ddnextm015 nextminus 1.000000000000007 -> 1.000000000000006 |
| 45 | ddnextm016 nextminus 1.000000000000008 -> 1.000000000000007 |
| 46 | ddnextm017 nextminus 1.000000000000009 -> 1.000000000000008 |
| 47 | ddnextm018 nextminus 1.000000000000010 -> 1.000000000000009 |
| 48 | ddnextm019 nextminus 1.000000000000011 -> 1.000000000000010 |
| 49 | ddnextm020 nextminus 1.000000000000012 -> 1.000000000000011 |
| 50 | |
| 51 | ddnextm021 nextminus -0.9999999999999995 -> -0.9999999999999996 |
| 52 | ddnextm022 nextminus -0.9999999999999996 -> -0.9999999999999997 |
| 53 | ddnextm023 nextminus -0.9999999999999997 -> -0.9999999999999998 |
| 54 | ddnextm024 nextminus -0.9999999999999998 -> -0.9999999999999999 |
| 55 | ddnextm025 nextminus -0.9999999999999999 -> -1.000000000000000 |
| 56 | ddnextm026 nextminus -1.000000000000000 -> -1.000000000000001 |
| 57 | ddnextm027 nextminus -1.0 -> -1.000000000000001 |
| 58 | ddnextm028 nextminus -1 -> -1.000000000000001 |
| 59 | ddnextm029 nextminus -1.000000000000001 -> -1.000000000000002 |
| 60 | ddnextm030 nextminus -1.000000000000002 -> -1.000000000000003 |
| 61 | ddnextm031 nextminus -1.000000000000003 -> -1.000000000000004 |
| 62 | ddnextm032 nextminus -1.000000000000004 -> -1.000000000000005 |
| 63 | ddnextm033 nextminus -1.000000000000005 -> -1.000000000000006 |
| 64 | ddnextm034 nextminus -1.000000000000006 -> -1.000000000000007 |
| 65 | ddnextm035 nextminus -1.000000000000007 -> -1.000000000000008 |
| 66 | ddnextm036 nextminus -1.000000000000008 -> -1.000000000000009 |
| 67 | ddnextm037 nextminus -1.000000000000009 -> -1.000000000000010 |
| 68 | ddnextm038 nextminus -1.000000000000010 -> -1.000000000000011 |
| 69 | ddnextm039 nextminus -1.000000000000011 -> -1.000000000000012 |
| 70 | |
| 71 | -- ultra-tiny inputs |
| 72 | ddnextm062 nextminus 1E-398 -> 0E-398 |
| 73 | ddnextm065 nextminus -1E-398 -> -2E-398 |
| 74 | |
| 75 | -- Zeros |
| 76 | ddnextm100 nextminus -0 -> -1E-398 |
| 77 | ddnextm101 nextminus 0 -> -1E-398 |
| 78 | ddnextm102 nextminus 0.00 -> -1E-398 |
| 79 | ddnextm103 nextminus -0.00 -> -1E-398 |
| 80 | ddnextm104 nextminus 0E-300 -> -1E-398 |
| 81 | ddnextm105 nextminus 0E+300 -> -1E-398 |
| 82 | ddnextm106 nextminus 0E+30000 -> -1E-398 |
| 83 | ddnextm107 nextminus -0E+30000 -> -1E-398 |
| 84 | |
| 85 | -- specials |
| 86 | ddnextm150 nextminus Inf -> 9.999999999999999E+384 |
| 87 | ddnextm151 nextminus -Inf -> -Infinity |
| 88 | ddnextm152 nextminus NaN -> NaN |
| 89 | ddnextm153 nextminus sNaN -> NaN Invalid_operation |
| 90 | ddnextm154 nextminus NaN77 -> NaN77 |
| 91 | ddnextm155 nextminus sNaN88 -> NaN88 Invalid_operation |
| 92 | ddnextm156 nextminus -NaN -> -NaN |
| 93 | ddnextm157 nextminus -sNaN -> -NaN Invalid_operation |
| 94 | ddnextm158 nextminus -NaN77 -> -NaN77 |
| 95 | ddnextm159 nextminus -sNaN88 -> -NaN88 Invalid_operation |
| 96 | |
| 97 | -- Nmax, Nmin, Ntiny, subnormals |
| 98 | ddnextm170 nextminus 9.999999999999999E+384 -> 9.999999999999998E+384 |
| 99 | ddnextm171 nextminus 9.999999999999998E+384 -> 9.999999999999997E+384 |
| 100 | ddnextm172 nextminus 1E-383 -> 9.99999999999999E-384 |
| 101 | ddnextm173 nextminus 1.000000000000000E-383 -> 9.99999999999999E-384 |
| 102 | ddnextm174 nextminus 9E-398 -> 8E-398 |
| 103 | ddnextm175 nextminus 9.9E-397 -> 9.8E-397 |
| 104 | ddnextm176 nextminus 9.99999999999E-387 -> 9.99999999998E-387 |
| 105 | ddnextm177 nextminus 9.99999999999999E-384 -> 9.99999999999998E-384 |
| 106 | ddnextm178 nextminus 9.99999999999998E-384 -> 9.99999999999997E-384 |
| 107 | ddnextm179 nextminus 9.99999999999997E-384 -> 9.99999999999996E-384 |
| 108 | ddnextm180 nextminus 0E-398 -> -1E-398 |
| 109 | ddnextm181 nextminus 1E-398 -> 0E-398 |
| 110 | ddnextm182 nextminus 2E-398 -> 1E-398 |
| 111 | |
| 112 | ddnextm183 nextminus -0E-398 -> -1E-398 |
| 113 | ddnextm184 nextminus -1E-398 -> -2E-398 |
| 114 | ddnextm185 nextminus -2E-398 -> -3E-398 |
| 115 | ddnextm186 nextminus -10E-398 -> -1.1E-397 |
| 116 | ddnextm187 nextminus -100E-398 -> -1.01E-396 |
| 117 | ddnextm188 nextminus -100000E-398 -> -1.00001E-393 |
| 118 | ddnextm189 nextminus -1.00000000000E-383 -> -1.000000000000001E-383 |
| 119 | ddnextm190 nextminus -1.000000000000000E-383 -> -1.000000000000001E-383 |
| 120 | ddnextm191 nextminus -1E-383 -> -1.000000000000001E-383 |
| 121 | ddnextm192 nextminus -9.999999999999998E+384 -> -9.999999999999999E+384 |
| 122 | ddnextm193 nextminus -9.999999999999999E+384 -> -Infinity |
| 123 | |
| 124 | -- Null tests |
| 125 | ddnextm900 nextminus # -> NaN Invalid_operation |
| 126 | |