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.59
|
---|
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
|
---|