1 ------------------------------------------------------------------------ 2 -- dqNextPlus.decTest -- decQuad next that is greater [754r nextup] -- 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 (a] uk.ibm.com -- 19 ------------------------------------------------------------------------ 20 version: 2.59 21 22 -- All operands and results are decQuads. 23 extended: 1 24 clamp: 1 25 precision: 34 26 maxExponent: 6144 27 minExponent: -6143 28 rounding: half_even 29 30 dqnextp001 nextplus 0.9999999999999999999999999999999995 -> 0.9999999999999999999999999999999996 31 dqnextp002 nextplus 0.9999999999999999999999999999999996 -> 0.9999999999999999999999999999999997 32 dqnextp003 nextplus 0.9999999999999999999999999999999997 -> 0.9999999999999999999999999999999998 33 dqnextp004 nextplus 0.9999999999999999999999999999999998 -> 0.9999999999999999999999999999999999 34 dqnextp005 nextplus 0.9999999999999999999999999999999999 -> 1.000000000000000000000000000000000 35 dqnextp006 nextplus 1.000000000000000000000000000000000 -> 1.000000000000000000000000000000001 36 dqnextp007 nextplus 1.0 -> 1.000000000000000000000000000000001 37 dqnextp008 nextplus 1 -> 1.000000000000000000000000000000001 38 dqnextp009 nextplus 1.000000000000000000000000000000001 -> 1.000000000000000000000000000000002 39 dqnextp010 nextplus 1.000000000000000000000000000000002 -> 1.000000000000000000000000000000003 40 dqnextp011 nextplus 1.000000000000000000000000000000003 -> 1.000000000000000000000000000000004 41 dqnextp012 nextplus 1.000000000000000000000000000000004 -> 1.000000000000000000000000000000005 42 dqnextp013 nextplus 1.000000000000000000000000000000005 -> 1.000000000000000000000000000000006 43 dqnextp014 nextplus 1.000000000000000000000000000000006 -> 1.000000000000000000000000000000007 44 dqnextp015 nextplus 1.000000000000000000000000000000007 -> 1.000000000000000000000000000000008 45 dqnextp016 nextplus 1.000000000000000000000000000000008 -> 1.000000000000000000000000000000009 46 dqnextp017 nextplus 1.000000000000000000000000000000009 -> 1.000000000000000000000000000000010 47 dqnextp018 nextplus 1.000000000000000000000000000000010 -> 1.000000000000000000000000000000011 48 dqnextp019 nextplus 1.000000000000000000000000000000011 -> 1.000000000000000000000000000000012 49 50 dqnextp021 nextplus -0.9999999999999999999999999999999995 -> -0.9999999999999999999999999999999994 51 dqnextp022 nextplus -0.9999999999999999999999999999999996 -> -0.9999999999999999999999999999999995 52 dqnextp023 nextplus -0.9999999999999999999999999999999997 -> -0.9999999999999999999999999999999996 53 dqnextp024 nextplus -0.9999999999999999999999999999999998 -> -0.9999999999999999999999999999999997 54 dqnextp025 nextplus -0.9999999999999999999999999999999999 -> -0.9999999999999999999999999999999998 55 dqnextp026 nextplus -1.000000000000000000000000000000000 -> -0.9999999999999999999999999999999999 56 dqnextp027 nextplus -1.0 -> -0.9999999999999999999999999999999999 57 dqnextp028 nextplus -1 -> -0.9999999999999999999999999999999999 58 dqnextp029 nextplus -1.000000000000000000000000000000001 -> -1.000000000000000000000000000000000 59 dqnextp030 nextplus -1.000000000000000000000000000000002 -> -1.000000000000000000000000000000001 60 dqnextp031 nextplus -1.000000000000000000000000000000003 -> -1.000000000000000000000000000000002 61 dqnextp032 nextplus -1.000000000000000000000000000000004 -> -1.000000000000000000000000000000003 62 dqnextp033 nextplus -1.000000000000000000000000000000005 -> -1.000000000000000000000000000000004 63 dqnextp034 nextplus -1.000000000000000000000000000000006 -> -1.000000000000000000000000000000005 64 dqnextp035 nextplus -1.000000000000000000000000000000007 -> -1.000000000000000000000000000000006 65 dqnextp036 nextplus -1.000000000000000000000000000000008 -> -1.000000000000000000000000000000007 66 dqnextp037 nextplus -1.000000000000000000000000000000009 -> -1.000000000000000000000000000000008 67 dqnextp038 nextplus -1.000000000000000000000000000000010 -> -1.000000000000000000000000000000009 68 dqnextp039 nextplus -1.000000000000000000000000000000011 -> -1.000000000000000000000000000000010 69 dqnextp040 nextplus -1.000000000000000000000000000000012 -> -1.000000000000000000000000000000011 70 71 -- Zeros 72 dqnextp100 nextplus 0 -> 1E-6176 73 dqnextp101 nextplus 0.00 -> 1E-6176 74 dqnextp102 nextplus 0E-300 -> 1E-6176 75 dqnextp103 nextplus 0E+300 -> 1E-6176 76 dqnextp104 nextplus 0E+30000 -> 1E-6176 77 dqnextp105 nextplus -0 -> 1E-6176 78 dqnextp106 nextplus -0.00 -> 1E-6176 79 dqnextp107 nextplus -0E-300 -> 1E-6176 80 dqnextp108 nextplus -0E+300 -> 1E-6176 81 dqnextp109 nextplus -0E+30000 -> 1E-6176 82 83 -- specials 84 dqnextp150 nextplus Inf -> Infinity 85 dqnextp151 nextplus -Inf -> -9.999999999999999999999999999999999E+6144 86 dqnextp152 nextplus NaN -> NaN 87 dqnextp153 nextplus sNaN -> NaN Invalid_operation 88 dqnextp154 nextplus NaN77 -> NaN77 89 dqnextp155 nextplus sNaN88 -> NaN88 Invalid_operation 90 dqnextp156 nextplus -NaN -> -NaN 91 dqnextp157 nextplus -sNaN -> -NaN Invalid_operation 92 dqnextp158 nextplus -NaN77 -> -NaN77 93 dqnextp159 nextplus -sNaN88 -> -NaN88 Invalid_operation 94 95 -- Nmax, Nmin, Ntiny, subnormals 96 dqnextp170 nextplus -9.999999999999999999999999999999999E+6144 -> -9.999999999999999999999999999999998E+6144 97 dqnextp171 nextplus -9.999999999999999999999999999999998E+6144 -> -9.999999999999999999999999999999997E+6144 98 dqnextp172 nextplus -1E-6143 -> -9.99999999999999999999999999999999E-6144 99 dqnextp173 nextplus -1.000000000000000E-6143 -> -9.99999999999999999999999999999999E-6144 100 dqnextp174 nextplus -9E-6176 -> -8E-6176 101 dqnextp175 nextplus -9.9E-6175 -> -9.8E-6175 102 dqnextp176 nextplus -9.99999999999999999999999999999E-6147 -> -9.99999999999999999999999999998E-6147 103 dqnextp177 nextplus -9.99999999999999999999999999999999E-6144 -> -9.99999999999999999999999999999998E-6144 104 dqnextp178 nextplus -9.99999999999999999999999999999998E-6144 -> -9.99999999999999999999999999999997E-6144 105 dqnextp179 nextplus -9.99999999999999999999999999999997E-6144 -> -9.99999999999999999999999999999996E-6144 106 dqnextp180 nextplus -0E-6176 -> 1E-6176 107 dqnextp181 nextplus -1E-6176 -> -0E-6176 108 dqnextp182 nextplus -2E-6176 -> -1E-6176 109 110 dqnextp183 nextplus 0E-6176 -> 1E-6176 111 dqnextp184 nextplus 1E-6176 -> 2E-6176 112 dqnextp185 nextplus 2E-6176 -> 3E-6176 113 dqnextp186 nextplus 10E-6176 -> 1.1E-6175 114 dqnextp187 nextplus 100E-6176 -> 1.01E-6174 115 dqnextp188 nextplus 100000E-6176 -> 1.00001E-6171 116 dqnextp189 nextplus 1.00000000000000000000000000000E-6143 -> 1.000000000000000000000000000000001E-6143 117 dqnextp190 nextplus 1.000000000000000000000000000000000E-6143 -> 1.000000000000000000000000000000001E-6143 118 dqnextp191 nextplus 1E-6143 -> 1.000000000000000000000000000000001E-6143 119 dqnextp192 nextplus 9.999999999999999999999999999999998E+6144 -> 9.999999999999999999999999999999999E+6144 120 dqnextp193 nextplus 9.999999999999999999999999999999999E+6144 -> Infinity 121 122 -- Null tests 123 dqnextp900 nextplus # -> NaN Invalid_operation 124 125
