| blob | 45ea9b4c933178f1aaf5159ce18e272bd6783b80 |
1 ------------------------------------------------------------------------\r
2 -- ddMax.decTest -- decDouble maxnum --\r
3 -- Copyright (c) IBM Corporation, 1981, 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
8 -- --\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
14 -- --\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
20 version: 2.59\r
21 \r
22 -- we assume that base comparison is tested in compare.decTest, so\r
23 -- these mainly cover special cases and rounding\r
24 precision: 16\r
25 maxExponent: 384\r
26 minExponent: -383\r
27 extended: 1\r
28 clamp: 1\r
29 rounding: half_even\r
30 \r
31 -- sanity checks\r
32 ddmax001 max -2 -2 -> -2\r
33 ddmax002 max -2 -1 -> -1\r
34 ddmax003 max -2 0 -> 0\r
35 ddmax004 max -2 1 -> 1\r
36 ddmax005 max -2 2 -> 2\r
37 ddmax006 max -1 -2 -> -1\r
38 ddmax007 max -1 -1 -> -1\r
39 ddmax008 max -1 0 -> 0\r
40 ddmax009 max -1 1 -> 1\r
41 ddmax010 max -1 2 -> 2\r
42 ddmax011 max 0 -2 -> 0\r
43 ddmax012 max 0 -1 -> 0\r
44 ddmax013 max 0 0 -> 0\r
45 ddmax014 max 0 1 -> 1\r
46 ddmax015 max 0 2 -> 2\r
47 ddmax016 max 1 -2 -> 1\r
48 ddmax017 max 1 -1 -> 1\r
49 ddmax018 max 1 0 -> 1\r
50 ddmax019 max 1 1 -> 1\r
51 ddmax020 max 1 2 -> 2\r
52 ddmax021 max 2 -2 -> 2\r
53 ddmax022 max 2 -1 -> 2\r
54 ddmax023 max 2 0 -> 2\r
55 ddmax025 max 2 1 -> 2\r
56 ddmax026 max 2 2 -> 2\r
57 \r
58 -- extended zeros\r
59 ddmax030 max 0 0 -> 0\r
60 ddmax031 max 0 -0 -> 0\r
61 ddmax032 max 0 -0.0 -> 0\r
62 ddmax033 max 0 0.0 -> 0\r
63 ddmax034 max -0 0 -> 0 -- note: -0 = 0, but 0 chosen\r
64 ddmax035 max -0 -0 -> -0\r
65 ddmax036 max -0 -0.0 -> -0.0\r
66 ddmax037 max -0 0.0 -> 0.0\r
67 ddmax038 max 0.0 0 -> 0\r
68 ddmax039 max 0.0 -0 -> 0.0\r
69 ddmax040 max 0.0 -0.0 -> 0.0\r
70 ddmax041 max 0.0 0.0 -> 0.0\r
71 ddmax042 max -0.0 0 -> 0\r
72 ddmax043 max -0.0 -0 -> -0.0\r
73 ddmax044 max -0.0 -0.0 -> -0.0\r
74 ddmax045 max -0.0 0.0 -> 0.0\r
75 \r
76 ddmax050 max -0E1 0E1 -> 0E+1\r
77 ddmax051 max -0E2 0E2 -> 0E+2\r
78 ddmax052 max -0E2 0E1 -> 0E+1\r
79 ddmax053 max -0E1 0E2 -> 0E+2\r
80 ddmax054 max 0E1 -0E1 -> 0E+1\r
81 ddmax055 max 0E2 -0E2 -> 0E+2\r
82 ddmax056 max 0E2 -0E1 -> 0E+2\r
83 ddmax057 max 0E1 -0E2 -> 0E+1\r
84 \r
85 ddmax058 max 0E1 0E1 -> 0E+1\r
86 ddmax059 max 0E2 0E2 -> 0E+2\r
87 ddmax060 max 0E2 0E1 -> 0E+2\r
88 ddmax061 max 0E1 0E2 -> 0E+2\r
89 ddmax062 max -0E1 -0E1 -> -0E+1\r
90 ddmax063 max -0E2 -0E2 -> -0E+2\r
91 ddmax064 max -0E2 -0E1 -> -0E+1\r
92 ddmax065 max -0E1 -0E2 -> -0E+1\r
93 \r
94 -- Specials\r
95 ddmax090 max Inf -Inf -> Infinity\r
96 ddmax091 max Inf -1000 -> Infinity\r
97 ddmax092 max Inf -1 -> Infinity\r
98 ddmax093 max Inf -0 -> Infinity\r
99 ddmax094 max Inf 0 -> Infinity\r
100 ddmax095 max Inf 1 -> Infinity\r
101 ddmax096 max Inf 1000 -> Infinity\r
102 ddmax097 max Inf Inf -> Infinity\r
103 ddmax098 max -1000 Inf -> Infinity\r
104 ddmax099 max -Inf Inf -> Infinity\r
105 ddmax100 max -1 Inf -> Infinity\r
106 ddmax101 max -0 Inf -> Infinity\r
107 ddmax102 max 0 Inf -> Infinity\r
108 ddmax103 max 1 Inf -> Infinity\r
109 ddmax104 max 1000 Inf -> Infinity\r
110 ddmax105 max Inf Inf -> Infinity\r
111 \r
112 ddmax120 max -Inf -Inf -> -Infinity\r
113 ddmax121 max -Inf -1000 -> -1000\r
114 ddmax122 max -Inf -1 -> -1\r
115 ddmax123 max -Inf -0 -> -0\r
116 ddmax124 max -Inf 0 -> 0\r
117 ddmax125 max -Inf 1 -> 1\r
118 ddmax126 max -Inf 1000 -> 1000\r
119 ddmax127 max -Inf Inf -> Infinity\r
120 ddmax128 max -Inf -Inf -> -Infinity\r
121 ddmax129 max -1000 -Inf -> -1000\r
122 ddmax130 max -1 -Inf -> -1\r
123 ddmax131 max -0 -Inf -> -0\r
124 ddmax132 max 0 -Inf -> 0\r
125 ddmax133 max 1 -Inf -> 1\r
126 ddmax134 max 1000 -Inf -> 1000\r
127 ddmax135 max Inf -Inf -> Infinity\r
128 \r
129 -- 2004.08.02 754r chooses number over NaN in mixed cases\r
130 ddmax141 max NaN -Inf -> -Infinity\r
131 ddmax142 max NaN -1000 -> -1000\r
132 ddmax143 max NaN -1 -> -1\r
133 ddmax144 max NaN -0 -> -0\r
134 ddmax145 max NaN 0 -> 0\r
135 ddmax146 max NaN 1 -> 1\r
136 ddmax147 max NaN 1000 -> 1000\r
137 ddmax148 max NaN Inf -> Infinity\r
138 ddmax149 max NaN NaN -> NaN\r
139 ddmax150 max -Inf NaN -> -Infinity\r
140 ddmax151 max -1000 NaN -> -1000\r
141 ddmax152 max -1 NaN -> -1\r
142 ddmax153 max -0 NaN -> -0\r
143 ddmax154 max 0 NaN -> 0\r
144 ddmax155 max 1 NaN -> 1\r
145 ddmax156 max 1000 NaN -> 1000\r
146 ddmax157 max Inf NaN -> Infinity\r
147 \r
148 ddmax161 max sNaN -Inf -> NaN Invalid_operation\r
149 ddmax162 max sNaN -1000 -> NaN Invalid_operation\r
150 ddmax163 max sNaN -1 -> NaN Invalid_operation\r
151 ddmax164 max sNaN -0 -> NaN Invalid_operation\r
152 ddmax165 max sNaN 0 -> NaN Invalid_operation\r
153 ddmax166 max sNaN 1 -> NaN Invalid_operation\r
154 ddmax167 max sNaN 1000 -> NaN Invalid_operation\r
155 ddmax168 max sNaN NaN -> NaN Invalid_operation\r
156 ddmax169 max sNaN sNaN -> NaN Invalid_operation\r
157 ddmax170 max NaN sNaN -> NaN Invalid_operation\r
158 ddmax171 max -Inf sNaN -> NaN Invalid_operation\r
159 ddmax172 max -1000 sNaN -> NaN Invalid_operation\r
160 ddmax173 max -1 sNaN -> NaN Invalid_operation\r
161 ddmax174 max -0 sNaN -> NaN Invalid_operation\r
162 ddmax175 max 0 sNaN -> NaN Invalid_operation\r
163 ddmax176 max 1 sNaN -> NaN Invalid_operation\r
164 ddmax177 max 1000 sNaN -> NaN Invalid_operation\r
165 ddmax178 max Inf sNaN -> NaN Invalid_operation\r
166 ddmax179 max NaN sNaN -> NaN Invalid_operation\r
167 \r
168 -- propagating NaNs\r
169 ddmax181 max NaN9 -Inf -> -Infinity\r
170 ddmax182 max NaN8 9 -> 9\r
171 ddmax183 max -NaN7 Inf -> Infinity\r
172 \r
173 ddmax184 max -NaN1 NaN11 -> -NaN1\r
174 ddmax185 max NaN2 NaN12 -> NaN2\r
175 ddmax186 max -NaN13 -NaN7 -> -NaN13\r
176 ddmax187 max NaN14 -NaN5 -> NaN14\r
177 \r
178 ddmax188 max -Inf NaN4 -> -Infinity\r
179 ddmax189 max -9 -NaN3 -> -9\r
180 ddmax190 max Inf NaN2 -> Infinity\r
181 \r
182 ddmax191 max sNaN99 -Inf -> NaN99 Invalid_operation\r
183 ddmax192 max sNaN98 -1 -> NaN98 Invalid_operation\r
184 ddmax193 max -sNaN97 NaN -> -NaN97 Invalid_operation\r
185 ddmax194 max sNaN96 sNaN94 -> NaN96 Invalid_operation\r
186 ddmax195 max NaN95 sNaN93 -> NaN93 Invalid_operation\r
187 ddmax196 max -Inf sNaN92 -> NaN92 Invalid_operation\r
188 ddmax197 max 0 sNaN91 -> NaN91 Invalid_operation\r
189 ddmax198 max Inf -sNaN90 -> -NaN90 Invalid_operation\r
190 ddmax199 max NaN sNaN89 -> NaN89 Invalid_operation\r
191 \r
192 -- old rounding checks\r
193 ddmax221 max 12345678000 1 -> 12345678000\r
194 ddmax222 max 1 12345678000 -> 12345678000\r
195 ddmax223 max 1234567800 1 -> 1234567800\r
196 ddmax224 max 1 1234567800 -> 1234567800\r
197 ddmax225 max 1234567890 1 -> 1234567890\r
198 ddmax226 max 1 1234567890 -> 1234567890\r
199 ddmax227 max 1234567891 1 -> 1234567891\r
200 ddmax228 max 1 1234567891 -> 1234567891\r
201 ddmax229 max 12345678901 1 -> 12345678901\r
202 ddmax230 max 1 12345678901 -> 12345678901\r
203 ddmax231 max 1234567896 1 -> 1234567896\r
204 ddmax232 max 1 1234567896 -> 1234567896\r
205 ddmax233 max -1234567891 1 -> 1\r
206 ddmax234 max 1 -1234567891 -> 1\r
207 ddmax235 max -12345678901 1 -> 1\r
208 ddmax236 max 1 -12345678901 -> 1\r
209 ddmax237 max -1234567896 1 -> 1\r
210 ddmax238 max 1 -1234567896 -> 1\r
211 \r
212 -- from examples\r
213 ddmax280 max '3' '2' -> '3'\r
214 ddmax281 max '-10' '3' -> '3'\r
215 ddmax282 max '1.0' '1' -> '1'\r
216 ddmax283 max '1' '1.0' -> '1'\r
217 ddmax284 max '7' 'NaN' -> '7'\r
218 \r
219 -- expanded list from min/max 754r purple prose\r
220 -- [explicit tests for exponent ordering]\r
221 ddmax401 max Inf 1.1 -> Infinity\r
222 ddmax402 max 1.1 1 -> 1.1\r
223 ddmax403 max 1 1.0 -> 1\r
224 ddmax404 max 1.0 0.1 -> 1.0\r
225 ddmax405 max 0.1 0.10 -> 0.1\r
226 ddmax406 max 0.10 0.100 -> 0.10\r
227 ddmax407 max 0.10 0 -> 0.10\r
228 ddmax408 max 0 0.0 -> 0\r
229 ddmax409 max 0.0 -0 -> 0.0\r
230 ddmax410 max 0.0 -0.0 -> 0.0\r
231 ddmax411 max 0.00 -0.0 -> 0.00\r
232 ddmax412 max 0.0 -0.00 -> 0.0\r
233 ddmax413 max 0 -0.0 -> 0\r
234 ddmax414 max 0 -0 -> 0\r
235 ddmax415 max -0.0 -0 -> -0.0\r
236 ddmax416 max -0 -0.100 -> -0\r
237 ddmax417 max -0.100 -0.10 -> -0.100\r
238 ddmax418 max -0.10 -0.1 -> -0.10\r
239 ddmax419 max -0.1 -1.0 -> -0.1\r
240 ddmax420 max -1.0 -1 -> -1.0\r
241 ddmax421 max -1 -1.1 -> -1\r
242 ddmax423 max -1.1 -Inf -> -1.1\r
243 -- same with operands reversed\r
244 ddmax431 max 1.1 Inf -> Infinity\r
245 ddmax432 max 1 1.1 -> 1.1\r
246 ddmax433 max 1.0 1 -> 1\r
247 ddmax434 max 0.1 1.0 -> 1.0\r
248 ddmax435 max 0.10 0.1 -> 0.1\r
249 ddmax436 max 0.100 0.10 -> 0.10\r
250 ddmax437 max 0 0.10 -> 0.10\r
251 ddmax438 max 0.0 0 -> 0\r
252 ddmax439 max -0 0.0 -> 0.0\r
253 ddmax440 max -0.0 0.0 -> 0.0\r
254 ddmax441 max -0.0 0.00 -> 0.00\r
255 ddmax442 max -0.00 0.0 -> 0.0\r
256 ddmax443 max -0.0 0 -> 0\r
257 ddmax444 max -0 0 -> 0\r
258 ddmax445 max -0 -0.0 -> -0.0\r
259 ddmax446 max -0.100 -0 -> -0\r
260 ddmax447 max -0.10 -0.100 -> -0.100\r
261 ddmax448 max -0.1 -0.10 -> -0.10\r
262 ddmax449 max -1.0 -0.1 -> -0.1\r
263 ddmax450 max -1 -1.0 -> -1.0\r
264 ddmax451 max -1.1 -1 -> -1\r
265 ddmax453 max -Inf -1.1 -> -1.1\r
266 -- largies\r
267 ddmax460 max 1000 1E+3 -> 1E+3\r
268 ddmax461 max 1E+3 1000 -> 1E+3\r
269 ddmax462 max 1000 -1E+3 -> 1000\r
270 ddmax463 max 1E+3 -1000 -> 1E+3\r
271 ddmax464 max -1000 1E+3 -> 1E+3\r
272 ddmax465 max -1E+3 1000 -> 1000\r
273 ddmax466 max -1000 -1E+3 -> -1000\r
274 ddmax467 max -1E+3 -1000 -> -1000\r
275 \r
276 -- misalignment traps for little-endian\r
277 ddmax471 max 1.0 0.1 -> 1.0\r
278 ddmax472 max 0.1 1.0 -> 1.0\r
279 ddmax473 max 10.0 0.1 -> 10.0\r
280 ddmax474 max 0.1 10.0 -> 10.0\r
281 ddmax475 max 100 1.0 -> 100\r
282 ddmax476 max 1.0 100 -> 100\r
283 ddmax477 max 1000 10.0 -> 1000\r
284 ddmax478 max 10.0 1000 -> 1000\r
285 ddmax479 max 10000 100.0 -> 10000\r
286 ddmax480 max 100.0 10000 -> 10000\r
287 ddmax481 max 100000 1000.0 -> 100000\r
288 ddmax482 max 1000.0 100000 -> 100000\r
289 ddmax483 max 1000000 10000.0 -> 1000000\r
290 ddmax484 max 10000.0 1000000 -> 1000000\r
291 \r
292 -- subnormals\r
293 ddmax510 max 1.00E-383 0 -> 1.00E-383\r
294 ddmax511 max 0.1E-383 0 -> 1E-384 Subnormal\r
295 ddmax512 max 0.10E-383 0 -> 1.0E-384 Subnormal\r
296 ddmax513 max 0.100E-383 0 -> 1.00E-384 Subnormal\r
297 ddmax514 max 0.01E-383 0 -> 1E-385 Subnormal\r
298 ddmax515 max 0.999E-383 0 -> 9.99E-384 Subnormal\r
299 ddmax516 max 0.099E-383 0 -> 9.9E-385 Subnormal\r
300 ddmax517 max 0.009E-383 0 -> 9E-386 Subnormal\r
301 ddmax518 max 0.001E-383 0 -> 1E-386 Subnormal\r
302 ddmax519 max 0.0009E-383 0 -> 9E-387 Subnormal\r
303 ddmax520 max 0.0001E-383 0 -> 1E-387 Subnormal\r
304 \r
305 ddmax530 max -1.00E-383 0 -> 0\r
306 ddmax531 max -0.1E-383 0 -> 0\r
307 ddmax532 max -0.10E-383 0 -> 0\r
308 ddmax533 max -0.100E-383 0 -> 0\r
309 ddmax534 max -0.01E-383 0 -> 0\r
310 ddmax535 max -0.999E-383 0 -> 0\r
311 ddmax536 max -0.099E-383 0 -> 0\r
312 ddmax537 max -0.009E-383 0 -> 0\r
313 ddmax538 max -0.001E-383 0 -> 0\r
314 ddmax539 max -0.0009E-383 0 -> 0\r
315 ddmax540 max -0.0001E-383 0 -> 0\r
316 \r
317 -- Null tests\r
318 ddmax900 max 10 # -> NaN Invalid_operation\r
319 ddmax901 max # 10 -> NaN Invalid_operation\r
320 \r
321 \r
322 \r