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