1 ------------------------------------------------------------------------
\r
2 -- ddLogB.decTest -- integral 754r adjusted exponent, for decDoubles --
\r
3 -- Copyright (c) IBM Corporation, 2005, 2008. All rights reserved. --
\r
4 ------------------------------------------------------------------------
\r
5 -- Please see the document "General Decimal Arithmetic Testcases" --
\r
6 -- at http://www2.hursley.ibm.com/decimal for the description of --
\r
7 -- these testcases. --
\r
9 -- These testcases are experimental ('beta' versions), and they --
\r
10 -- may contain errors. They are offered on an as-is basis. In --
\r
11 -- particular, achieving the same results as the tests here is not --
\r
12 -- a guarantee that an implementation complies with any Standard --
\r
13 -- or specification. The tests are not exhaustive. --
\r
15 -- Please send comments, suggestions, and corrections to the author: --
\r
16 -- Mike Cowlishaw, IBM Fellow --
\r
17 -- IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK --
\r
18 -- mfc@uk.ibm.com --
\r
19 ------------------------------------------------------------------------
\r
30 ddlogb000 logb 0 -> -Infinity Division_by_zero
\r
31 ddlogb001 logb 1E-398 -> -398
\r
32 ddlogb002 logb 1E-383 -> -383
\r
33 ddlogb003 logb 0.001 -> -3
\r
34 ddlogb004 logb 0.03 -> -2
\r
35 ddlogb005 logb 1 -> 0
\r
36 ddlogb006 logb 2 -> 0
\r
37 ddlogb007 logb 2.5 -> 0
\r
38 ddlogb008 logb 2.500 -> 0
\r
39 ddlogb009 logb 10 -> 1
\r
40 ddlogb010 logb 70 -> 1
\r
41 ddlogb011 logb 100 -> 2
\r
42 ddlogb012 logb 333 -> 2
\r
43 ddlogb013 logb 9E+384 -> 384
\r
44 ddlogb014 logb +Infinity -> Infinity
\r
46 -- negatives appear to be treated as positives
\r
47 ddlogb021 logb -0 -> -Infinity Division_by_zero
\r
48 ddlogb022 logb -1E-398 -> -398
\r
49 ddlogb023 logb -9E-383 -> -383
\r
50 ddlogb024 logb -0.001 -> -3
\r
51 ddlogb025 logb -1 -> 0
\r
52 ddlogb026 logb -2 -> 0
\r
53 ddlogb027 logb -10 -> 1
\r
54 ddlogb028 logb -70 -> 1
\r
55 ddlogb029 logb -100 -> 2
\r
56 ddlogb030 logb -9E+384 -> 384
\r
57 ddlogb031 logb -Infinity -> Infinity
\r
60 ddlogb111 logb 0 -> -Infinity Division_by_zero
\r
61 ddlogb112 logb -0 -> -Infinity Division_by_zero
\r
62 ddlogb113 logb 0E+4 -> -Infinity Division_by_zero
\r
63 ddlogb114 logb -0E+4 -> -Infinity Division_by_zero
\r
64 ddlogb115 logb 0.0000 -> -Infinity Division_by_zero
\r
65 ddlogb116 logb -0.0000 -> -Infinity Division_by_zero
\r
66 ddlogb117 logb 0E-141 -> -Infinity Division_by_zero
\r
67 ddlogb118 logb -0E-141 -> -Infinity Division_by_zero
\r
69 -- full coefficients, alternating bits
\r
70 ddlogb121 logb 268268268 -> 8
\r
71 ddlogb122 logb -268268268 -> 8
\r
72 ddlogb123 logb 134134134 -> 8
\r
73 ddlogb124 logb -134134134 -> 8
\r
75 -- Nmax, Nmin, Ntiny
\r
76 ddlogb131 logb 9.999999999999999E+384 -> 384
\r
77 ddlogb132 logb 1E-383 -> -383
\r
78 ddlogb133 logb 1.000000000000000E-383 -> -383
\r
79 ddlogb134 logb 1E-398 -> -398
\r
81 ddlogb135 logb -1E-398 -> -398
\r
82 ddlogb136 logb -1.000000000000000E-383 -> -383
\r
83 ddlogb137 logb -1E-383 -> -383
\r
84 ddlogb138 logb -9.999999999999999E+384 -> 384
\r
87 ddlogb0061 logb 1 -> 0
\r
88 ddlogb0062 logb 1.0 -> 0
\r
89 ddlogb0063 logb 1.000000000000000 -> 0
\r
91 -- notable cases -- exact powers of 10
\r
92 ddlogb1100 logb 1 -> 0
\r
93 ddlogb1101 logb 10 -> 1
\r
94 ddlogb1102 logb 100 -> 2
\r
95 ddlogb1103 logb 1000 -> 3
\r
96 ddlogb1104 logb 10000 -> 4
\r
97 ddlogb1105 logb 100000 -> 5
\r
98 ddlogb1106 logb 1000000 -> 6
\r
99 ddlogb1107 logb 10000000 -> 7
\r
100 ddlogb1108 logb 100000000 -> 8
\r
101 ddlogb1109 logb 1000000000 -> 9
\r
102 ddlogb1110 logb 10000000000 -> 10
\r
103 ddlogb1111 logb 100000000000 -> 11
\r
104 ddlogb1112 logb 1000000000000 -> 12
\r
105 ddlogb1113 logb 0.00000000001 -> -11
\r
106 ddlogb1114 logb 0.0000000001 -> -10
\r
107 ddlogb1115 logb 0.000000001 -> -9
\r
108 ddlogb1116 logb 0.00000001 -> -8
\r
109 ddlogb1117 logb 0.0000001 -> -7
\r
110 ddlogb1118 logb 0.000001 -> -6
\r
111 ddlogb1119 logb 0.00001 -> -5
\r
112 ddlogb1120 logb 0.0001 -> -4
\r
113 ddlogb1121 logb 0.001 -> -3
\r
114 ddlogb1122 logb 0.01 -> -2
\r
115 ddlogb1123 logb 0.1 -> -1
\r
116 ddlogb1124 logb 1E-99 -> -99
\r
117 ddlogb1125 logb 1E-100 -> -100
\r
118 ddlogb1127 logb 1E-299 -> -299
\r
119 ddlogb1126 logb 1E-383 -> -383
\r
121 -- suggestions from Ilan Nehama
\r
122 ddlogb1400 logb 10E-3 -> -2
\r
123 ddlogb1401 logb 10E-2 -> -1
\r
124 ddlogb1402 logb 100E-2 -> 0
\r
125 ddlogb1403 logb 1000E-2 -> 1
\r
126 ddlogb1404 logb 10000E-2 -> 2
\r
127 ddlogb1405 logb 10E-1 -> 0
\r
128 ddlogb1406 logb 100E-1 -> 1
\r
129 ddlogb1407 logb 1000E-1 -> 2
\r
130 ddlogb1408 logb 10000E-1 -> 3
\r
131 ddlogb1409 logb 10E0 -> 1
\r
132 ddlogb1410 logb 100E0 -> 2
\r
133 ddlogb1411 logb 1000E0 -> 3
\r
134 ddlogb1412 logb 10000E0 -> 4
\r
135 ddlogb1413 logb 10E1 -> 2
\r
136 ddlogb1414 logb 100E1 -> 3
\r
137 ddlogb1415 logb 1000E1 -> 4
\r
138 ddlogb1416 logb 10000E1 -> 5
\r
139 ddlogb1417 logb 10E2 -> 3
\r
140 ddlogb1418 logb 100E2 -> 4
\r
141 ddlogb1419 logb 1000E2 -> 5
\r
142 ddlogb1420 logb 10000E2 -> 6
\r
145 ddlogb820 logb Infinity -> Infinity
\r
146 ddlogb821 logb 0 -> -Infinity Division_by_zero
\r
147 ddlogb822 logb NaN -> NaN
\r
148 ddlogb823 logb sNaN -> NaN Invalid_operation
\r
149 -- propagating NaNs
\r
150 ddlogb824 logb sNaN123 -> NaN123 Invalid_operation
\r
151 ddlogb825 logb -sNaN321 -> -NaN321 Invalid_operation
\r
152 ddlogb826 logb NaN456 -> NaN456
\r
153 ddlogb827 logb -NaN654 -> -NaN654
\r
154 ddlogb828 logb NaN1 -> NaN1
\r
157 ddlogb900 logb # -> NaN Invalid_operation
\r