|
1 ------------------------------------------------------------------------ |
|
2 -- comparetotmag.decTest -- decimal comparison, abs. total ordering -- |
|
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@uk.ibm.com -- |
|
19 ------------------------------------------------------------------------ |
|
20 version: 2.58 |
|
21 |
|
22 -- Note that it cannot be assumed that add/subtract tests cover paths |
|
23 -- for this operation adequately, here, because the code might be |
|
24 -- quite different (comparison cannot overflow or underflow, so |
|
25 -- actual subtractions are not necessary). Similarly, comparetotal |
|
26 -- will have some radically different paths than compare. |
|
27 |
|
28 extended: 1 |
|
29 precision: 16 |
|
30 rounding: half_up |
|
31 maxExponent: 384 |
|
32 minExponent: -383 |
|
33 |
|
34 -- sanity checks |
|
35 ctmx001 comparetotmag -2 -2 -> 0 |
|
36 ctmx002 comparetotmag -2 -1 -> 1 |
|
37 ctmx003 comparetotmag -2 0 -> 1 |
|
38 ctmx004 comparetotmag -2 1 -> 1 |
|
39 ctmx005 comparetotmag -2 2 -> 0 |
|
40 ctmx006 comparetotmag -1 -2 -> -1 |
|
41 ctmx007 comparetotmag -1 -1 -> 0 |
|
42 ctmx008 comparetotmag -1 0 -> 1 |
|
43 ctmx009 comparetotmag -1 1 -> 0 |
|
44 ctmx010 comparetotmag -1 2 -> -1 |
|
45 ctmx011 comparetotmag 0 -2 -> -1 |
|
46 ctmx012 comparetotmag 0 -1 -> -1 |
|
47 ctmx013 comparetotmag 0 0 -> 0 |
|
48 ctmx014 comparetotmag 0 1 -> -1 |
|
49 ctmx015 comparetotmag 0 2 -> -1 |
|
50 ctmx016 comparetotmag 1 -2 -> -1 |
|
51 ctmx017 comparetotmag 1 -1 -> 0 |
|
52 ctmx018 comparetotmag 1 0 -> 1 |
|
53 ctmx019 comparetotmag 1 1 -> 0 |
|
54 ctmx020 comparetotmag 1 2 -> -1 |
|
55 ctmx021 comparetotmag 2 -2 -> 0 |
|
56 ctmx022 comparetotmag 2 -1 -> 1 |
|
57 ctmx023 comparetotmag 2 0 -> 1 |
|
58 ctmx025 comparetotmag 2 1 -> 1 |
|
59 ctmx026 comparetotmag 2 2 -> 0 |
|
60 |
|
61 ctmx031 comparetotmag -20 -20 -> 0 |
|
62 ctmx032 comparetotmag -20 -10 -> 1 |
|
63 ctmx033 comparetotmag -20 00 -> 1 |
|
64 ctmx034 comparetotmag -20 10 -> 1 |
|
65 ctmx035 comparetotmag -20 20 -> 0 |
|
66 ctmx036 comparetotmag -10 -20 -> -1 |
|
67 ctmx037 comparetotmag -10 -10 -> 0 |
|
68 ctmx038 comparetotmag -10 00 -> 1 |
|
69 ctmx039 comparetotmag -10 10 -> 0 |
|
70 ctmx040 comparetotmag -10 20 -> -1 |
|
71 ctmx041 comparetotmag 00 -20 -> -1 |
|
72 ctmx042 comparetotmag 00 -10 -> -1 |
|
73 ctmx043 comparetotmag 00 00 -> 0 |
|
74 ctmx044 comparetotmag 00 10 -> -1 |
|
75 ctmx045 comparetotmag 00 20 -> -1 |
|
76 ctmx046 comparetotmag 10 -20 -> -1 |
|
77 ctmx047 comparetotmag 10 -10 -> 0 |
|
78 ctmx048 comparetotmag 10 00 -> 1 |
|
79 ctmx049 comparetotmag 10 10 -> 0 |
|
80 ctmx050 comparetotmag 10 20 -> -1 |
|
81 ctmx051 comparetotmag 20 -20 -> 0 |
|
82 ctmx052 comparetotmag 20 -10 -> 1 |
|
83 ctmx053 comparetotmag 20 00 -> 1 |
|
84 ctmx055 comparetotmag 20 10 -> 1 |
|
85 ctmx056 comparetotmag 20 20 -> 0 |
|
86 |
|
87 ctmx061 comparetotmag -2.0 -2.0 -> 0 |
|
88 ctmx062 comparetotmag -2.0 -1.0 -> 1 |
|
89 ctmx063 comparetotmag -2.0 0.0 -> 1 |
|
90 ctmx064 comparetotmag -2.0 1.0 -> 1 |
|
91 ctmx065 comparetotmag -2.0 2.0 -> 0 |
|
92 ctmx066 comparetotmag -1.0 -2.0 -> -1 |
|
93 ctmx067 comparetotmag -1.0 -1.0 -> 0 |
|
94 ctmx068 comparetotmag -1.0 0.0 -> 1 |
|
95 ctmx069 comparetotmag -1.0 1.0 -> 0 |
|
96 ctmx070 comparetotmag -1.0 2.0 -> -1 |
|
97 ctmx071 comparetotmag 0.0 -2.0 -> -1 |
|
98 ctmx072 comparetotmag 0.0 -1.0 -> -1 |
|
99 ctmx073 comparetotmag 0.0 0.0 -> 0 |
|
100 ctmx074 comparetotmag 0.0 1.0 -> -1 |
|
101 ctmx075 comparetotmag 0.0 2.0 -> -1 |
|
102 ctmx076 comparetotmag 1.0 -2.0 -> -1 |
|
103 ctmx077 comparetotmag 1.0 -1.0 -> 0 |
|
104 ctmx078 comparetotmag 1.0 0.0 -> 1 |
|
105 ctmx079 comparetotmag 1.0 1.0 -> 0 |
|
106 ctmx080 comparetotmag 1.0 2.0 -> -1 |
|
107 ctmx081 comparetotmag 2.0 -2.0 -> 0 |
|
108 ctmx082 comparetotmag 2.0 -1.0 -> 1 |
|
109 ctmx083 comparetotmag 2.0 0.0 -> 1 |
|
110 ctmx085 comparetotmag 2.0 1.0 -> 1 |
|
111 ctmx086 comparetotmag 2.0 2.0 -> 0 |
|
112 |
|
113 -- now some cases which might overflow if subtract were used |
|
114 maxexponent: 999999999 |
|
115 minexponent: -999999999 |
|
116 ctmx090 comparetotmag 9.99999999E+999999999 9.99999999E+999999999 -> 0 |
|
117 ctmx091 comparetotmag -9.99999999E+999999999 9.99999999E+999999999 -> 0 |
|
118 ctmx092 comparetotmag 9.99999999E+999999999 -9.99999999E+999999999 -> 0 |
|
119 ctmx093 comparetotmag -9.99999999E+999999999 -9.99999999E+999999999 -> 0 |
|
120 |
|
121 -- some differing length/exponent cases |
|
122 -- in this first group, compare would compare all equal |
|
123 ctmx100 comparetotmag 7.0 7.0 -> 0 |
|
124 ctmx101 comparetotmag 7.0 7 -> -1 |
|
125 ctmx102 comparetotmag 7 7.0 -> 1 |
|
126 ctmx103 comparetotmag 7E+0 7.0 -> 1 |
|
127 ctmx104 comparetotmag 70E-1 7.0 -> 0 |
|
128 ctmx105 comparetotmag 0.7E+1 7 -> 0 |
|
129 ctmx106 comparetotmag 70E-1 7 -> -1 |
|
130 ctmx107 comparetotmag 7.0 7E+0 -> -1 |
|
131 ctmx108 comparetotmag 7.0 70E-1 -> 0 |
|
132 ctmx109 comparetotmag 7 0.7E+1 -> 0 |
|
133 ctmx110 comparetotmag 7 70E-1 -> 1 |
|
134 |
|
135 ctmx120 comparetotmag 8.0 7.0 -> 1 |
|
136 ctmx121 comparetotmag 8.0 7 -> 1 |
|
137 ctmx122 comparetotmag 8 7.0 -> 1 |
|
138 ctmx123 comparetotmag 8E+0 7.0 -> 1 |
|
139 ctmx124 comparetotmag 80E-1 7.0 -> 1 |
|
140 ctmx125 comparetotmag 0.8E+1 7 -> 1 |
|
141 ctmx126 comparetotmag 80E-1 7 -> 1 |
|
142 ctmx127 comparetotmag 8.0 7E+0 -> 1 |
|
143 ctmx128 comparetotmag 8.0 70E-1 -> 1 |
|
144 ctmx129 comparetotmag 8 0.7E+1 -> 1 |
|
145 ctmx130 comparetotmag 8 70E-1 -> 1 |
|
146 |
|
147 ctmx140 comparetotmag 8.0 9.0 -> -1 |
|
148 ctmx141 comparetotmag 8.0 9 -> -1 |
|
149 ctmx142 comparetotmag 8 9.0 -> -1 |
|
150 ctmx143 comparetotmag 8E+0 9.0 -> -1 |
|
151 ctmx144 comparetotmag 80E-1 9.0 -> -1 |
|
152 ctmx145 comparetotmag 0.8E+1 9 -> -1 |
|
153 ctmx146 comparetotmag 80E-1 9 -> -1 |
|
154 ctmx147 comparetotmag 8.0 9E+0 -> -1 |
|
155 ctmx148 comparetotmag 8.0 90E-1 -> -1 |
|
156 ctmx149 comparetotmag 8 0.9E+1 -> -1 |
|
157 ctmx150 comparetotmag 8 90E-1 -> -1 |
|
158 |
|
159 -- and again, with sign changes -+ .. |
|
160 ctmx200 comparetotmag -7.0 7.0 -> 0 |
|
161 ctmx201 comparetotmag -7.0 7 -> -1 |
|
162 ctmx202 comparetotmag -7 7.0 -> 1 |
|
163 ctmx203 comparetotmag -7E+0 7.0 -> 1 |
|
164 ctmx204 comparetotmag -70E-1 7.0 -> 0 |
|
165 ctmx205 comparetotmag -0.7E+1 7 -> 0 |
|
166 ctmx206 comparetotmag -70E-1 7 -> -1 |
|
167 ctmx207 comparetotmag -7.0 7E+0 -> -1 |
|
168 ctmx208 comparetotmag -7.0 70E-1 -> 0 |
|
169 ctmx209 comparetotmag -7 0.7E+1 -> 0 |
|
170 ctmx210 comparetotmag -7 70E-1 -> 1 |
|
171 |
|
172 ctmx220 comparetotmag -8.0 7.0 -> 1 |
|
173 ctmx221 comparetotmag -8.0 7 -> 1 |
|
174 ctmx222 comparetotmag -8 7.0 -> 1 |
|
175 ctmx223 comparetotmag -8E+0 7.0 -> 1 |
|
176 ctmx224 comparetotmag -80E-1 7.0 -> 1 |
|
177 ctmx225 comparetotmag -0.8E+1 7 -> 1 |
|
178 ctmx226 comparetotmag -80E-1 7 -> 1 |
|
179 ctmx227 comparetotmag -8.0 7E+0 -> 1 |
|
180 ctmx228 comparetotmag -8.0 70E-1 -> 1 |
|
181 ctmx229 comparetotmag -8 0.7E+1 -> 1 |
|
182 ctmx230 comparetotmag -8 70E-1 -> 1 |
|
183 |
|
184 ctmx240 comparetotmag -8.0 9.0 -> -1 |
|
185 ctmx241 comparetotmag -8.0 9 -> -1 |
|
186 ctmx242 comparetotmag -8 9.0 -> -1 |
|
187 ctmx243 comparetotmag -8E+0 9.0 -> -1 |
|
188 ctmx244 comparetotmag -80E-1 9.0 -> -1 |
|
189 ctmx245 comparetotmag -0.8E+1 9 -> -1 |
|
190 ctmx246 comparetotmag -80E-1 9 -> -1 |
|
191 ctmx247 comparetotmag -8.0 9E+0 -> -1 |
|
192 ctmx248 comparetotmag -8.0 90E-1 -> -1 |
|
193 ctmx249 comparetotmag -8 0.9E+1 -> -1 |
|
194 ctmx250 comparetotmag -8 90E-1 -> -1 |
|
195 |
|
196 -- and again, with sign changes +- .. |
|
197 ctmx300 comparetotmag 7.0 -7.0 -> 0 |
|
198 ctmx301 comparetotmag 7.0 -7 -> -1 |
|
199 ctmx302 comparetotmag 7 -7.0 -> 1 |
|
200 ctmx303 comparetotmag 7E+0 -7.0 -> 1 |
|
201 ctmx304 comparetotmag 70E-1 -7.0 -> 0 |
|
202 ctmx305 comparetotmag .7E+1 -7 -> 0 |
|
203 ctmx306 comparetotmag 70E-1 -7 -> -1 |
|
204 ctmx307 comparetotmag 7.0 -7E+0 -> -1 |
|
205 ctmx308 comparetotmag 7.0 -70E-1 -> 0 |
|
206 ctmx309 comparetotmag 7 -.7E+1 -> 0 |
|
207 ctmx310 comparetotmag 7 -70E-1 -> 1 |
|
208 |
|
209 ctmx320 comparetotmag 8.0 -7.0 -> 1 |
|
210 ctmx321 comparetotmag 8.0 -7 -> 1 |
|
211 ctmx322 comparetotmag 8 -7.0 -> 1 |
|
212 ctmx323 comparetotmag 8E+0 -7.0 -> 1 |
|
213 ctmx324 comparetotmag 80E-1 -7.0 -> 1 |
|
214 ctmx325 comparetotmag .8E+1 -7 -> 1 |
|
215 ctmx326 comparetotmag 80E-1 -7 -> 1 |
|
216 ctmx327 comparetotmag 8.0 -7E+0 -> 1 |
|
217 ctmx328 comparetotmag 8.0 -70E-1 -> 1 |
|
218 ctmx329 comparetotmag 8 -.7E+1 -> 1 |
|
219 ctmx330 comparetotmag 8 -70E-1 -> 1 |
|
220 |
|
221 ctmx340 comparetotmag 8.0 -9.0 -> -1 |
|
222 ctmx341 comparetotmag 8.0 -9 -> -1 |
|
223 ctmx342 comparetotmag 8 -9.0 -> -1 |
|
224 ctmx343 comparetotmag 8E+0 -9.0 -> -1 |
|
225 ctmx344 comparetotmag 80E-1 -9.0 -> -1 |
|
226 ctmx345 comparetotmag .8E+1 -9 -> -1 |
|
227 ctmx346 comparetotmag 80E-1 -9 -> -1 |
|
228 ctmx347 comparetotmag 8.0 -9E+0 -> -1 |
|
229 ctmx348 comparetotmag 8.0 -90E-1 -> -1 |
|
230 ctmx349 comparetotmag 8 -.9E+1 -> -1 |
|
231 ctmx350 comparetotmag 8 -90E-1 -> -1 |
|
232 |
|
233 -- and again, with sign changes -- .. |
|
234 ctmx400 comparetotmag -7.0 -7.0 -> 0 |
|
235 ctmx401 comparetotmag -7.0 -7 -> -1 |
|
236 ctmx402 comparetotmag -7 -7.0 -> 1 |
|
237 ctmx403 comparetotmag -7E+0 -7.0 -> 1 |
|
238 ctmx404 comparetotmag -70E-1 -7.0 -> 0 |
|
239 ctmx405 comparetotmag -.7E+1 -7 -> 0 |
|
240 ctmx406 comparetotmag -70E-1 -7 -> -1 |
|
241 ctmx407 comparetotmag -7.0 -7E+0 -> -1 |
|
242 ctmx408 comparetotmag -7.0 -70E-1 -> 0 |
|
243 ctmx409 comparetotmag -7 -.7E+1 -> 0 |
|
244 ctmx410 comparetotmag -7 -70E-1 -> 1 |
|
245 |
|
246 ctmx420 comparetotmag -8.0 -7.0 -> 1 |
|
247 ctmx421 comparetotmag -8.0 -7 -> 1 |
|
248 ctmx422 comparetotmag -8 -7.0 -> 1 |
|
249 ctmx423 comparetotmag -8E+0 -7.0 -> 1 |
|
250 ctmx424 comparetotmag -80E-1 -7.0 -> 1 |
|
251 ctmx425 comparetotmag -.8E+1 -7 -> 1 |
|
252 ctmx426 comparetotmag -80E-1 -7 -> 1 |
|
253 ctmx427 comparetotmag -8.0 -7E+0 -> 1 |
|
254 ctmx428 comparetotmag -8.0 -70E-1 -> 1 |
|
255 ctmx429 comparetotmag -8 -.7E+1 -> 1 |
|
256 ctmx430 comparetotmag -8 -70E-1 -> 1 |
|
257 |
|
258 ctmx440 comparetotmag -8.0 -9.0 -> -1 |
|
259 ctmx441 comparetotmag -8.0 -9 -> -1 |
|
260 ctmx442 comparetotmag -8 -9.0 -> -1 |
|
261 ctmx443 comparetotmag -8E+0 -9.0 -> -1 |
|
262 ctmx444 comparetotmag -80E-1 -9.0 -> -1 |
|
263 ctmx445 comparetotmag -.8E+1 -9 -> -1 |
|
264 ctmx446 comparetotmag -80E-1 -9 -> -1 |
|
265 ctmx447 comparetotmag -8.0 -9E+0 -> -1 |
|
266 ctmx448 comparetotmag -8.0 -90E-1 -> -1 |
|
267 ctmx449 comparetotmag -8 -.9E+1 -> -1 |
|
268 ctmx450 comparetotmag -8 -90E-1 -> -1 |
|
269 |
|
270 |
|
271 -- testcases that subtract to lots of zeros at boundaries [pgr] |
|
272 precision: 40 |
|
273 ctmx470 comparetotmag 123.4560000000000000E789 123.456E789 -> -1 |
|
274 ctmx471 comparetotmag 123.456000000000000E-89 123.456E-89 -> -1 |
|
275 ctmx472 comparetotmag 123.45600000000000E789 123.456E789 -> -1 |
|
276 ctmx473 comparetotmag 123.4560000000000E-89 123.456E-89 -> -1 |
|
277 ctmx474 comparetotmag 123.456000000000E789 123.456E789 -> -1 |
|
278 ctmx475 comparetotmag 123.45600000000E-89 123.456E-89 -> -1 |
|
279 ctmx476 comparetotmag 123.4560000000E789 123.456E789 -> -1 |
|
280 ctmx477 comparetotmag 123.456000000E-89 123.456E-89 -> -1 |
|
281 ctmx478 comparetotmag 123.45600000E789 123.456E789 -> -1 |
|
282 ctmx479 comparetotmag 123.4560000E-89 123.456E-89 -> -1 |
|
283 ctmx480 comparetotmag 123.456000E789 123.456E789 -> -1 |
|
284 ctmx481 comparetotmag 123.45600E-89 123.456E-89 -> -1 |
|
285 ctmx482 comparetotmag 123.4560E789 123.456E789 -> -1 |
|
286 ctmx483 comparetotmag 123.456E-89 123.456E-89 -> 0 |
|
287 ctmx484 comparetotmag 123.456E-89 123.4560000000000000E-89 -> 1 |
|
288 ctmx485 comparetotmag 123.456E789 123.456000000000000E789 -> 1 |
|
289 ctmx486 comparetotmag 123.456E-89 123.45600000000000E-89 -> 1 |
|
290 ctmx487 comparetotmag 123.456E789 123.4560000000000E789 -> 1 |
|
291 ctmx488 comparetotmag 123.456E-89 123.456000000000E-89 -> 1 |
|
292 ctmx489 comparetotmag 123.456E789 123.45600000000E789 -> 1 |
|
293 ctmx490 comparetotmag 123.456E-89 123.4560000000E-89 -> 1 |
|
294 ctmx491 comparetotmag 123.456E789 123.456000000E789 -> 1 |
|
295 ctmx492 comparetotmag 123.456E-89 123.45600000E-89 -> 1 |
|
296 ctmx493 comparetotmag 123.456E789 123.4560000E789 -> 1 |
|
297 ctmx494 comparetotmag 123.456E-89 123.456000E-89 -> 1 |
|
298 ctmx495 comparetotmag 123.456E789 123.45600E789 -> 1 |
|
299 ctmx496 comparetotmag 123.456E-89 123.4560E-89 -> 1 |
|
300 ctmx497 comparetotmag 123.456E789 123.456E789 -> 0 |
|
301 |
|
302 -- wide-ranging, around precision; signs equal |
|
303 precision: 9 |
|
304 ctmx500 comparetotmag 1 1E-15 -> 1 |
|
305 ctmx501 comparetotmag 1 1E-14 -> 1 |
|
306 ctmx502 comparetotmag 1 1E-13 -> 1 |
|
307 ctmx503 comparetotmag 1 1E-12 -> 1 |
|
308 ctmx504 comparetotmag 1 1E-11 -> 1 |
|
309 ctmx505 comparetotmag 1 1E-10 -> 1 |
|
310 ctmx506 comparetotmag 1 1E-9 -> 1 |
|
311 ctmx507 comparetotmag 1 1E-8 -> 1 |
|
312 ctmx508 comparetotmag 1 1E-7 -> 1 |
|
313 ctmx509 comparetotmag 1 1E-6 -> 1 |
|
314 ctmx510 comparetotmag 1 1E-5 -> 1 |
|
315 ctmx511 comparetotmag 1 1E-4 -> 1 |
|
316 ctmx512 comparetotmag 1 1E-3 -> 1 |
|
317 ctmx513 comparetotmag 1 1E-2 -> 1 |
|
318 ctmx514 comparetotmag 1 1E-1 -> 1 |
|
319 ctmx515 comparetotmag 1 1E-0 -> 0 |
|
320 ctmx516 comparetotmag 1 1E+1 -> -1 |
|
321 ctmx517 comparetotmag 1 1E+2 -> -1 |
|
322 ctmx518 comparetotmag 1 1E+3 -> -1 |
|
323 ctmx519 comparetotmag 1 1E+4 -> -1 |
|
324 ctmx521 comparetotmag 1 1E+5 -> -1 |
|
325 ctmx522 comparetotmag 1 1E+6 -> -1 |
|
326 ctmx523 comparetotmag 1 1E+7 -> -1 |
|
327 ctmx524 comparetotmag 1 1E+8 -> -1 |
|
328 ctmx525 comparetotmag 1 1E+9 -> -1 |
|
329 ctmx526 comparetotmag 1 1E+10 -> -1 |
|
330 ctmx527 comparetotmag 1 1E+11 -> -1 |
|
331 ctmx528 comparetotmag 1 1E+12 -> -1 |
|
332 ctmx529 comparetotmag 1 1E+13 -> -1 |
|
333 ctmx530 comparetotmag 1 1E+14 -> -1 |
|
334 ctmx531 comparetotmag 1 1E+15 -> -1 |
|
335 -- LR swap |
|
336 ctmx540 comparetotmag 1E-15 1 -> -1 |
|
337 ctmx541 comparetotmag 1E-14 1 -> -1 |
|
338 ctmx542 comparetotmag 1E-13 1 -> -1 |
|
339 ctmx543 comparetotmag 1E-12 1 -> -1 |
|
340 ctmx544 comparetotmag 1E-11 1 -> -1 |
|
341 ctmx545 comparetotmag 1E-10 1 -> -1 |
|
342 ctmx546 comparetotmag 1E-9 1 -> -1 |
|
343 ctmx547 comparetotmag 1E-8 1 -> -1 |
|
344 ctmx548 comparetotmag 1E-7 1 -> -1 |
|
345 ctmx549 comparetotmag 1E-6 1 -> -1 |
|
346 ctmx550 comparetotmag 1E-5 1 -> -1 |
|
347 ctmx551 comparetotmag 1E-4 1 -> -1 |
|
348 ctmx552 comparetotmag 1E-3 1 -> -1 |
|
349 ctmx553 comparetotmag 1E-2 1 -> -1 |
|
350 ctmx554 comparetotmag 1E-1 1 -> -1 |
|
351 ctmx555 comparetotmag 1E-0 1 -> 0 |
|
352 ctmx556 comparetotmag 1E+1 1 -> 1 |
|
353 ctmx557 comparetotmag 1E+2 1 -> 1 |
|
354 ctmx558 comparetotmag 1E+3 1 -> 1 |
|
355 ctmx559 comparetotmag 1E+4 1 -> 1 |
|
356 ctmx561 comparetotmag 1E+5 1 -> 1 |
|
357 ctmx562 comparetotmag 1E+6 1 -> 1 |
|
358 ctmx563 comparetotmag 1E+7 1 -> 1 |
|
359 ctmx564 comparetotmag 1E+8 1 -> 1 |
|
360 ctmx565 comparetotmag 1E+9 1 -> 1 |
|
361 ctmx566 comparetotmag 1E+10 1 -> 1 |
|
362 ctmx567 comparetotmag 1E+11 1 -> 1 |
|
363 ctmx568 comparetotmag 1E+12 1 -> 1 |
|
364 ctmx569 comparetotmag 1E+13 1 -> 1 |
|
365 ctmx570 comparetotmag 1E+14 1 -> 1 |
|
366 ctmx571 comparetotmag 1E+15 1 -> 1 |
|
367 -- similar with an useful coefficient, one side only |
|
368 ctmx580 comparetotmag 0.000000987654321 1E-15 -> 1 |
|
369 ctmx581 comparetotmag 0.000000987654321 1E-14 -> 1 |
|
370 ctmx582 comparetotmag 0.000000987654321 1E-13 -> 1 |
|
371 ctmx583 comparetotmag 0.000000987654321 1E-12 -> 1 |
|
372 ctmx584 comparetotmag 0.000000987654321 1E-11 -> 1 |
|
373 ctmx585 comparetotmag 0.000000987654321 1E-10 -> 1 |
|
374 ctmx586 comparetotmag 0.000000987654321 1E-9 -> 1 |
|
375 ctmx587 comparetotmag 0.000000987654321 1E-8 -> 1 |
|
376 ctmx588 comparetotmag 0.000000987654321 1E-7 -> 1 |
|
377 ctmx589 comparetotmag 0.000000987654321 1E-6 -> -1 |
|
378 ctmx590 comparetotmag 0.000000987654321 1E-5 -> -1 |
|
379 ctmx591 comparetotmag 0.000000987654321 1E-4 -> -1 |
|
380 ctmx592 comparetotmag 0.000000987654321 1E-3 -> -1 |
|
381 ctmx593 comparetotmag 0.000000987654321 1E-2 -> -1 |
|
382 ctmx594 comparetotmag 0.000000987654321 1E-1 -> -1 |
|
383 ctmx595 comparetotmag 0.000000987654321 1E-0 -> -1 |
|
384 ctmx596 comparetotmag 0.000000987654321 1E+1 -> -1 |
|
385 ctmx597 comparetotmag 0.000000987654321 1E+2 -> -1 |
|
386 ctmx598 comparetotmag 0.000000987654321 1E+3 -> -1 |
|
387 ctmx599 comparetotmag 0.000000987654321 1E+4 -> -1 |
|
388 |
|
389 -- check some unit-y traps |
|
390 precision: 20 |
|
391 ctmx600 comparetotmag 12 12.2345 -> -1 |
|
392 ctmx601 comparetotmag 12.0 12.2345 -> -1 |
|
393 ctmx602 comparetotmag 12.00 12.2345 -> -1 |
|
394 ctmx603 comparetotmag 12.000 12.2345 -> -1 |
|
395 ctmx604 comparetotmag 12.0000 12.2345 -> -1 |
|
396 ctmx605 comparetotmag 12.00000 12.2345 -> -1 |
|
397 ctmx606 comparetotmag 12.000000 12.2345 -> -1 |
|
398 ctmx607 comparetotmag 12.0000000 12.2345 -> -1 |
|
399 ctmx608 comparetotmag 12.00000000 12.2345 -> -1 |
|
400 ctmx609 comparetotmag 12.000000000 12.2345 -> -1 |
|
401 ctmx610 comparetotmag 12.1234 12 -> 1 |
|
402 ctmx611 comparetotmag 12.1234 12.0 -> 1 |
|
403 ctmx612 comparetotmag 12.1234 12.00 -> 1 |
|
404 ctmx613 comparetotmag 12.1234 12.000 -> 1 |
|
405 ctmx614 comparetotmag 12.1234 12.0000 -> 1 |
|
406 ctmx615 comparetotmag 12.1234 12.00000 -> 1 |
|
407 ctmx616 comparetotmag 12.1234 12.000000 -> 1 |
|
408 ctmx617 comparetotmag 12.1234 12.0000000 -> 1 |
|
409 ctmx618 comparetotmag 12.1234 12.00000000 -> 1 |
|
410 ctmx619 comparetotmag 12.1234 12.000000000 -> 1 |
|
411 ctmx620 comparetotmag -12 -12.2345 -> -1 |
|
412 ctmx621 comparetotmag -12.0 -12.2345 -> -1 |
|
413 ctmx622 comparetotmag -12.00 -12.2345 -> -1 |
|
414 ctmx623 comparetotmag -12.000 -12.2345 -> -1 |
|
415 ctmx624 comparetotmag -12.0000 -12.2345 -> -1 |
|
416 ctmx625 comparetotmag -12.00000 -12.2345 -> -1 |
|
417 ctmx626 comparetotmag -12.000000 -12.2345 -> -1 |
|
418 ctmx627 comparetotmag -12.0000000 -12.2345 -> -1 |
|
419 ctmx628 comparetotmag -12.00000000 -12.2345 -> -1 |
|
420 ctmx629 comparetotmag -12.000000000 -12.2345 -> -1 |
|
421 ctmx630 comparetotmag -12.1234 -12 -> 1 |
|
422 ctmx631 comparetotmag -12.1234 -12.0 -> 1 |
|
423 ctmx632 comparetotmag -12.1234 -12.00 -> 1 |
|
424 ctmx633 comparetotmag -12.1234 -12.000 -> 1 |
|
425 ctmx634 comparetotmag -12.1234 -12.0000 -> 1 |
|
426 ctmx635 comparetotmag -12.1234 -12.00000 -> 1 |
|
427 ctmx636 comparetotmag -12.1234 -12.000000 -> 1 |
|
428 ctmx637 comparetotmag -12.1234 -12.0000000 -> 1 |
|
429 ctmx638 comparetotmag -12.1234 -12.00000000 -> 1 |
|
430 ctmx639 comparetotmag -12.1234 -12.000000000 -> 1 |
|
431 precision: 9 |
|
432 |
|
433 -- extended zeros |
|
434 ctmx640 comparetotmag 0 0 -> 0 |
|
435 ctmx641 comparetotmag 0 -0 -> 0 |
|
436 ctmx642 comparetotmag 0 -0.0 -> 1 |
|
437 ctmx643 comparetotmag 0 0.0 -> 1 |
|
438 ctmx644 comparetotmag -0 0 -> 0 |
|
439 ctmx645 comparetotmag -0 -0 -> 0 |
|
440 ctmx646 comparetotmag -0 -0.0 -> 1 |
|
441 ctmx647 comparetotmag -0 0.0 -> 1 |
|
442 ctmx648 comparetotmag 0.0 0 -> -1 |
|
443 ctmx649 comparetotmag 0.0 -0 -> -1 |
|
444 ctmx650 comparetotmag 0.0 -0.0 -> 0 |
|
445 ctmx651 comparetotmag 0.0 0.0 -> 0 |
|
446 ctmx652 comparetotmag -0.0 0 -> -1 |
|
447 ctmx653 comparetotmag -0.0 -0 -> -1 |
|
448 ctmx654 comparetotmag -0.0 -0.0 -> 0 |
|
449 ctmx655 comparetotmag -0.0 0.0 -> 0 |
|
450 |
|
451 ctmx656 comparetotmag -0E1 0.0 -> 1 |
|
452 ctmx657 comparetotmag -0E2 0.0 -> 1 |
|
453 ctmx658 comparetotmag 0E1 0.0 -> 1 |
|
454 ctmx659 comparetotmag 0E2 0.0 -> 1 |
|
455 ctmx660 comparetotmag -0E1 0 -> 1 |
|
456 ctmx661 comparetotmag -0E2 0 -> 1 |
|
457 ctmx662 comparetotmag 0E1 0 -> 1 |
|
458 ctmx663 comparetotmag 0E2 0 -> 1 |
|
459 ctmx664 comparetotmag -0E1 -0E1 -> 0 |
|
460 ctmx665 comparetotmag -0E2 -0E1 -> 1 |
|
461 ctmx666 comparetotmag 0E1 -0E1 -> 0 |
|
462 ctmx667 comparetotmag 0E2 -0E1 -> 1 |
|
463 ctmx668 comparetotmag -0E1 -0E2 -> -1 |
|
464 ctmx669 comparetotmag -0E2 -0E2 -> 0 |
|
465 ctmx670 comparetotmag 0E1 -0E2 -> -1 |
|
466 ctmx671 comparetotmag 0E2 -0E2 -> 0 |
|
467 ctmx672 comparetotmag -0E1 0E1 -> 0 |
|
468 ctmx673 comparetotmag -0E2 0E1 -> 1 |
|
469 ctmx674 comparetotmag 0E1 0E1 -> 0 |
|
470 ctmx675 comparetotmag 0E2 0E1 -> 1 |
|
471 ctmx676 comparetotmag -0E1 0E2 -> -1 |
|
472 ctmx677 comparetotmag -0E2 0E2 -> 0 |
|
473 ctmx678 comparetotmag 0E1 0E2 -> -1 |
|
474 ctmx679 comparetotmag 0E2 0E2 -> 0 |
|
475 |
|
476 -- trailing zeros; unit-y |
|
477 precision: 20 |
|
478 ctmx680 comparetotmag 12 12 -> 0 |
|
479 ctmx681 comparetotmag 12 12.0 -> 1 |
|
480 ctmx682 comparetotmag 12 12.00 -> 1 |
|
481 ctmx683 comparetotmag 12 12.000 -> 1 |
|
482 ctmx684 comparetotmag 12 12.0000 -> 1 |
|
483 ctmx685 comparetotmag 12 12.00000 -> 1 |
|
484 ctmx686 comparetotmag 12 12.000000 -> 1 |
|
485 ctmx687 comparetotmag 12 12.0000000 -> 1 |
|
486 ctmx688 comparetotmag 12 12.00000000 -> 1 |
|
487 ctmx689 comparetotmag 12 12.000000000 -> 1 |
|
488 ctmx690 comparetotmag 12 12 -> 0 |
|
489 ctmx691 comparetotmag 12.0 12 -> -1 |
|
490 ctmx692 comparetotmag 12.00 12 -> -1 |
|
491 ctmx693 comparetotmag 12.000 12 -> -1 |
|
492 ctmx694 comparetotmag 12.0000 12 -> -1 |
|
493 ctmx695 comparetotmag 12.00000 12 -> -1 |
|
494 ctmx696 comparetotmag 12.000000 12 -> -1 |
|
495 ctmx697 comparetotmag 12.0000000 12 -> -1 |
|
496 ctmx698 comparetotmag 12.00000000 12 -> -1 |
|
497 ctmx699 comparetotmag 12.000000000 12 -> -1 |
|
498 |
|
499 -- long operand checks |
|
500 maxexponent: 999 |
|
501 minexponent: -999 |
|
502 precision: 9 |
|
503 ctmx701 comparetotmag 12345678000 1 -> 1 |
|
504 ctmx702 comparetotmag 1 12345678000 -> -1 |
|
505 ctmx703 comparetotmag 1234567800 1 -> 1 |
|
506 ctmx704 comparetotmag 1 1234567800 -> -1 |
|
507 ctmx705 comparetotmag 1234567890 1 -> 1 |
|
508 ctmx706 comparetotmag 1 1234567890 -> -1 |
|
509 ctmx707 comparetotmag 1234567891 1 -> 1 |
|
510 ctmx708 comparetotmag 1 1234567891 -> -1 |
|
511 ctmx709 comparetotmag 12345678901 1 -> 1 |
|
512 ctmx710 comparetotmag 1 12345678901 -> -1 |
|
513 ctmx711 comparetotmag 1234567896 1 -> 1 |
|
514 ctmx712 comparetotmag 1 1234567896 -> -1 |
|
515 ctmx713 comparetotmag -1234567891 1 -> 1 |
|
516 ctmx714 comparetotmag 1 -1234567891 -> -1 |
|
517 ctmx715 comparetotmag -12345678901 1 -> 1 |
|
518 ctmx716 comparetotmag 1 -12345678901 -> -1 |
|
519 ctmx717 comparetotmag -1234567896 1 -> 1 |
|
520 ctmx718 comparetotmag 1 -1234567896 -> -1 |
|
521 |
|
522 precision: 15 |
|
523 -- same with plenty of precision |
|
524 ctmx721 comparetotmag 12345678000 1 -> 1 |
|
525 ctmx722 comparetotmag 1 12345678000 -> -1 |
|
526 ctmx723 comparetotmag 1234567800 1 -> 1 |
|
527 ctmx724 comparetotmag 1 1234567800 -> -1 |
|
528 ctmx725 comparetotmag 1234567890 1 -> 1 |
|
529 ctmx726 comparetotmag 1 1234567890 -> -1 |
|
530 ctmx727 comparetotmag 1234567891 1 -> 1 |
|
531 ctmx728 comparetotmag 1 1234567891 -> -1 |
|
532 ctmx729 comparetotmag 12345678901 1 -> 1 |
|
533 ctmx730 comparetotmag 1 12345678901 -> -1 |
|
534 ctmx731 comparetotmag 1234567896 1 -> 1 |
|
535 ctmx732 comparetotmag 1 1234567896 -> -1 |
|
536 |
|
537 -- residue cases |
|
538 precision: 5 |
|
539 ctmx740 comparetotmag 1 0.9999999 -> 1 |
|
540 ctmx741 comparetotmag 1 0.999999 -> 1 |
|
541 ctmx742 comparetotmag 1 0.99999 -> 1 |
|
542 ctmx743 comparetotmag 1 1.0000 -> 1 |
|
543 ctmx744 comparetotmag 1 1.00001 -> -1 |
|
544 ctmx745 comparetotmag 1 1.000001 -> -1 |
|
545 ctmx746 comparetotmag 1 1.0000001 -> -1 |
|
546 ctmx750 comparetotmag 0.9999999 1 -> -1 |
|
547 ctmx751 comparetotmag 0.999999 1 -> -1 |
|
548 ctmx752 comparetotmag 0.99999 1 -> -1 |
|
549 ctmx753 comparetotmag 1.0000 1 -> -1 |
|
550 ctmx754 comparetotmag 1.00001 1 -> 1 |
|
551 ctmx755 comparetotmag 1.000001 1 -> 1 |
|
552 ctmx756 comparetotmag 1.0000001 1 -> 1 |
|
553 |
|
554 -- a selection of longies |
|
555 ctmx760 comparetotmag -36852134.84194296250843579428931 -5830629.8347085025808756560357940 -> 1 |
|
556 ctmx761 comparetotmag -36852134.84194296250843579428931 -36852134.84194296250843579428931 -> 0 |
|
557 ctmx762 comparetotmag -36852134.94194296250843579428931 -36852134.84194296250843579428931 -> 1 |
|
558 ctmx763 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
559 -- precisions above or below the difference should have no effect |
|
560 precision: 11 |
|
561 ctmx764 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
562 precision: 10 |
|
563 ctmx765 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
564 precision: 9 |
|
565 ctmx766 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
566 precision: 8 |
|
567 ctmx767 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
568 precision: 7 |
|
569 ctmx768 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
570 precision: 6 |
|
571 ctmx769 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
572 precision: 5 |
|
573 ctmx770 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
574 precision: 4 |
|
575 ctmx771 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
576 precision: 3 |
|
577 ctmx772 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
578 precision: 2 |
|
579 ctmx773 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
580 precision: 1 |
|
581 ctmx774 comparetotmag -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> -1 |
|
582 |
|
583 -- Specials |
|
584 precision: 9 |
|
585 ctmx780 comparetotmag Inf -Inf -> 0 |
|
586 ctmx781 comparetotmag Inf -1000 -> 1 |
|
587 ctmx782 comparetotmag Inf -1 -> 1 |
|
588 ctmx783 comparetotmag Inf -0 -> 1 |
|
589 ctmx784 comparetotmag Inf 0 -> 1 |
|
590 ctmx785 comparetotmag Inf 1 -> 1 |
|
591 ctmx786 comparetotmag Inf 1000 -> 1 |
|
592 ctmx787 comparetotmag Inf Inf -> 0 |
|
593 ctmx788 comparetotmag -1000 Inf -> -1 |
|
594 ctmx789 comparetotmag -Inf Inf -> 0 |
|
595 ctmx790 comparetotmag -1 Inf -> -1 |
|
596 ctmx791 comparetotmag -0 Inf -> -1 |
|
597 ctmx792 comparetotmag 0 Inf -> -1 |
|
598 ctmx793 comparetotmag 1 Inf -> -1 |
|
599 ctmx794 comparetotmag 1000 Inf -> -1 |
|
600 ctmx795 comparetotmag Inf Inf -> 0 |
|
601 |
|
602 ctmx800 comparetotmag -Inf -Inf -> 0 |
|
603 ctmx801 comparetotmag -Inf -1000 -> 1 |
|
604 ctmx802 comparetotmag -Inf -1 -> 1 |
|
605 ctmx803 comparetotmag -Inf -0 -> 1 |
|
606 ctmx804 comparetotmag -Inf 0 -> 1 |
|
607 ctmx805 comparetotmag -Inf 1 -> 1 |
|
608 ctmx806 comparetotmag -Inf 1000 -> 1 |
|
609 ctmx807 comparetotmag -Inf Inf -> 0 |
|
610 ctmx808 comparetotmag -Inf -Inf -> 0 |
|
611 ctmx809 comparetotmag -1000 -Inf -> -1 |
|
612 ctmx810 comparetotmag -1 -Inf -> -1 |
|
613 ctmx811 comparetotmag -0 -Inf -> -1 |
|
614 ctmx812 comparetotmag 0 -Inf -> -1 |
|
615 ctmx813 comparetotmag 1 -Inf -> -1 |
|
616 ctmx814 comparetotmag 1000 -Inf -> -1 |
|
617 ctmx815 comparetotmag Inf -Inf -> 0 |
|
618 |
|
619 ctmx821 comparetotmag NaN -Inf -> 1 |
|
620 ctmx822 comparetotmag NaN -1000 -> 1 |
|
621 ctmx823 comparetotmag NaN -1 -> 1 |
|
622 ctmx824 comparetotmag NaN -0 -> 1 |
|
623 ctmx825 comparetotmag NaN 0 -> 1 |
|
624 ctmx826 comparetotmag NaN 1 -> 1 |
|
625 ctmx827 comparetotmag NaN 1000 -> 1 |
|
626 ctmx828 comparetotmag NaN Inf -> 1 |
|
627 ctmx829 comparetotmag NaN NaN -> 0 |
|
628 ctmx830 comparetotmag -Inf NaN -> -1 |
|
629 ctmx831 comparetotmag -1000 NaN -> -1 |
|
630 ctmx832 comparetotmag -1 NaN -> -1 |
|
631 ctmx833 comparetotmag -0 NaN -> -1 |
|
632 ctmx834 comparetotmag 0 NaN -> -1 |
|
633 ctmx835 comparetotmag 1 NaN -> -1 |
|
634 ctmx836 comparetotmag 1000 NaN -> -1 |
|
635 ctmx837 comparetotmag Inf NaN -> -1 |
|
636 ctmx838 comparetotmag -NaN -NaN -> 0 |
|
637 ctmx839 comparetotmag +NaN -NaN -> 0 |
|
638 ctmx840 comparetotmag -NaN +NaN -> 0 |
|
639 |
|
640 ctmx841 comparetotmag sNaN -sNaN -> 0 |
|
641 ctmx842 comparetotmag sNaN -NaN -> -1 |
|
642 ctmx843 comparetotmag sNaN -Inf -> 1 |
|
643 ctmx844 comparetotmag sNaN -1000 -> 1 |
|
644 ctmx845 comparetotmag sNaN -1 -> 1 |
|
645 ctmx846 comparetotmag sNaN -0 -> 1 |
|
646 ctmx847 comparetotmag sNaN 0 -> 1 |
|
647 ctmx848 comparetotmag sNaN 1 -> 1 |
|
648 ctmx849 comparetotmag sNaN 1000 -> 1 |
|
649 ctmx850 comparetotmag sNaN NaN -> -1 |
|
650 ctmx851 comparetotmag sNaN sNaN -> 0 |
|
651 |
|
652 ctmx852 comparetotmag -sNaN sNaN -> 0 |
|
653 ctmx853 comparetotmag -NaN sNaN -> 1 |
|
654 ctmx854 comparetotmag -Inf sNaN -> -1 |
|
655 ctmx855 comparetotmag -1000 sNaN -> -1 |
|
656 ctmx856 comparetotmag -1 sNaN -> -1 |
|
657 ctmx857 comparetotmag -0 sNaN -> -1 |
|
658 ctmx858 comparetotmag 0 sNaN -> -1 |
|
659 ctmx859 comparetotmag 1 sNaN -> -1 |
|
660 ctmx860 comparetotmag 1000 sNaN -> -1 |
|
661 ctmx861 comparetotmag Inf sNaN -> -1 |
|
662 ctmx862 comparetotmag NaN sNaN -> 1 |
|
663 ctmx863 comparetotmag sNaN sNaN -> 0 |
|
664 |
|
665 ctmx871 comparetotmag -sNaN -sNaN -> 0 |
|
666 ctmx872 comparetotmag -sNaN -NaN -> -1 |
|
667 ctmx873 comparetotmag -sNaN -Inf -> 1 |
|
668 ctmx874 comparetotmag -sNaN -1000 -> 1 |
|
669 ctmx875 comparetotmag -sNaN -1 -> 1 |
|
670 ctmx876 comparetotmag -sNaN -0 -> 1 |
|
671 ctmx877 comparetotmag -sNaN 0 -> 1 |
|
672 ctmx878 comparetotmag -sNaN 1 -> 1 |
|
673 ctmx879 comparetotmag -sNaN 1000 -> 1 |
|
674 ctmx880 comparetotmag -sNaN NaN -> -1 |
|
675 ctmx881 comparetotmag -sNaN sNaN -> 0 |
|
676 |
|
677 ctmx882 comparetotmag -sNaN -sNaN -> 0 |
|
678 ctmx883 comparetotmag -NaN -sNaN -> 1 |
|
679 ctmx884 comparetotmag -Inf -sNaN -> -1 |
|
680 ctmx885 comparetotmag -1000 -sNaN -> -1 |
|
681 ctmx886 comparetotmag -1 -sNaN -> -1 |
|
682 ctmx887 comparetotmag -0 -sNaN -> -1 |
|
683 ctmx888 comparetotmag 0 -sNaN -> -1 |
|
684 ctmx889 comparetotmag 1 -sNaN -> -1 |
|
685 ctmx890 comparetotmag 1000 -sNaN -> -1 |
|
686 ctmx891 comparetotmag Inf -sNaN -> -1 |
|
687 ctmx892 comparetotmag NaN -sNaN -> 1 |
|
688 ctmx893 comparetotmag sNaN -sNaN -> 0 |
|
689 |
|
690 -- NaNs with payload |
|
691 ctmx960 comparetotmag NaN9 -Inf -> 1 |
|
692 ctmx961 comparetotmag NaN8 999 -> 1 |
|
693 ctmx962 comparetotmag NaN77 Inf -> 1 |
|
694 ctmx963 comparetotmag -NaN67 NaN5 -> 1 |
|
695 ctmx964 comparetotmag -Inf -NaN4 -> -1 |
|
696 ctmx965 comparetotmag -999 -NaN33 -> -1 |
|
697 ctmx966 comparetotmag Inf NaN2 -> -1 |
|
698 |
|
699 ctmx970 comparetotmag -NaN41 -NaN42 -> -1 |
|
700 ctmx971 comparetotmag +NaN41 -NaN42 -> -1 |
|
701 ctmx972 comparetotmag -NaN41 +NaN42 -> -1 |
|
702 ctmx973 comparetotmag +NaN41 +NaN42 -> -1 |
|
703 ctmx974 comparetotmag -NaN42 -NaN01 -> 1 |
|
704 ctmx975 comparetotmag +NaN42 -NaN01 -> 1 |
|
705 ctmx976 comparetotmag -NaN42 +NaN01 -> 1 |
|
706 ctmx977 comparetotmag +NaN42 +NaN01 -> 1 |
|
707 |
|
708 ctmx980 comparetotmag -sNaN771 -sNaN772 -> -1 |
|
709 ctmx981 comparetotmag +sNaN771 -sNaN772 -> -1 |
|
710 ctmx982 comparetotmag -sNaN771 +sNaN772 -> -1 |
|
711 ctmx983 comparetotmag +sNaN771 +sNaN772 -> -1 |
|
712 ctmx984 comparetotmag -sNaN772 -sNaN771 -> 1 |
|
713 ctmx985 comparetotmag +sNaN772 -sNaN771 -> 1 |
|
714 ctmx986 comparetotmag -sNaN772 +sNaN771 -> 1 |
|
715 ctmx987 comparetotmag +sNaN772 +sNaN771 -> 1 |
|
716 |
|
717 ctmx991 comparetotmag -sNaN99 -Inf -> 1 |
|
718 ctmx992 comparetotmag sNaN98 -11 -> 1 |
|
719 ctmx993 comparetotmag sNaN97 NaN -> -1 |
|
720 ctmx994 comparetotmag sNaN16 sNaN94 -> -1 |
|
721 ctmx995 comparetotmag NaN85 sNaN83 -> 1 |
|
722 ctmx996 comparetotmag -Inf sNaN92 -> -1 |
|
723 ctmx997 comparetotmag 088 sNaN81 -> -1 |
|
724 ctmx998 comparetotmag Inf sNaN90 -> -1 |
|
725 ctmx999 comparetotmag NaN -sNaN89 -> 1 |
|
726 |
|
727 -- overflow and underflow tests .. subnormal results now allowed |
|
728 maxExponent: 999999999 |
|
729 minexponent: -999999999 |
|
730 ctmx1080 comparetotmag +1.23456789012345E-0 9E+999999999 -> -1 |
|
731 ctmx1081 comparetotmag 9E+999999999 +1.23456789012345E-0 -> 1 |
|
732 ctmx1082 comparetotmag +0.100 9E-999999999 -> 1 |
|
733 ctmx1083 comparetotmag 9E-999999999 +0.100 -> -1 |
|
734 ctmx1085 comparetotmag -1.23456789012345E-0 9E+999999999 -> -1 |
|
735 ctmx1086 comparetotmag 9E+999999999 -1.23456789012345E-0 -> 1 |
|
736 ctmx1087 comparetotmag -0.100 9E-999999999 -> 1 |
|
737 ctmx1088 comparetotmag 9E-999999999 -0.100 -> -1 |
|
738 |
|
739 ctmx1089 comparetotmag 1e-599999999 1e-400000001 -> -1 |
|
740 ctmx1090 comparetotmag 1e-599999999 1e-400000000 -> -1 |
|
741 ctmx1091 comparetotmag 1e-600000000 1e-400000000 -> -1 |
|
742 ctmx1092 comparetotmag 9e-999999998 0.01 -> -1 |
|
743 ctmx1093 comparetotmag 9e-999999998 0.1 -> -1 |
|
744 ctmx1094 comparetotmag 0.01 9e-999999998 -> 1 |
|
745 ctmx1095 comparetotmag 1e599999999 1e400000001 -> 1 |
|
746 ctmx1096 comparetotmag 1e599999999 1e400000000 -> 1 |
|
747 ctmx1097 comparetotmag 1e600000000 1e400000000 -> 1 |
|
748 ctmx1098 comparetotmag 9e999999998 100 -> 1 |
|
749 ctmx1099 comparetotmag 9e999999998 10 -> 1 |
|
750 ctmx1100 comparetotmag 100 9e999999998 -> -1 |
|
751 -- signs |
|
752 ctmx1101 comparetotmag 1e+777777777 1e+411111111 -> 1 |
|
753 ctmx1102 comparetotmag 1e+777777777 -1e+411111111 -> 1 |
|
754 ctmx1103 comparetotmag -1e+777777777 1e+411111111 -> 1 |
|
755 ctmx1104 comparetotmag -1e+777777777 -1e+411111111 -> 1 |
|
756 ctmx1105 comparetotmag 1e-777777777 1e-411111111 -> -1 |
|
757 ctmx1106 comparetotmag 1e-777777777 -1e-411111111 -> -1 |
|
758 ctmx1107 comparetotmag -1e-777777777 1e-411111111 -> -1 |
|
759 ctmx1108 comparetotmag -1e-777777777 -1e-411111111 -> -1 |
|
760 |
|
761 -- spread zeros |
|
762 ctmx1110 comparetotmag 0E-383 0 -> -1 |
|
763 ctmx1111 comparetotmag 0E-383 -0 -> -1 |
|
764 ctmx1112 comparetotmag -0E-383 0 -> -1 |
|
765 ctmx1113 comparetotmag -0E-383 -0 -> -1 |
|
766 ctmx1114 comparetotmag 0E-383 0E+384 -> -1 |
|
767 ctmx1115 comparetotmag 0E-383 -0E+384 -> -1 |
|
768 ctmx1116 comparetotmag -0E-383 0E+384 -> -1 |
|
769 ctmx1117 comparetotmag -0E-383 -0E+384 -> -1 |
|
770 ctmx1118 comparetotmag 0 0E+384 -> -1 |
|
771 ctmx1119 comparetotmag 0 -0E+384 -> -1 |
|
772 ctmx1120 comparetotmag -0 0E+384 -> -1 |
|
773 ctmx1121 comparetotmag -0 -0E+384 -> -1 |
|
774 |
|
775 ctmx1130 comparetotmag 0E+384 0 -> 1 |
|
776 ctmx1131 comparetotmag 0E+384 -0 -> 1 |
|
777 ctmx1132 comparetotmag -0E+384 0 -> 1 |
|
778 ctmx1133 comparetotmag -0E+384 -0 -> 1 |
|
779 ctmx1134 comparetotmag 0E+384 0E-383 -> 1 |
|
780 ctmx1135 comparetotmag 0E+384 -0E-383 -> 1 |
|
781 ctmx1136 comparetotmag -0E+384 0E-383 -> 1 |
|
782 ctmx1137 comparetotmag -0E+384 -0E-383 -> 1 |
|
783 ctmx1138 comparetotmag 0 0E-383 -> 1 |
|
784 ctmx1139 comparetotmag 0 -0E-383 -> 1 |
|
785 ctmx1140 comparetotmag -0 0E-383 -> 1 |
|
786 ctmx1141 comparetotmag -0 -0E-383 -> 1 |
|
787 |
|
788 -- Null tests |
|
789 ctmx9990 comparetotmag 10 # -> NaN Invalid_operation |
|
790 ctmx9991 comparetotmag # 10 -> NaN Invalid_operation |