1 ------------------------------------------------------------------------
\r
2 -- ddCompareSig.decTest -- decDouble comparison; all NaNs signal --
\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
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
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
26 -- All operands and results are decDoubles.
\r
35 ddcms001 comparesig -2 -2 -> 0
\r
36 ddcms002 comparesig -2 -1 -> -1
\r
37 ddcms003 comparesig -2 0 -> -1
\r
38 ddcms004 comparesig -2 1 -> -1
\r
39 ddcms005 comparesig -2 2 -> -1
\r
40 ddcms006 comparesig -1 -2 -> 1
\r
41 ddcms007 comparesig -1 -1 -> 0
\r
42 ddcms008 comparesig -1 0 -> -1
\r
43 ddcms009 comparesig -1 1 -> -1
\r
44 ddcms010 comparesig -1 2 -> -1
\r
45 ddcms011 comparesig 0 -2 -> 1
\r
46 ddcms012 comparesig 0 -1 -> 1
\r
47 ddcms013 comparesig 0 0 -> 0
\r
48 ddcms014 comparesig 0 1 -> -1
\r
49 ddcms015 comparesig 0 2 -> -1
\r
50 ddcms016 comparesig 1 -2 -> 1
\r
51 ddcms017 comparesig 1 -1 -> 1
\r
52 ddcms018 comparesig 1 0 -> 1
\r
53 ddcms019 comparesig 1 1 -> 0
\r
54 ddcms020 comparesig 1 2 -> -1
\r
55 ddcms021 comparesig 2 -2 -> 1
\r
56 ddcms022 comparesig 2 -1 -> 1
\r
57 ddcms023 comparesig 2 0 -> 1
\r
58 ddcms025 comparesig 2 1 -> 1
\r
59 ddcms026 comparesig 2 2 -> 0
\r
61 ddcms031 comparesig -20 -20 -> 0
\r
62 ddcms032 comparesig -20 -10 -> -1
\r
63 ddcms033 comparesig -20 00 -> -1
\r
64 ddcms034 comparesig -20 10 -> -1
\r
65 ddcms035 comparesig -20 20 -> -1
\r
66 ddcms036 comparesig -10 -20 -> 1
\r
67 ddcms037 comparesig -10 -10 -> 0
\r
68 ddcms038 comparesig -10 00 -> -1
\r
69 ddcms039 comparesig -10 10 -> -1
\r
70 ddcms040 comparesig -10 20 -> -1
\r
71 ddcms041 comparesig 00 -20 -> 1
\r
72 ddcms042 comparesig 00 -10 -> 1
\r
73 ddcms043 comparesig 00 00 -> 0
\r
74 ddcms044 comparesig 00 10 -> -1
\r
75 ddcms045 comparesig 00 20 -> -1
\r
76 ddcms046 comparesig 10 -20 -> 1
\r
77 ddcms047 comparesig 10 -10 -> 1
\r
78 ddcms048 comparesig 10 00 -> 1
\r
79 ddcms049 comparesig 10 10 -> 0
\r
80 ddcms050 comparesig 10 20 -> -1
\r
81 ddcms051 comparesig 20 -20 -> 1
\r
82 ddcms052 comparesig 20 -10 -> 1
\r
83 ddcms053 comparesig 20 00 -> 1
\r
84 ddcms055 comparesig 20 10 -> 1
\r
85 ddcms056 comparesig 20 20 -> 0
\r
87 ddcms061 comparesig -2.0 -2.0 -> 0
\r
88 ddcms062 comparesig -2.0 -1.0 -> -1
\r
89 ddcms063 comparesig -2.0 0.0 -> -1
\r
90 ddcms064 comparesig -2.0 1.0 -> -1
\r
91 ddcms065 comparesig -2.0 2.0 -> -1
\r
92 ddcms066 comparesig -1.0 -2.0 -> 1
\r
93 ddcms067 comparesig -1.0 -1.0 -> 0
\r
94 ddcms068 comparesig -1.0 0.0 -> -1
\r
95 ddcms069 comparesig -1.0 1.0 -> -1
\r
96 ddcms070 comparesig -1.0 2.0 -> -1
\r
97 ddcms071 comparesig 0.0 -2.0 -> 1
\r
98 ddcms072 comparesig 0.0 -1.0 -> 1
\r
99 ddcms073 comparesig 0.0 0.0 -> 0
\r
100 ddcms074 comparesig 0.0 1.0 -> -1
\r
101 ddcms075 comparesig 0.0 2.0 -> -1
\r
102 ddcms076 comparesig 1.0 -2.0 -> 1
\r
103 ddcms077 comparesig 1.0 -1.0 -> 1
\r
104 ddcms078 comparesig 1.0 0.0 -> 1
\r
105 ddcms079 comparesig 1.0 1.0 -> 0
\r
106 ddcms080 comparesig 1.0 2.0 -> -1
\r
107 ddcms081 comparesig 2.0 -2.0 -> 1
\r
108 ddcms082 comparesig 2.0 -1.0 -> 1
\r
109 ddcms083 comparesig 2.0 0.0 -> 1
\r
110 ddcms085 comparesig 2.0 1.0 -> 1
\r
111 ddcms086 comparesig 2.0 2.0 -> 0
\r
113 -- now some cases which might overflow if subtract were used
\r
114 ddcms090 comparesig 9.999999999999999E+384 9.999999999999999E+384 -> 0
\r
115 ddcms091 comparesig -9.999999999999999E+384 9.999999999999999E+384 -> -1
\r
116 ddcms092 comparesig 9.999999999999999E+384 -9.999999999999999E+384 -> 1
\r
117 ddcms093 comparesig -9.999999999999999E+384 -9.999999999999999E+384 -> 0
\r
119 -- some differing length/exponent cases
\r
120 ddcms100 comparesig 7.0 7.0 -> 0
\r
121 ddcms101 comparesig 7.0 7 -> 0
\r
122 ddcms102 comparesig 7 7.0 -> 0
\r
123 ddcms103 comparesig 7E+0 7.0 -> 0
\r
124 ddcms104 comparesig 70E-1 7.0 -> 0
\r
125 ddcms105 comparesig 0.7E+1 7 -> 0
\r
126 ddcms106 comparesig 70E-1 7 -> 0
\r
127 ddcms107 comparesig 7.0 7E+0 -> 0
\r
128 ddcms108 comparesig 7.0 70E-1 -> 0
\r
129 ddcms109 comparesig 7 0.7E+1 -> 0
\r
130 ddcms110 comparesig 7 70E-1 -> 0
\r
132 ddcms120 comparesig 8.0 7.0 -> 1
\r
133 ddcms121 comparesig 8.0 7 -> 1
\r
134 ddcms122 comparesig 8 7.0 -> 1
\r
135 ddcms123 comparesig 8E+0 7.0 -> 1
\r
136 ddcms124 comparesig 80E-1 7.0 -> 1
\r
137 ddcms125 comparesig 0.8E+1 7 -> 1
\r
138 ddcms126 comparesig 80E-1 7 -> 1
\r
139 ddcms127 comparesig 8.0 7E+0 -> 1
\r
140 ddcms128 comparesig 8.0 70E-1 -> 1
\r
141 ddcms129 comparesig 8 0.7E+1 -> 1
\r
142 ddcms130 comparesig 8 70E-1 -> 1
\r
144 ddcms140 comparesig 8.0 9.0 -> -1
\r
145 ddcms141 comparesig 8.0 9 -> -1
\r
146 ddcms142 comparesig 8 9.0 -> -1
\r
147 ddcms143 comparesig 8E+0 9.0 -> -1
\r
148 ddcms144 comparesig 80E-1 9.0 -> -1
\r
149 ddcms145 comparesig 0.8E+1 9 -> -1
\r
150 ddcms146 comparesig 80E-1 9 -> -1
\r
151 ddcms147 comparesig 8.0 9E+0 -> -1
\r
152 ddcms148 comparesig 8.0 90E-1 -> -1
\r
153 ddcms149 comparesig 8 0.9E+1 -> -1
\r
154 ddcms150 comparesig 8 90E-1 -> -1
\r
156 -- and again, with sign changes -+ ..
\r
157 ddcms200 comparesig -7.0 7.0 -> -1
\r
158 ddcms201 comparesig -7.0 7 -> -1
\r
159 ddcms202 comparesig -7 7.0 -> -1
\r
160 ddcms203 comparesig -7E+0 7.0 -> -1
\r
161 ddcms204 comparesig -70E-1 7.0 -> -1
\r
162 ddcms205 comparesig -0.7E+1 7 -> -1
\r
163 ddcms206 comparesig -70E-1 7 -> -1
\r
164 ddcms207 comparesig -7.0 7E+0 -> -1
\r
165 ddcms208 comparesig -7.0 70E-1 -> -1
\r
166 ddcms209 comparesig -7 0.7E+1 -> -1
\r
167 ddcms210 comparesig -7 70E-1 -> -1
\r
169 ddcms220 comparesig -8.0 7.0 -> -1
\r
170 ddcms221 comparesig -8.0 7 -> -1
\r
171 ddcms222 comparesig -8 7.0 -> -1
\r
172 ddcms223 comparesig -8E+0 7.0 -> -1
\r
173 ddcms224 comparesig -80E-1 7.0 -> -1
\r
174 ddcms225 comparesig -0.8E+1 7 -> -1
\r
175 ddcms226 comparesig -80E-1 7 -> -1
\r
176 ddcms227 comparesig -8.0 7E+0 -> -1
\r
177 ddcms228 comparesig -8.0 70E-1 -> -1
\r
178 ddcms229 comparesig -8 0.7E+1 -> -1
\r
179 ddcms230 comparesig -8 70E-1 -> -1
\r
181 ddcms240 comparesig -8.0 9.0 -> -1
\r
182 ddcms241 comparesig -8.0 9 -> -1
\r
183 ddcms242 comparesig -8 9.0 -> -1
\r
184 ddcms243 comparesig -8E+0 9.0 -> -1
\r
185 ddcms244 comparesig -80E-1 9.0 -> -1
\r
186 ddcms245 comparesig -0.8E+1 9 -> -1
\r
187 ddcms246 comparesig -80E-1 9 -> -1
\r
188 ddcms247 comparesig -8.0 9E+0 -> -1
\r
189 ddcms248 comparesig -8.0 90E-1 -> -1
\r
190 ddcms249 comparesig -8 0.9E+1 -> -1
\r
191 ddcms250 comparesig -8 90E-1 -> -1
\r
193 -- and again, with sign changes +- ..
\r
194 ddcms300 comparesig 7.0 -7.0 -> 1
\r
195 ddcms301 comparesig 7.0 -7 -> 1
\r
196 ddcms302 comparesig 7 -7.0 -> 1
\r
197 ddcms303 comparesig 7E+0 -7.0 -> 1
\r
198 ddcms304 comparesig 70E-1 -7.0 -> 1
\r
199 ddcms305 comparesig .7E+1 -7 -> 1
\r
200 ddcms306 comparesig 70E-1 -7 -> 1
\r
201 ddcms307 comparesig 7.0 -7E+0 -> 1
\r
202 ddcms308 comparesig 7.0 -70E-1 -> 1
\r
203 ddcms309 comparesig 7 -.7E+1 -> 1
\r
204 ddcms310 comparesig 7 -70E-1 -> 1
\r
206 ddcms320 comparesig 8.0 -7.0 -> 1
\r
207 ddcms321 comparesig 8.0 -7 -> 1
\r
208 ddcms322 comparesig 8 -7.0 -> 1
\r
209 ddcms323 comparesig 8E+0 -7.0 -> 1
\r
210 ddcms324 comparesig 80E-1 -7.0 -> 1
\r
211 ddcms325 comparesig .8E+1 -7 -> 1
\r
212 ddcms326 comparesig 80E-1 -7 -> 1
\r
213 ddcms327 comparesig 8.0 -7E+0 -> 1
\r
214 ddcms328 comparesig 8.0 -70E-1 -> 1
\r
215 ddcms329 comparesig 8 -.7E+1 -> 1
\r
216 ddcms330 comparesig 8 -70E-1 -> 1
\r
218 ddcms340 comparesig 8.0 -9.0 -> 1
\r
219 ddcms341 comparesig 8.0 -9 -> 1
\r
220 ddcms342 comparesig 8 -9.0 -> 1
\r
221 ddcms343 comparesig 8E+0 -9.0 -> 1
\r
222 ddcms344 comparesig 80E-1 -9.0 -> 1
\r
223 ddcms345 comparesig .8E+1 -9 -> 1
\r
224 ddcms346 comparesig 80E-1 -9 -> 1
\r
225 ddcms347 comparesig 8.0 -9E+0 -> 1
\r
226 ddcms348 comparesig 8.0 -90E-1 -> 1
\r
227 ddcms349 comparesig 8 -.9E+1 -> 1
\r
228 ddcms350 comparesig 8 -90E-1 -> 1
\r
230 -- and again, with sign changes -- ..
\r
231 ddcms400 comparesig -7.0 -7.0 -> 0
\r
232 ddcms401 comparesig -7.0 -7 -> 0
\r
233 ddcms402 comparesig -7 -7.0 -> 0
\r
234 ddcms403 comparesig -7E+0 -7.0 -> 0
\r
235 ddcms404 comparesig -70E-1 -7.0 -> 0
\r
236 ddcms405 comparesig -.7E+1 -7 -> 0
\r
237 ddcms406 comparesig -70E-1 -7 -> 0
\r
238 ddcms407 comparesig -7.0 -7E+0 -> 0
\r
239 ddcms408 comparesig -7.0 -70E-1 -> 0
\r
240 ddcms409 comparesig -7 -.7E+1 -> 0
\r
241 ddcms410 comparesig -7 -70E-1 -> 0
\r
243 ddcms420 comparesig -8.0 -7.0 -> -1
\r
244 ddcms421 comparesig -8.0 -7 -> -1
\r
245 ddcms422 comparesig -8 -7.0 -> -1
\r
246 ddcms423 comparesig -8E+0 -7.0 -> -1
\r
247 ddcms424 comparesig -80E-1 -7.0 -> -1
\r
248 ddcms425 comparesig -.8E+1 -7 -> -1
\r
249 ddcms426 comparesig -80E-1 -7 -> -1
\r
250 ddcms427 comparesig -8.0 -7E+0 -> -1
\r
251 ddcms428 comparesig -8.0 -70E-1 -> -1
\r
252 ddcms429 comparesig -8 -.7E+1 -> -1
\r
253 ddcms430 comparesig -8 -70E-1 -> -1
\r
255 ddcms440 comparesig -8.0 -9.0 -> 1
\r
256 ddcms441 comparesig -8.0 -9 -> 1
\r
257 ddcms442 comparesig -8 -9.0 -> 1
\r
258 ddcms443 comparesig -8E+0 -9.0 -> 1
\r
259 ddcms444 comparesig -80E-1 -9.0 -> 1
\r
260 ddcms445 comparesig -.8E+1 -9 -> 1
\r
261 ddcms446 comparesig -80E-1 -9 -> 1
\r
262 ddcms447 comparesig -8.0 -9E+0 -> 1
\r
263 ddcms448 comparesig -8.0 -90E-1 -> 1
\r
264 ddcms449 comparesig -8 -.9E+1 -> 1
\r
265 ddcms450 comparesig -8 -90E-1 -> 1
\r
268 -- testcases that subtract to lots of zeros at boundaries [pgr]
\r
269 ddcms473 comparesig 123.4560000000000E-89 123.456E-89 -> 0
\r
270 ddcms474 comparesig 123.456000000000E+89 123.456E+89 -> 0
\r
271 ddcms475 comparesig 123.45600000000E-89 123.456E-89 -> 0
\r
272 ddcms476 comparesig 123.4560000000E+89 123.456E+89 -> 0
\r
273 ddcms477 comparesig 123.456000000E-89 123.456E-89 -> 0
\r
274 ddcms478 comparesig 123.45600000E+89 123.456E+89 -> 0
\r
275 ddcms479 comparesig 123.4560000E-89 123.456E-89 -> 0
\r
276 ddcms480 comparesig 123.456000E+89 123.456E+89 -> 0
\r
277 ddcms481 comparesig 123.45600E-89 123.456E-89 -> 0
\r
278 ddcms482 comparesig 123.4560E+89 123.456E+89 -> 0
\r
279 ddcms483 comparesig 123.456E-89 123.456E-89 -> 0
\r
280 ddcms487 comparesig 123.456E+89 123.4560000000000E+89 -> 0
\r
281 ddcms488 comparesig 123.456E-89 123.456000000000E-89 -> 0
\r
282 ddcms489 comparesig 123.456E+89 123.45600000000E+89 -> 0
\r
283 ddcms490 comparesig 123.456E-89 123.4560000000E-89 -> 0
\r
284 ddcms491 comparesig 123.456E+89 123.456000000E+89 -> 0
\r
285 ddcms492 comparesig 123.456E-89 123.45600000E-89 -> 0
\r
286 ddcms493 comparesig 123.456E+89 123.4560000E+89 -> 0
\r
287 ddcms494 comparesig 123.456E-89 123.456000E-89 -> 0
\r
288 ddcms495 comparesig 123.456E+89 123.45600E+89 -> 0
\r
289 ddcms496 comparesig 123.456E-89 123.4560E-89 -> 0
\r
290 ddcms497 comparesig 123.456E+89 123.456E+89 -> 0
\r
292 -- wide-ranging, around precision; signs equal
\r
293 ddcms500 comparesig 1 1E-15 -> 1
\r
294 ddcms501 comparesig 1 1E-14 -> 1
\r
295 ddcms502 comparesig 1 1E-13 -> 1
\r
296 ddcms503 comparesig 1 1E-12 -> 1
\r
297 ddcms504 comparesig 1 1E-11 -> 1
\r
298 ddcms505 comparesig 1 1E-10 -> 1
\r
299 ddcms506 comparesig 1 1E-9 -> 1
\r
300 ddcms507 comparesig 1 1E-8 -> 1
\r
301 ddcms508 comparesig 1 1E-7 -> 1
\r
302 ddcms509 comparesig 1 1E-6 -> 1
\r
303 ddcms510 comparesig 1 1E-5 -> 1
\r
304 ddcms511 comparesig 1 1E-4 -> 1
\r
305 ddcms512 comparesig 1 1E-3 -> 1
\r
306 ddcms513 comparesig 1 1E-2 -> 1
\r
307 ddcms514 comparesig 1 1E-1 -> 1
\r
308 ddcms515 comparesig 1 1E-0 -> 0
\r
309 ddcms516 comparesig 1 1E+1 -> -1
\r
310 ddcms517 comparesig 1 1E+2 -> -1
\r
311 ddcms518 comparesig 1 1E+3 -> -1
\r
312 ddcms519 comparesig 1 1E+4 -> -1
\r
313 ddcms521 comparesig 1 1E+5 -> -1
\r
314 ddcms522 comparesig 1 1E+6 -> -1
\r
315 ddcms523 comparesig 1 1E+7 -> -1
\r
316 ddcms524 comparesig 1 1E+8 -> -1
\r
317 ddcms525 comparesig 1 1E+9 -> -1
\r
318 ddcms526 comparesig 1 1E+10 -> -1
\r
319 ddcms527 comparesig 1 1E+11 -> -1
\r
320 ddcms528 comparesig 1 1E+12 -> -1
\r
321 ddcms529 comparesig 1 1E+13 -> -1
\r
322 ddcms530 comparesig 1 1E+14 -> -1
\r
323 ddcms531 comparesig 1 1E+15 -> -1
\r
325 ddcms540 comparesig 1E-15 1 -> -1
\r
326 ddcms541 comparesig 1E-14 1 -> -1
\r
327 ddcms542 comparesig 1E-13 1 -> -1
\r
328 ddcms543 comparesig 1E-12 1 -> -1
\r
329 ddcms544 comparesig 1E-11 1 -> -1
\r
330 ddcms545 comparesig 1E-10 1 -> -1
\r
331 ddcms546 comparesig 1E-9 1 -> -1
\r
332 ddcms547 comparesig 1E-8 1 -> -1
\r
333 ddcms548 comparesig 1E-7 1 -> -1
\r
334 ddcms549 comparesig 1E-6 1 -> -1
\r
335 ddcms550 comparesig 1E-5 1 -> -1
\r
336 ddcms551 comparesig 1E-4 1 -> -1
\r
337 ddcms552 comparesig 1E-3 1 -> -1
\r
338 ddcms553 comparesig 1E-2 1 -> -1
\r
339 ddcms554 comparesig 1E-1 1 -> -1
\r
340 ddcms555 comparesig 1E-0 1 -> 0
\r
341 ddcms556 comparesig 1E+1 1 -> 1
\r
342 ddcms557 comparesig 1E+2 1 -> 1
\r
343 ddcms558 comparesig 1E+3 1 -> 1
\r
344 ddcms559 comparesig 1E+4 1 -> 1
\r
345 ddcms561 comparesig 1E+5 1 -> 1
\r
346 ddcms562 comparesig 1E+6 1 -> 1
\r
347 ddcms563 comparesig 1E+7 1 -> 1
\r
348 ddcms564 comparesig 1E+8 1 -> 1
\r
349 ddcms565 comparesig 1E+9 1 -> 1
\r
350 ddcms566 comparesig 1E+10 1 -> 1
\r
351 ddcms567 comparesig 1E+11 1 -> 1
\r
352 ddcms568 comparesig 1E+12 1 -> 1
\r
353 ddcms569 comparesig 1E+13 1 -> 1
\r
354 ddcms570 comparesig 1E+14 1 -> 1
\r
355 ddcms571 comparesig 1E+15 1 -> 1
\r
356 -- similar with a useful coefficient, one side only
\r
357 ddcms580 comparesig 0.000000987654321 1E-15 -> 1
\r
358 ddcms581 comparesig 0.000000987654321 1E-14 -> 1
\r
359 ddcms582 comparesig 0.000000987654321 1E-13 -> 1
\r
360 ddcms583 comparesig 0.000000987654321 1E-12 -> 1
\r
361 ddcms584 comparesig 0.000000987654321 1E-11 -> 1
\r
362 ddcms585 comparesig 0.000000987654321 1E-10 -> 1
\r
363 ddcms586 comparesig 0.000000987654321 1E-9 -> 1
\r
364 ddcms587 comparesig 0.000000987654321 1E-8 -> 1
\r
365 ddcms588 comparesig 0.000000987654321 1E-7 -> 1
\r
366 ddcms589 comparesig 0.000000987654321 1E-6 -> -1
\r
367 ddcms590 comparesig 0.000000987654321 1E-5 -> -1
\r
368 ddcms591 comparesig 0.000000987654321 1E-4 -> -1
\r
369 ddcms592 comparesig 0.000000987654321 1E-3 -> -1
\r
370 ddcms593 comparesig 0.000000987654321 1E-2 -> -1
\r
371 ddcms594 comparesig 0.000000987654321 1E-1 -> -1
\r
372 ddcms595 comparesig 0.000000987654321 1E-0 -> -1
\r
373 ddcms596 comparesig 0.000000987654321 1E+1 -> -1
\r
374 ddcms597 comparesig 0.000000987654321 1E+2 -> -1
\r
375 ddcms598 comparesig 0.000000987654321 1E+3 -> -1
\r
376 ddcms599 comparesig 0.000000987654321 1E+4 -> -1
\r
378 -- check some unit-y traps
\r
379 ddcms600 comparesig 12 12.2345 -> -1
\r
380 ddcms601 comparesig 12.0 12.2345 -> -1
\r
381 ddcms602 comparesig 12.00 12.2345 -> -1
\r
382 ddcms603 comparesig 12.000 12.2345 -> -1
\r
383 ddcms604 comparesig 12.0000 12.2345 -> -1
\r
384 ddcms605 comparesig 12.00000 12.2345 -> -1
\r
385 ddcms606 comparesig 12.000000 12.2345 -> -1
\r
386 ddcms607 comparesig 12.0000000 12.2345 -> -1
\r
387 ddcms608 comparesig 12.00000000 12.2345 -> -1
\r
388 ddcms609 comparesig 12.000000000 12.2345 -> -1
\r
389 ddcms610 comparesig 12.1234 12 -> 1
\r
390 ddcms611 comparesig 12.1234 12.0 -> 1
\r
391 ddcms612 comparesig 12.1234 12.00 -> 1
\r
392 ddcms613 comparesig 12.1234 12.000 -> 1
\r
393 ddcms614 comparesig 12.1234 12.0000 -> 1
\r
394 ddcms615 comparesig 12.1234 12.00000 -> 1
\r
395 ddcms616 comparesig 12.1234 12.000000 -> 1
\r
396 ddcms617 comparesig 12.1234 12.0000000 -> 1
\r
397 ddcms618 comparesig 12.1234 12.00000000 -> 1
\r
398 ddcms619 comparesig 12.1234 12.000000000 -> 1
\r
399 ddcms620 comparesig -12 -12.2345 -> 1
\r
400 ddcms621 comparesig -12.0 -12.2345 -> 1
\r
401 ddcms622 comparesig -12.00 -12.2345 -> 1
\r
402 ddcms623 comparesig -12.000 -12.2345 -> 1
\r
403 ddcms624 comparesig -12.0000 -12.2345 -> 1
\r
404 ddcms625 comparesig -12.00000 -12.2345 -> 1
\r
405 ddcms626 comparesig -12.000000 -12.2345 -> 1
\r
406 ddcms627 comparesig -12.0000000 -12.2345 -> 1
\r
407 ddcms628 comparesig -12.00000000 -12.2345 -> 1
\r
408 ddcms629 comparesig -12.000000000 -12.2345 -> 1
\r
409 ddcms630 comparesig -12.1234 -12 -> -1
\r
410 ddcms631 comparesig -12.1234 -12.0 -> -1
\r
411 ddcms632 comparesig -12.1234 -12.00 -> -1
\r
412 ddcms633 comparesig -12.1234 -12.000 -> -1
\r
413 ddcms634 comparesig -12.1234 -12.0000 -> -1
\r
414 ddcms635 comparesig -12.1234 -12.00000 -> -1
\r
415 ddcms636 comparesig -12.1234 -12.000000 -> -1
\r
416 ddcms637 comparesig -12.1234 -12.0000000 -> -1
\r
417 ddcms638 comparesig -12.1234 -12.00000000 -> -1
\r
418 ddcms639 comparesig -12.1234 -12.000000000 -> -1
\r
421 ddcms640 comparesig 0 0 -> 0
\r
422 ddcms641 comparesig 0 -0 -> 0
\r
423 ddcms642 comparesig 0 -0.0 -> 0
\r
424 ddcms643 comparesig 0 0.0 -> 0
\r
425 ddcms644 comparesig -0 0 -> 0
\r
426 ddcms645 comparesig -0 -0 -> 0
\r
427 ddcms646 comparesig -0 -0.0 -> 0
\r
428 ddcms647 comparesig -0 0.0 -> 0
\r
429 ddcms648 comparesig 0.0 0 -> 0
\r
430 ddcms649 comparesig 0.0 -0 -> 0
\r
431 ddcms650 comparesig 0.0 -0.0 -> 0
\r
432 ddcms651 comparesig 0.0 0.0 -> 0
\r
433 ddcms652 comparesig -0.0 0 -> 0
\r
434 ddcms653 comparesig -0.0 -0 -> 0
\r
435 ddcms654 comparesig -0.0 -0.0 -> 0
\r
436 ddcms655 comparesig -0.0 0.0 -> 0
\r
438 ddcms656 comparesig -0E1 0.0 -> 0
\r
439 ddcms657 comparesig -0E2 0.0 -> 0
\r
440 ddcms658 comparesig 0E1 0.0 -> 0
\r
441 ddcms659 comparesig 0E2 0.0 -> 0
\r
442 ddcms660 comparesig -0E1 0 -> 0
\r
443 ddcms661 comparesig -0E2 0 -> 0
\r
444 ddcms662 comparesig 0E1 0 -> 0
\r
445 ddcms663 comparesig 0E2 0 -> 0
\r
446 ddcms664 comparesig -0E1 -0E1 -> 0
\r
447 ddcms665 comparesig -0E2 -0E1 -> 0
\r
448 ddcms666 comparesig 0E1 -0E1 -> 0
\r
449 ddcms667 comparesig 0E2 -0E1 -> 0
\r
450 ddcms668 comparesig -0E1 -0E2 -> 0
\r
451 ddcms669 comparesig -0E2 -0E2 -> 0
\r
452 ddcms670 comparesig 0E1 -0E2 -> 0
\r
453 ddcms671 comparesig 0E2 -0E2 -> 0
\r
454 ddcms672 comparesig -0E1 0E1 -> 0
\r
455 ddcms673 comparesig -0E2 0E1 -> 0
\r
456 ddcms674 comparesig 0E1 0E1 -> 0
\r
457 ddcms675 comparesig 0E2 0E1 -> 0
\r
458 ddcms676 comparesig -0E1 0E2 -> 0
\r
459 ddcms677 comparesig -0E2 0E2 -> 0
\r
460 ddcms678 comparesig 0E1 0E2 -> 0
\r
461 ddcms679 comparesig 0E2 0E2 -> 0
\r
463 -- trailing zeros; unit-y
\r
464 ddcms680 comparesig 12 12 -> 0
\r
465 ddcms681 comparesig 12 12.0 -> 0
\r
466 ddcms682 comparesig 12 12.00 -> 0
\r
467 ddcms683 comparesig 12 12.000 -> 0
\r
468 ddcms684 comparesig 12 12.0000 -> 0
\r
469 ddcms685 comparesig 12 12.00000 -> 0
\r
470 ddcms686 comparesig 12 12.000000 -> 0
\r
471 ddcms687 comparesig 12 12.0000000 -> 0
\r
472 ddcms688 comparesig 12 12.00000000 -> 0
\r
473 ddcms689 comparesig 12 12.000000000 -> 0
\r
474 ddcms690 comparesig 12 12 -> 0
\r
475 ddcms691 comparesig 12.0 12 -> 0
\r
476 ddcms692 comparesig 12.00 12 -> 0
\r
477 ddcms693 comparesig 12.000 12 -> 0
\r
478 ddcms694 comparesig 12.0000 12 -> 0
\r
479 ddcms695 comparesig 12.00000 12 -> 0
\r
480 ddcms696 comparesig 12.000000 12 -> 0
\r
481 ddcms697 comparesig 12.0000000 12 -> 0
\r
482 ddcms698 comparesig 12.00000000 12 -> 0
\r
483 ddcms699 comparesig 12.000000000 12 -> 0
\r
485 -- first, second, & last digit
\r
486 ddcms700 comparesig 1234567890123456 1234567890123455 -> 1
\r
487 ddcms701 comparesig 1234567890123456 1234567890123456 -> 0
\r
488 ddcms702 comparesig 1234567890123456 1234567890123457 -> -1
\r
489 ddcms703 comparesig 1234567890123456 0234567890123456 -> 1
\r
490 ddcms704 comparesig 1234567890123456 1234567890123456 -> 0
\r
491 ddcms705 comparesig 1234567890123456 2234567890123456 -> -1
\r
492 ddcms706 comparesig 1134567890123456 1034567890123456 -> 1
\r
493 ddcms707 comparesig 1134567890123456 1134567890123456 -> 0
\r
494 ddcms708 comparesig 1134567890123456 1234567890123456 -> -1
\r
497 ddcms721 comparesig 12345678000 1 -> 1
\r
498 ddcms722 comparesig 1 12345678000 -> -1
\r
499 ddcms723 comparesig 1234567800 1 -> 1
\r
500 ddcms724 comparesig 1 1234567800 -> -1
\r
501 ddcms725 comparesig 1234567890 1 -> 1
\r
502 ddcms726 comparesig 1 1234567890 -> -1
\r
503 ddcms727 comparesig 1234567891 1 -> 1
\r
504 ddcms728 comparesig 1 1234567891 -> -1
\r
505 ddcms729 comparesig 12345678901 1 -> 1
\r
506 ddcms730 comparesig 1 12345678901 -> -1
\r
507 ddcms731 comparesig 1234567896 1 -> 1
\r
508 ddcms732 comparesig 1 1234567896 -> -1
\r
510 -- residue cases at lower precision
\r
511 ddcms740 comparesig 1 0.9999999 -> 1
\r
512 ddcms741 comparesig 1 0.999999 -> 1
\r
513 ddcms742 comparesig 1 0.99999 -> 1
\r
514 ddcms743 comparesig 1 1.0000 -> 0
\r
515 ddcms744 comparesig 1 1.00001 -> -1
\r
516 ddcms745 comparesig 1 1.000001 -> -1
\r
517 ddcms746 comparesig 1 1.0000001 -> -1
\r
518 ddcms750 comparesig 0.9999999 1 -> -1
\r
519 ddcms751 comparesig 0.999999 1 -> -1
\r
520 ddcms752 comparesig 0.99999 1 -> -1
\r
521 ddcms753 comparesig 1.0000 1 -> 0
\r
522 ddcms754 comparesig 1.00001 1 -> 1
\r
523 ddcms755 comparesig 1.000001 1 -> 1
\r
524 ddcms756 comparesig 1.0000001 1 -> 1
\r
527 ddcms780 comparesig Inf -Inf -> 1
\r
528 ddcms781 comparesig Inf -1000 -> 1
\r
529 ddcms782 comparesig Inf -1 -> 1
\r
530 ddcms783 comparesig Inf -0 -> 1
\r
531 ddcms784 comparesig Inf 0 -> 1
\r
532 ddcms785 comparesig Inf 1 -> 1
\r
533 ddcms786 comparesig Inf 1000 -> 1
\r
534 ddcms787 comparesig Inf Inf -> 0
\r
535 ddcms788 comparesig -1000 Inf -> -1
\r
536 ddcms789 comparesig -Inf Inf -> -1
\r
537 ddcms790 comparesig -1 Inf -> -1
\r
538 ddcms791 comparesig -0 Inf -> -1
\r
539 ddcms792 comparesig 0 Inf -> -1
\r
540 ddcms793 comparesig 1 Inf -> -1
\r
541 ddcms794 comparesig 1000 Inf -> -1
\r
542 ddcms795 comparesig Inf Inf -> 0
\r
544 ddcms800 comparesig -Inf -Inf -> 0
\r
545 ddcms801 comparesig -Inf -1000 -> -1
\r
546 ddcms802 comparesig -Inf -1 -> -1
\r
547 ddcms803 comparesig -Inf -0 -> -1
\r
548 ddcms804 comparesig -Inf 0 -> -1
\r
549 ddcms805 comparesig -Inf 1 -> -1
\r
550 ddcms806 comparesig -Inf 1000 -> -1
\r
551 ddcms807 comparesig -Inf Inf -> -1
\r
552 ddcms808 comparesig -Inf -Inf -> 0
\r
553 ddcms809 comparesig -1000 -Inf -> 1
\r
554 ddcms810 comparesig -1 -Inf -> 1
\r
555 ddcms811 comparesig -0 -Inf -> 1
\r
556 ddcms812 comparesig 0 -Inf -> 1
\r
557 ddcms813 comparesig 1 -Inf -> 1
\r
558 ddcms814 comparesig 1000 -Inf -> 1
\r
559 ddcms815 comparesig Inf -Inf -> 1
\r
561 ddcms821 comparesig NaN -Inf -> NaN Invalid_operation
\r
562 ddcms822 comparesig NaN -1000 -> NaN Invalid_operation
\r
563 ddcms823 comparesig NaN -1 -> NaN Invalid_operation
\r
564 ddcms824 comparesig NaN -0 -> NaN Invalid_operation
\r
565 ddcms825 comparesig NaN 0 -> NaN Invalid_operation
\r
566 ddcms826 comparesig NaN 1 -> NaN Invalid_operation
\r
567 ddcms827 comparesig NaN 1000 -> NaN Invalid_operation
\r
568 ddcms828 comparesig NaN Inf -> NaN Invalid_operation
\r
569 ddcms829 comparesig NaN NaN -> NaN Invalid_operation
\r
570 ddcms830 comparesig -Inf NaN -> NaN Invalid_operation
\r
571 ddcms831 comparesig -1000 NaN -> NaN Invalid_operation
\r
572 ddcms832 comparesig -1 NaN -> NaN Invalid_operation
\r
573 ddcms833 comparesig -0 NaN -> NaN Invalid_operation
\r
574 ddcms834 comparesig 0 NaN -> NaN Invalid_operation
\r
575 ddcms835 comparesig 1 NaN -> NaN Invalid_operation
\r
576 ddcms836 comparesig 1000 NaN -> NaN Invalid_operation
\r
577 ddcms837 comparesig Inf NaN -> NaN Invalid_operation
\r
578 ddcms838 comparesig -NaN -NaN -> -NaN Invalid_operation
\r
579 ddcms839 comparesig +NaN -NaN -> NaN Invalid_operation
\r
580 ddcms840 comparesig -NaN +NaN -> -NaN Invalid_operation
\r
582 ddcms841 comparesig sNaN -Inf -> NaN Invalid_operation
\r
583 ddcms842 comparesig sNaN -1000 -> NaN Invalid_operation
\r
584 ddcms843 comparesig sNaN -1 -> NaN Invalid_operation
\r
585 ddcms844 comparesig sNaN -0 -> NaN Invalid_operation
\r
586 ddcms845 comparesig sNaN 0 -> NaN Invalid_operation
\r
587 ddcms846 comparesig sNaN 1 -> NaN Invalid_operation
\r
588 ddcms847 comparesig sNaN 1000 -> NaN Invalid_operation
\r
589 ddcms848 comparesig sNaN NaN -> NaN Invalid_operation
\r
590 ddcms849 comparesig sNaN sNaN -> NaN Invalid_operation
\r
591 ddcms850 comparesig NaN sNaN -> NaN Invalid_operation
\r
592 ddcms851 comparesig -Inf sNaN -> NaN Invalid_operation
\r
593 ddcms852 comparesig -1000 sNaN -> NaN Invalid_operation
\r
594 ddcms853 comparesig -1 sNaN -> NaN Invalid_operation
\r
595 ddcms854 comparesig -0 sNaN -> NaN Invalid_operation
\r
596 ddcms855 comparesig 0 sNaN -> NaN Invalid_operation
\r
597 ddcms856 comparesig 1 sNaN -> NaN Invalid_operation
\r
598 ddcms857 comparesig 1000 sNaN -> NaN Invalid_operation
\r
599 ddcms858 comparesig Inf sNaN -> NaN Invalid_operation
\r
600 ddcms859 comparesig NaN sNaN -> NaN Invalid_operation
\r
602 -- propagating NaNs
\r
603 ddcms860 comparesig NaN9 -Inf -> NaN9 Invalid_operation
\r
604 ddcms861 comparesig NaN8 999 -> NaN8 Invalid_operation
\r
605 ddcms862 comparesig NaN77 Inf -> NaN77 Invalid_operation
\r
606 ddcms863 comparesig -NaN67 NaN5 -> -NaN67 Invalid_operation
\r
607 ddcms864 comparesig -Inf -NaN4 -> -NaN4 Invalid_operation
\r
608 ddcms865 comparesig -999 -NaN33 -> -NaN33 Invalid_operation
\r
609 ddcms866 comparesig Inf NaN2 -> NaN2 Invalid_operation
\r
610 ddcms867 comparesig -NaN41 -NaN42 -> -NaN41 Invalid_operation
\r
611 ddcms868 comparesig +NaN41 -NaN42 -> NaN41 Invalid_operation
\r
612 ddcms869 comparesig -NaN41 +NaN42 -> -NaN41 Invalid_operation
\r
613 ddcms870 comparesig +NaN41 +NaN42 -> NaN41 Invalid_operation
\r
615 ddcms871 comparesig -sNaN99 -Inf -> -NaN99 Invalid_operation
\r
616 ddcms872 comparesig sNaN98 -11 -> NaN98 Invalid_operation
\r
617 ddcms873 comparesig sNaN97 NaN -> NaN97 Invalid_operation
\r
618 ddcms874 comparesig sNaN16 sNaN94 -> NaN16 Invalid_operation
\r
619 ddcms875 comparesig NaN85 sNaN83 -> NaN83 Invalid_operation
\r
620 ddcms876 comparesig -Inf sNaN92 -> NaN92 Invalid_operation
\r
621 ddcms877 comparesig 088 sNaN81 -> NaN81 Invalid_operation
\r
622 ddcms878 comparesig Inf sNaN90 -> NaN90 Invalid_operation
\r
623 ddcms879 comparesig NaN -sNaN89 -> -NaN89 Invalid_operation
\r
626 ddcms880 comparesig +1.23456789012345E-0 9E+384 -> -1
\r
627 ddcms881 comparesig 9E+384 +1.23456789012345E-0 -> 1
\r
628 ddcms882 comparesig +0.100 9E-383 -> 1
\r
629 ddcms883 comparesig 9E-383 +0.100 -> -1
\r
630 ddcms885 comparesig -1.23456789012345E-0 9E+384 -> -1
\r
631 ddcms886 comparesig 9E+384 -1.23456789012345E-0 -> 1
\r
632 ddcms887 comparesig -0.100 9E-383 -> -1
\r
633 ddcms888 comparesig 9E-383 -0.100 -> 1
\r
636 ddcms901 comparesig 1e+77 1e+11 -> 1
\r
637 ddcms902 comparesig 1e+77 -1e+11 -> 1
\r
638 ddcms903 comparesig -1e+77 1e+11 -> -1
\r
639 ddcms904 comparesig -1e+77 -1e+11 -> -1
\r
640 ddcms905 comparesig 1e-77 1e-11 -> -1
\r
641 ddcms906 comparesig 1e-77 -1e-11 -> 1
\r
642 ddcms907 comparesig -1e-77 1e-11 -> -1
\r
643 ddcms908 comparesig -1e-77 -1e-11 -> 1
\r
646 ddcms990 comparesig 10 # -> NaN Invalid_operation
\r
647 ddcms991 comparesig # 10 -> NaN Invalid_operation
\r