comparetotal.decTest 33 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798
  1. ------------------------------------------------------------------------
  2. -- comparetotal.decTest -- decimal comparison using 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. -- Note that we cannot assume add/subtract tests cover paths adequately,
  22. -- here, because the code might be quite different (comparison cannot
  23. -- overflow or underflow, so actual subtractions are not necessary).
  24. -- Similarly, comparetotal will have some radically different paths
  25. -- than compare.
  26. extended: 1
  27. precision: 16
  28. rounding: half_up
  29. maxExponent: 384
  30. minExponent: -383
  31. -- sanity checks
  32. cotx001 comparetotal -2 -2 -> 0
  33. cotx002 comparetotal -2 -1 -> -1
  34. cotx003 comparetotal -2 0 -> -1
  35. cotx004 comparetotal -2 1 -> -1
  36. cotx005 comparetotal -2 2 -> -1
  37. cotx006 comparetotal -1 -2 -> 1
  38. cotx007 comparetotal -1 -1 -> 0
  39. cotx008 comparetotal -1 0 -> -1
  40. cotx009 comparetotal -1 1 -> -1
  41. cotx010 comparetotal -1 2 -> -1
  42. cotx011 comparetotal 0 -2 -> 1
  43. cotx012 comparetotal 0 -1 -> 1
  44. cotx013 comparetotal 0 0 -> 0
  45. cotx014 comparetotal 0 1 -> -1
  46. cotx015 comparetotal 0 2 -> -1
  47. cotx016 comparetotal 1 -2 -> 1
  48. cotx017 comparetotal 1 -1 -> 1
  49. cotx018 comparetotal 1 0 -> 1
  50. cotx019 comparetotal 1 1 -> 0
  51. cotx020 comparetotal 1 2 -> -1
  52. cotx021 comparetotal 2 -2 -> 1
  53. cotx022 comparetotal 2 -1 -> 1
  54. cotx023 comparetotal 2 0 -> 1
  55. cotx025 comparetotal 2 1 -> 1
  56. cotx026 comparetotal 2 2 -> 0
  57. cotx031 comparetotal -20 -20 -> 0
  58. cotx032 comparetotal -20 -10 -> -1
  59. cotx033 comparetotal -20 00 -> -1
  60. cotx034 comparetotal -20 10 -> -1
  61. cotx035 comparetotal -20 20 -> -1
  62. cotx036 comparetotal -10 -20 -> 1
  63. cotx037 comparetotal -10 -10 -> 0
  64. cotx038 comparetotal -10 00 -> -1
  65. cotx039 comparetotal -10 10 -> -1
  66. cotx040 comparetotal -10 20 -> -1
  67. cotx041 comparetotal 00 -20 -> 1
  68. cotx042 comparetotal 00 -10 -> 1
  69. cotx043 comparetotal 00 00 -> 0
  70. cotx044 comparetotal 00 10 -> -1
  71. cotx045 comparetotal 00 20 -> -1
  72. cotx046 comparetotal 10 -20 -> 1
  73. cotx047 comparetotal 10 -10 -> 1
  74. cotx048 comparetotal 10 00 -> 1
  75. cotx049 comparetotal 10 10 -> 0
  76. cotx050 comparetotal 10 20 -> -1
  77. cotx051 comparetotal 20 -20 -> 1
  78. cotx052 comparetotal 20 -10 -> 1
  79. cotx053 comparetotal 20 00 -> 1
  80. cotx055 comparetotal 20 10 -> 1
  81. cotx056 comparetotal 20 20 -> 0
  82. cotx061 comparetotal -2.0 -2.0 -> 0
  83. cotx062 comparetotal -2.0 -1.0 -> -1
  84. cotx063 comparetotal -2.0 0.0 -> -1
  85. cotx064 comparetotal -2.0 1.0 -> -1
  86. cotx065 comparetotal -2.0 2.0 -> -1
  87. cotx066 comparetotal -1.0 -2.0 -> 1
  88. cotx067 comparetotal -1.0 -1.0 -> 0
  89. cotx068 comparetotal -1.0 0.0 -> -1
  90. cotx069 comparetotal -1.0 1.0 -> -1
  91. cotx070 comparetotal -1.0 2.0 -> -1
  92. cotx071 comparetotal 0.0 -2.0 -> 1
  93. cotx072 comparetotal 0.0 -1.0 -> 1
  94. cotx073 comparetotal 0.0 0.0 -> 0
  95. cotx074 comparetotal 0.0 1.0 -> -1
  96. cotx075 comparetotal 0.0 2.0 -> -1
  97. cotx076 comparetotal 1.0 -2.0 -> 1
  98. cotx077 comparetotal 1.0 -1.0 -> 1
  99. cotx078 comparetotal 1.0 0.0 -> 1
  100. cotx079 comparetotal 1.0 1.0 -> 0
  101. cotx080 comparetotal 1.0 2.0 -> -1
  102. cotx081 comparetotal 2.0 -2.0 -> 1
  103. cotx082 comparetotal 2.0 -1.0 -> 1
  104. cotx083 comparetotal 2.0 0.0 -> 1
  105. cotx085 comparetotal 2.0 1.0 -> 1
  106. cotx086 comparetotal 2.0 2.0 -> 0
  107. -- now some cases which might overflow if subtract were used
  108. maxexponent: 999999999
  109. minexponent: -999999999
  110. cotx090 comparetotal 9.99999999E+999999999 9.99999999E+999999999 -> 0
  111. cotx091 comparetotal -9.99999999E+999999999 9.99999999E+999999999 -> -1
  112. cotx092 comparetotal 9.99999999E+999999999 -9.99999999E+999999999 -> 1
  113. cotx093 comparetotal -9.99999999E+999999999 -9.99999999E+999999999 -> 0
  114. -- Examples
  115. cotx094 comparetotal 12.73 127.9 -> -1
  116. cotx095 comparetotal -127 12 -> -1
  117. cotx096 comparetotal 12.30 12.3 -> -1
  118. cotx097 comparetotal 12.30 12.30 -> 0
  119. cotx098 comparetotal 12.3 12.300 -> 1
  120. cotx099 comparetotal 12.3 NaN -> -1
  121. -- some differing length/exponent cases
  122. -- in this first group, compare would compare all equal
  123. cotx100 comparetotal 7.0 7.0 -> 0
  124. cotx101 comparetotal 7.0 7 -> -1
  125. cotx102 comparetotal 7 7.0 -> 1
  126. cotx103 comparetotal 7E+0 7.0 -> 1
  127. cotx104 comparetotal 70E-1 7.0 -> 0
  128. cotx105 comparetotal 0.7E+1 7 -> 0
  129. cotx106 comparetotal 70E-1 7 -> -1
  130. cotx107 comparetotal 7.0 7E+0 -> -1
  131. cotx108 comparetotal 7.0 70E-1 -> 0
  132. cotx109 comparetotal 7 0.7E+1 -> 0
  133. cotx110 comparetotal 7 70E-1 -> 1
  134. cotx120 comparetotal 8.0 7.0 -> 1
  135. cotx121 comparetotal 8.0 7 -> 1
  136. cotx122 comparetotal 8 7.0 -> 1
  137. cotx123 comparetotal 8E+0 7.0 -> 1
  138. cotx124 comparetotal 80E-1 7.0 -> 1
  139. cotx125 comparetotal 0.8E+1 7 -> 1
  140. cotx126 comparetotal 80E-1 7 -> 1
  141. cotx127 comparetotal 8.0 7E+0 -> 1
  142. cotx128 comparetotal 8.0 70E-1 -> 1
  143. cotx129 comparetotal 8 0.7E+1 -> 1
  144. cotx130 comparetotal 8 70E-1 -> 1
  145. cotx140 comparetotal 8.0 9.0 -> -1
  146. cotx141 comparetotal 8.0 9 -> -1
  147. cotx142 comparetotal 8 9.0 -> -1
  148. cotx143 comparetotal 8E+0 9.0 -> -1
  149. cotx144 comparetotal 80E-1 9.0 -> -1
  150. cotx145 comparetotal 0.8E+1 9 -> -1
  151. cotx146 comparetotal 80E-1 9 -> -1
  152. cotx147 comparetotal 8.0 9E+0 -> -1
  153. cotx148 comparetotal 8.0 90E-1 -> -1
  154. cotx149 comparetotal 8 0.9E+1 -> -1
  155. cotx150 comparetotal 8 90E-1 -> -1
  156. -- and again, with sign changes -+ ..
  157. cotx200 comparetotal -7.0 7.0 -> -1
  158. cotx201 comparetotal -7.0 7 -> -1
  159. cotx202 comparetotal -7 7.0 -> -1
  160. cotx203 comparetotal -7E+0 7.0 -> -1
  161. cotx204 comparetotal -70E-1 7.0 -> -1
  162. cotx205 comparetotal -0.7E+1 7 -> -1
  163. cotx206 comparetotal -70E-1 7 -> -1
  164. cotx207 comparetotal -7.0 7E+0 -> -1
  165. cotx208 comparetotal -7.0 70E-1 -> -1
  166. cotx209 comparetotal -7 0.7E+1 -> -1
  167. cotx210 comparetotal -7 70E-1 -> -1
  168. cotx220 comparetotal -8.0 7.0 -> -1
  169. cotx221 comparetotal -8.0 7 -> -1
  170. cotx222 comparetotal -8 7.0 -> -1
  171. cotx223 comparetotal -8E+0 7.0 -> -1
  172. cotx224 comparetotal -80E-1 7.0 -> -1
  173. cotx225 comparetotal -0.8E+1 7 -> -1
  174. cotx226 comparetotal -80E-1 7 -> -1
  175. cotx227 comparetotal -8.0 7E+0 -> -1
  176. cotx228 comparetotal -8.0 70E-1 -> -1
  177. cotx229 comparetotal -8 0.7E+1 -> -1
  178. cotx230 comparetotal -8 70E-1 -> -1
  179. cotx240 comparetotal -8.0 9.0 -> -1
  180. cotx241 comparetotal -8.0 9 -> -1
  181. cotx242 comparetotal -8 9.0 -> -1
  182. cotx243 comparetotal -8E+0 9.0 -> -1
  183. cotx244 comparetotal -80E-1 9.0 -> -1
  184. cotx245 comparetotal -0.8E+1 9 -> -1
  185. cotx246 comparetotal -80E-1 9 -> -1
  186. cotx247 comparetotal -8.0 9E+0 -> -1
  187. cotx248 comparetotal -8.0 90E-1 -> -1
  188. cotx249 comparetotal -8 0.9E+1 -> -1
  189. cotx250 comparetotal -8 90E-1 -> -1
  190. -- and again, with sign changes +- ..
  191. cotx300 comparetotal 7.0 -7.0 -> 1
  192. cotx301 comparetotal 7.0 -7 -> 1
  193. cotx302 comparetotal 7 -7.0 -> 1
  194. cotx303 comparetotal 7E+0 -7.0 -> 1
  195. cotx304 comparetotal 70E-1 -7.0 -> 1
  196. cotx305 comparetotal .7E+1 -7 -> 1
  197. cotx306 comparetotal 70E-1 -7 -> 1
  198. cotx307 comparetotal 7.0 -7E+0 -> 1
  199. cotx308 comparetotal 7.0 -70E-1 -> 1
  200. cotx309 comparetotal 7 -.7E+1 -> 1
  201. cotx310 comparetotal 7 -70E-1 -> 1
  202. cotx320 comparetotal 8.0 -7.0 -> 1
  203. cotx321 comparetotal 8.0 -7 -> 1
  204. cotx322 comparetotal 8 -7.0 -> 1
  205. cotx323 comparetotal 8E+0 -7.0 -> 1
  206. cotx324 comparetotal 80E-1 -7.0 -> 1
  207. cotx325 comparetotal .8E+1 -7 -> 1
  208. cotx326 comparetotal 80E-1 -7 -> 1
  209. cotx327 comparetotal 8.0 -7E+0 -> 1
  210. cotx328 comparetotal 8.0 -70E-1 -> 1
  211. cotx329 comparetotal 8 -.7E+1 -> 1
  212. cotx330 comparetotal 8 -70E-1 -> 1
  213. cotx340 comparetotal 8.0 -9.0 -> 1
  214. cotx341 comparetotal 8.0 -9 -> 1
  215. cotx342 comparetotal 8 -9.0 -> 1
  216. cotx343 comparetotal 8E+0 -9.0 -> 1
  217. cotx344 comparetotal 80E-1 -9.0 -> 1
  218. cotx345 comparetotal .8E+1 -9 -> 1
  219. cotx346 comparetotal 80E-1 -9 -> 1
  220. cotx347 comparetotal 8.0 -9E+0 -> 1
  221. cotx348 comparetotal 8.0 -90E-1 -> 1
  222. cotx349 comparetotal 8 -.9E+1 -> 1
  223. cotx350 comparetotal 8 -90E-1 -> 1
  224. -- and again, with sign changes -- ..
  225. cotx400 comparetotal -7.0 -7.0 -> 0
  226. cotx401 comparetotal -7.0 -7 -> 1
  227. cotx402 comparetotal -7 -7.0 -> -1
  228. cotx403 comparetotal -7E+0 -7.0 -> -1
  229. cotx404 comparetotal -70E-1 -7.0 -> 0
  230. cotx405 comparetotal -.7E+1 -7 -> 0
  231. cotx406 comparetotal -70E-1 -7 -> 1
  232. cotx407 comparetotal -7.0 -7E+0 -> 1
  233. cotx408 comparetotal -7.0 -70E-1 -> 0
  234. cotx409 comparetotal -7 -.7E+1 -> 0
  235. cotx410 comparetotal -7 -70E-1 -> -1
  236. cotx420 comparetotal -8.0 -7.0 -> -1
  237. cotx421 comparetotal -8.0 -7 -> -1
  238. cotx422 comparetotal -8 -7.0 -> -1
  239. cotx423 comparetotal -8E+0 -7.0 -> -1
  240. cotx424 comparetotal -80E-1 -7.0 -> -1
  241. cotx425 comparetotal -.8E+1 -7 -> -1
  242. cotx426 comparetotal -80E-1 -7 -> -1
  243. cotx427 comparetotal -8.0 -7E+0 -> -1
  244. cotx428 comparetotal -8.0 -70E-1 -> -1
  245. cotx429 comparetotal -8 -.7E+1 -> -1
  246. cotx430 comparetotal -8 -70E-1 -> -1
  247. cotx440 comparetotal -8.0 -9.0 -> 1
  248. cotx441 comparetotal -8.0 -9 -> 1
  249. cotx442 comparetotal -8 -9.0 -> 1
  250. cotx443 comparetotal -8E+0 -9.0 -> 1
  251. cotx444 comparetotal -80E-1 -9.0 -> 1
  252. cotx445 comparetotal -.8E+1 -9 -> 1
  253. cotx446 comparetotal -80E-1 -9 -> 1
  254. cotx447 comparetotal -8.0 -9E+0 -> 1
  255. cotx448 comparetotal -8.0 -90E-1 -> 1
  256. cotx449 comparetotal -8 -.9E+1 -> 1
  257. cotx450 comparetotal -8 -90E-1 -> 1
  258. -- testcases that subtract to lots of zeros at boundaries [pgr]
  259. precision: 40
  260. cotx470 comparetotal 123.4560000000000000E789 123.456E789 -> -1
  261. cotx471 comparetotal 123.456000000000000E-89 123.456E-89 -> -1
  262. cotx472 comparetotal 123.45600000000000E789 123.456E789 -> -1
  263. cotx473 comparetotal 123.4560000000000E-89 123.456E-89 -> -1
  264. cotx474 comparetotal 123.456000000000E789 123.456E789 -> -1
  265. cotx475 comparetotal 123.45600000000E-89 123.456E-89 -> -1
  266. cotx476 comparetotal 123.4560000000E789 123.456E789 -> -1
  267. cotx477 comparetotal 123.456000000E-89 123.456E-89 -> -1
  268. cotx478 comparetotal 123.45600000E789 123.456E789 -> -1
  269. cotx479 comparetotal 123.4560000E-89 123.456E-89 -> -1
  270. cotx480 comparetotal 123.456000E789 123.456E789 -> -1
  271. cotx481 comparetotal 123.45600E-89 123.456E-89 -> -1
  272. cotx482 comparetotal 123.4560E789 123.456E789 -> -1
  273. cotx483 comparetotal 123.456E-89 123.456E-89 -> 0
  274. cotx484 comparetotal 123.456E-89 123.4560000000000000E-89 -> 1
  275. cotx485 comparetotal 123.456E789 123.456000000000000E789 -> 1
  276. cotx486 comparetotal 123.456E-89 123.45600000000000E-89 -> 1
  277. cotx487 comparetotal 123.456E789 123.4560000000000E789 -> 1
  278. cotx488 comparetotal 123.456E-89 123.456000000000E-89 -> 1
  279. cotx489 comparetotal 123.456E789 123.45600000000E789 -> 1
  280. cotx490 comparetotal 123.456E-89 123.4560000000E-89 -> 1
  281. cotx491 comparetotal 123.456E789 123.456000000E789 -> 1
  282. cotx492 comparetotal 123.456E-89 123.45600000E-89 -> 1
  283. cotx493 comparetotal 123.456E789 123.4560000E789 -> 1
  284. cotx494 comparetotal 123.456E-89 123.456000E-89 -> 1
  285. cotx495 comparetotal 123.456E789 123.45600E789 -> 1
  286. cotx496 comparetotal 123.456E-89 123.4560E-89 -> 1
  287. cotx497 comparetotal 123.456E789 123.456E789 -> 0
  288. -- wide-ranging, around precision; signs equal
  289. precision: 9
  290. cotx500 comparetotal 1 1E-15 -> 1
  291. cotx501 comparetotal 1 1E-14 -> 1
  292. cotx502 comparetotal 1 1E-13 -> 1
  293. cotx503 comparetotal 1 1E-12 -> 1
  294. cotx504 comparetotal 1 1E-11 -> 1
  295. cotx505 comparetotal 1 1E-10 -> 1
  296. cotx506 comparetotal 1 1E-9 -> 1
  297. cotx507 comparetotal 1 1E-8 -> 1
  298. cotx508 comparetotal 1 1E-7 -> 1
  299. cotx509 comparetotal 1 1E-6 -> 1
  300. cotx510 comparetotal 1 1E-5 -> 1
  301. cotx511 comparetotal 1 1E-4 -> 1
  302. cotx512 comparetotal 1 1E-3 -> 1
  303. cotx513 comparetotal 1 1E-2 -> 1
  304. cotx514 comparetotal 1 1E-1 -> 1
  305. cotx515 comparetotal 1 1E-0 -> 0
  306. cotx516 comparetotal 1 1E+1 -> -1
  307. cotx517 comparetotal 1 1E+2 -> -1
  308. cotx518 comparetotal 1 1E+3 -> -1
  309. cotx519 comparetotal 1 1E+4 -> -1
  310. cotx521 comparetotal 1 1E+5 -> -1
  311. cotx522 comparetotal 1 1E+6 -> -1
  312. cotx523 comparetotal 1 1E+7 -> -1
  313. cotx524 comparetotal 1 1E+8 -> -1
  314. cotx525 comparetotal 1 1E+9 -> -1
  315. cotx526 comparetotal 1 1E+10 -> -1
  316. cotx527 comparetotal 1 1E+11 -> -1
  317. cotx528 comparetotal 1 1E+12 -> -1
  318. cotx529 comparetotal 1 1E+13 -> -1
  319. cotx530 comparetotal 1 1E+14 -> -1
  320. cotx531 comparetotal 1 1E+15 -> -1
  321. -- LR swap
  322. cotx540 comparetotal 1E-15 1 -> -1
  323. cotx541 comparetotal 1E-14 1 -> -1
  324. cotx542 comparetotal 1E-13 1 -> -1
  325. cotx543 comparetotal 1E-12 1 -> -1
  326. cotx544 comparetotal 1E-11 1 -> -1
  327. cotx545 comparetotal 1E-10 1 -> -1
  328. cotx546 comparetotal 1E-9 1 -> -1
  329. cotx547 comparetotal 1E-8 1 -> -1
  330. cotx548 comparetotal 1E-7 1 -> -1
  331. cotx549 comparetotal 1E-6 1 -> -1
  332. cotx550 comparetotal 1E-5 1 -> -1
  333. cotx551 comparetotal 1E-4 1 -> -1
  334. cotx552 comparetotal 1E-3 1 -> -1
  335. cotx553 comparetotal 1E-2 1 -> -1
  336. cotx554 comparetotal 1E-1 1 -> -1
  337. cotx555 comparetotal 1E-0 1 -> 0
  338. cotx556 comparetotal 1E+1 1 -> 1
  339. cotx557 comparetotal 1E+2 1 -> 1
  340. cotx558 comparetotal 1E+3 1 -> 1
  341. cotx559 comparetotal 1E+4 1 -> 1
  342. cotx561 comparetotal 1E+5 1 -> 1
  343. cotx562 comparetotal 1E+6 1 -> 1
  344. cotx563 comparetotal 1E+7 1 -> 1
  345. cotx564 comparetotal 1E+8 1 -> 1
  346. cotx565 comparetotal 1E+9 1 -> 1
  347. cotx566 comparetotal 1E+10 1 -> 1
  348. cotx567 comparetotal 1E+11 1 -> 1
  349. cotx568 comparetotal 1E+12 1 -> 1
  350. cotx569 comparetotal 1E+13 1 -> 1
  351. cotx570 comparetotal 1E+14 1 -> 1
  352. cotx571 comparetotal 1E+15 1 -> 1
  353. -- similar with an useful coefficient, one side only
  354. cotx580 comparetotal 0.000000987654321 1E-15 -> 1
  355. cotx581 comparetotal 0.000000987654321 1E-14 -> 1
  356. cotx582 comparetotal 0.000000987654321 1E-13 -> 1
  357. cotx583 comparetotal 0.000000987654321 1E-12 -> 1
  358. cotx584 comparetotal 0.000000987654321 1E-11 -> 1
  359. cotx585 comparetotal 0.000000987654321 1E-10 -> 1
  360. cotx586 comparetotal 0.000000987654321 1E-9 -> 1
  361. cotx587 comparetotal 0.000000987654321 1E-8 -> 1
  362. cotx588 comparetotal 0.000000987654321 1E-7 -> 1
  363. cotx589 comparetotal 0.000000987654321 1E-6 -> -1
  364. cotx590 comparetotal 0.000000987654321 1E-5 -> -1
  365. cotx591 comparetotal 0.000000987654321 1E-4 -> -1
  366. cotx592 comparetotal 0.000000987654321 1E-3 -> -1
  367. cotx593 comparetotal 0.000000987654321 1E-2 -> -1
  368. cotx594 comparetotal 0.000000987654321 1E-1 -> -1
  369. cotx595 comparetotal 0.000000987654321 1E-0 -> -1
  370. cotx596 comparetotal 0.000000987654321 1E+1 -> -1
  371. cotx597 comparetotal 0.000000987654321 1E+2 -> -1
  372. cotx598 comparetotal 0.000000987654321 1E+3 -> -1
  373. cotx599 comparetotal 0.000000987654321 1E+4 -> -1
  374. -- check some unit-y traps
  375. precision: 20
  376. cotx600 comparetotal 12 12.2345 -> -1
  377. cotx601 comparetotal 12.0 12.2345 -> -1
  378. cotx602 comparetotal 12.00 12.2345 -> -1
  379. cotx603 comparetotal 12.000 12.2345 -> -1
  380. cotx604 comparetotal 12.0000 12.2345 -> -1
  381. cotx605 comparetotal 12.00000 12.2345 -> -1
  382. cotx606 comparetotal 12.000000 12.2345 -> -1
  383. cotx607 comparetotal 12.0000000 12.2345 -> -1
  384. cotx608 comparetotal 12.00000000 12.2345 -> -1
  385. cotx609 comparetotal 12.000000000 12.2345 -> -1
  386. cotx610 comparetotal 12.1234 12 -> 1
  387. cotx611 comparetotal 12.1234 12.0 -> 1
  388. cotx612 comparetotal 12.1234 12.00 -> 1
  389. cotx613 comparetotal 12.1234 12.000 -> 1
  390. cotx614 comparetotal 12.1234 12.0000 -> 1
  391. cotx615 comparetotal 12.1234 12.00000 -> 1
  392. cotx616 comparetotal 12.1234 12.000000 -> 1
  393. cotx617 comparetotal 12.1234 12.0000000 -> 1
  394. cotx618 comparetotal 12.1234 12.00000000 -> 1
  395. cotx619 comparetotal 12.1234 12.000000000 -> 1
  396. cotx620 comparetotal -12 -12.2345 -> 1
  397. cotx621 comparetotal -12.0 -12.2345 -> 1
  398. cotx622 comparetotal -12.00 -12.2345 -> 1
  399. cotx623 comparetotal -12.000 -12.2345 -> 1
  400. cotx624 comparetotal -12.0000 -12.2345 -> 1
  401. cotx625 comparetotal -12.00000 -12.2345 -> 1
  402. cotx626 comparetotal -12.000000 -12.2345 -> 1
  403. cotx627 comparetotal -12.0000000 -12.2345 -> 1
  404. cotx628 comparetotal -12.00000000 -12.2345 -> 1
  405. cotx629 comparetotal -12.000000000 -12.2345 -> 1
  406. cotx630 comparetotal -12.1234 -12 -> -1
  407. cotx631 comparetotal -12.1234 -12.0 -> -1
  408. cotx632 comparetotal -12.1234 -12.00 -> -1
  409. cotx633 comparetotal -12.1234 -12.000 -> -1
  410. cotx634 comparetotal -12.1234 -12.0000 -> -1
  411. cotx635 comparetotal -12.1234 -12.00000 -> -1
  412. cotx636 comparetotal -12.1234 -12.000000 -> -1
  413. cotx637 comparetotal -12.1234 -12.0000000 -> -1
  414. cotx638 comparetotal -12.1234 -12.00000000 -> -1
  415. cotx639 comparetotal -12.1234 -12.000000000 -> -1
  416. precision: 9
  417. -- extended zeros
  418. cotx640 comparetotal 0 0 -> 0
  419. cotx641 comparetotal 0 -0 -> 1
  420. cotx642 comparetotal 0 -0.0 -> 1
  421. cotx643 comparetotal 0 0.0 -> 1
  422. cotx644 comparetotal -0 0 -> -1
  423. cotx645 comparetotal -0 -0 -> 0
  424. cotx646 comparetotal -0 -0.0 -> -1
  425. cotx647 comparetotal -0 0.0 -> -1
  426. cotx648 comparetotal 0.0 0 -> -1
  427. cotx649 comparetotal 0.0 -0 -> 1
  428. cotx650 comparetotal 0.0 -0.0 -> 1
  429. cotx651 comparetotal 0.0 0.0 -> 0
  430. cotx652 comparetotal -0.0 0 -> -1
  431. cotx653 comparetotal -0.0 -0 -> 1
  432. cotx654 comparetotal -0.0 -0.0 -> 0
  433. cotx655 comparetotal -0.0 0.0 -> -1
  434. cotx656 comparetotal -0E1 0.0 -> -1
  435. cotx657 comparetotal -0E2 0.0 -> -1
  436. cotx658 comparetotal 0E1 0.0 -> 1
  437. cotx659 comparetotal 0E2 0.0 -> 1
  438. cotx660 comparetotal -0E1 0 -> -1
  439. cotx661 comparetotal -0E2 0 -> -1
  440. cotx662 comparetotal 0E1 0 -> 1
  441. cotx663 comparetotal 0E2 0 -> 1
  442. cotx664 comparetotal -0E1 -0E1 -> 0
  443. cotx665 comparetotal -0E2 -0E1 -> -1
  444. cotx666 comparetotal 0E1 -0E1 -> 1
  445. cotx667 comparetotal 0E2 -0E1 -> 1
  446. cotx668 comparetotal -0E1 -0E2 -> 1
  447. cotx669 comparetotal -0E2 -0E2 -> 0
  448. cotx670 comparetotal 0E1 -0E2 -> 1
  449. cotx671 comparetotal 0E2 -0E2 -> 1
  450. cotx672 comparetotal -0E1 0E1 -> -1
  451. cotx673 comparetotal -0E2 0E1 -> -1
  452. cotx674 comparetotal 0E1 0E1 -> 0
  453. cotx675 comparetotal 0E2 0E1 -> 1
  454. cotx676 comparetotal -0E1 0E2 -> -1
  455. cotx677 comparetotal -0E2 0E2 -> -1
  456. cotx678 comparetotal 0E1 0E2 -> -1
  457. cotx679 comparetotal 0E2 0E2 -> 0
  458. -- trailing zeros; unit-y
  459. precision: 20
  460. cotx680 comparetotal 12 12 -> 0
  461. cotx681 comparetotal 12 12.0 -> 1
  462. cotx682 comparetotal 12 12.00 -> 1
  463. cotx683 comparetotal 12 12.000 -> 1
  464. cotx684 comparetotal 12 12.0000 -> 1
  465. cotx685 comparetotal 12 12.00000 -> 1
  466. cotx686 comparetotal 12 12.000000 -> 1
  467. cotx687 comparetotal 12 12.0000000 -> 1
  468. cotx688 comparetotal 12 12.00000000 -> 1
  469. cotx689 comparetotal 12 12.000000000 -> 1
  470. cotx690 comparetotal 12 12 -> 0
  471. cotx691 comparetotal 12.0 12 -> -1
  472. cotx692 comparetotal 12.00 12 -> -1
  473. cotx693 comparetotal 12.000 12 -> -1
  474. cotx694 comparetotal 12.0000 12 -> -1
  475. cotx695 comparetotal 12.00000 12 -> -1
  476. cotx696 comparetotal 12.000000 12 -> -1
  477. cotx697 comparetotal 12.0000000 12 -> -1
  478. cotx698 comparetotal 12.00000000 12 -> -1
  479. cotx699 comparetotal 12.000000000 12 -> -1
  480. -- long operand checks
  481. maxexponent: 999
  482. minexponent: -999
  483. precision: 9
  484. cotx701 comparetotal 12345678000 1 -> 1
  485. cotx702 comparetotal 1 12345678000 -> -1
  486. cotx703 comparetotal 1234567800 1 -> 1
  487. cotx704 comparetotal 1 1234567800 -> -1
  488. cotx705 comparetotal 1234567890 1 -> 1
  489. cotx706 comparetotal 1 1234567890 -> -1
  490. cotx707 comparetotal 1234567891 1 -> 1
  491. cotx708 comparetotal 1 1234567891 -> -1
  492. cotx709 comparetotal 12345678901 1 -> 1
  493. cotx710 comparetotal 1 12345678901 -> -1
  494. cotx711 comparetotal 1234567896 1 -> 1
  495. cotx712 comparetotal 1 1234567896 -> -1
  496. cotx713 comparetotal -1234567891 1 -> -1
  497. cotx714 comparetotal 1 -1234567891 -> 1
  498. cotx715 comparetotal -12345678901 1 -> -1
  499. cotx716 comparetotal 1 -12345678901 -> 1
  500. cotx717 comparetotal -1234567896 1 -> -1
  501. cotx718 comparetotal 1 -1234567896 -> 1
  502. precision: 15
  503. -- same with plenty of precision
  504. cotx721 comparetotal 12345678000 1 -> 1
  505. cotx722 comparetotal 1 12345678000 -> -1
  506. cotx723 comparetotal 1234567800 1 -> 1
  507. cotx724 comparetotal 1 1234567800 -> -1
  508. cotx725 comparetotal 1234567890 1 -> 1
  509. cotx726 comparetotal 1 1234567890 -> -1
  510. cotx727 comparetotal 1234567891 1 -> 1
  511. cotx728 comparetotal 1 1234567891 -> -1
  512. cotx729 comparetotal 12345678901 1 -> 1
  513. cotx730 comparetotal 1 12345678901 -> -1
  514. cotx731 comparetotal 1234567896 1 -> 1
  515. cotx732 comparetotal 1 1234567896 -> -1
  516. -- residue cases
  517. precision: 5
  518. cotx740 comparetotal 1 0.9999999 -> 1
  519. cotx741 comparetotal 1 0.999999 -> 1
  520. cotx742 comparetotal 1 0.99999 -> 1
  521. cotx743 comparetotal 1 1.0000 -> 1
  522. cotx744 comparetotal 1 1.00001 -> -1
  523. cotx745 comparetotal 1 1.000001 -> -1
  524. cotx746 comparetotal 1 1.0000001 -> -1
  525. cotx750 comparetotal 0.9999999 1 -> -1
  526. cotx751 comparetotal 0.999999 1 -> -1
  527. cotx752 comparetotal 0.99999 1 -> -1
  528. cotx753 comparetotal 1.0000 1 -> -1
  529. cotx754 comparetotal 1.00001 1 -> 1
  530. cotx755 comparetotal 1.000001 1 -> 1
  531. cotx756 comparetotal 1.0000001 1 -> 1
  532. -- a selection of longies
  533. cotx760 comparetotal -36852134.84194296250843579428931 -5830629.8347085025808756560357940 -> -1
  534. cotx761 comparetotal -36852134.84194296250843579428931 -36852134.84194296250843579428931 -> 0
  535. cotx762 comparetotal -36852134.94194296250843579428931 -36852134.84194296250843579428931 -> -1
  536. cotx763 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  537. -- precisions above or below the difference should have no effect
  538. precision: 11
  539. cotx764 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  540. precision: 10
  541. cotx765 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  542. precision: 9
  543. cotx766 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  544. precision: 8
  545. cotx767 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  546. precision: 7
  547. cotx768 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  548. precision: 6
  549. cotx769 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  550. precision: 5
  551. cotx770 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  552. precision: 4
  553. cotx771 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  554. precision: 3
  555. cotx772 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  556. precision: 2
  557. cotx773 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  558. precision: 1
  559. cotx774 comparetotal -36852134.84194296250843579428931 -36852134.94194296250843579428931 -> 1
  560. -- Specials
  561. precision: 9
  562. cotx780 comparetotal Inf -Inf -> 1
  563. cotx781 comparetotal Inf -1000 -> 1
  564. cotx782 comparetotal Inf -1 -> 1
  565. cotx783 comparetotal Inf -0 -> 1
  566. cotx784 comparetotal Inf 0 -> 1
  567. cotx785 comparetotal Inf 1 -> 1
  568. cotx786 comparetotal Inf 1000 -> 1
  569. cotx787 comparetotal Inf Inf -> 0
  570. cotx788 comparetotal -1000 Inf -> -1
  571. cotx789 comparetotal -Inf Inf -> -1
  572. cotx790 comparetotal -1 Inf -> -1
  573. cotx791 comparetotal -0 Inf -> -1
  574. cotx792 comparetotal 0 Inf -> -1
  575. cotx793 comparetotal 1 Inf -> -1
  576. cotx794 comparetotal 1000 Inf -> -1
  577. cotx795 comparetotal Inf Inf -> 0
  578. cotx800 comparetotal -Inf -Inf -> 0
  579. cotx801 comparetotal -Inf -1000 -> -1
  580. cotx802 comparetotal -Inf -1 -> -1
  581. cotx803 comparetotal -Inf -0 -> -1
  582. cotx804 comparetotal -Inf 0 -> -1
  583. cotx805 comparetotal -Inf 1 -> -1
  584. cotx806 comparetotal -Inf 1000 -> -1
  585. cotx807 comparetotal -Inf Inf -> -1
  586. cotx808 comparetotal -Inf -Inf -> 0
  587. cotx809 comparetotal -1000 -Inf -> 1
  588. cotx810 comparetotal -1 -Inf -> 1
  589. cotx811 comparetotal -0 -Inf -> 1
  590. cotx812 comparetotal 0 -Inf -> 1
  591. cotx813 comparetotal 1 -Inf -> 1
  592. cotx814 comparetotal 1000 -Inf -> 1
  593. cotx815 comparetotal Inf -Inf -> 1
  594. cotx821 comparetotal NaN -Inf -> 1
  595. cotx822 comparetotal NaN -1000 -> 1
  596. cotx823 comparetotal NaN -1 -> 1
  597. cotx824 comparetotal NaN -0 -> 1
  598. cotx825 comparetotal NaN 0 -> 1
  599. cotx826 comparetotal NaN 1 -> 1
  600. cotx827 comparetotal NaN 1000 -> 1
  601. cotx828 comparetotal NaN Inf -> 1
  602. cotx829 comparetotal NaN NaN -> 0
  603. cotx830 comparetotal -Inf NaN -> -1
  604. cotx831 comparetotal -1000 NaN -> -1
  605. cotx832 comparetotal -1 NaN -> -1
  606. cotx833 comparetotal -0 NaN -> -1
  607. cotx834 comparetotal 0 NaN -> -1
  608. cotx835 comparetotal 1 NaN -> -1
  609. cotx836 comparetotal 1000 NaN -> -1
  610. cotx837 comparetotal Inf NaN -> -1
  611. cotx838 comparetotal -NaN -NaN -> 0
  612. cotx839 comparetotal +NaN -NaN -> 1
  613. cotx840 comparetotal -NaN +NaN -> -1
  614. cotx841 comparetotal sNaN -sNaN -> 1
  615. cotx842 comparetotal sNaN -NaN -> 1
  616. cotx843 comparetotal sNaN -Inf -> 1
  617. cotx844 comparetotal sNaN -1000 -> 1
  618. cotx845 comparetotal sNaN -1 -> 1
  619. cotx846 comparetotal sNaN -0 -> 1
  620. cotx847 comparetotal sNaN 0 -> 1
  621. cotx848 comparetotal sNaN 1 -> 1
  622. cotx849 comparetotal sNaN 1000 -> 1
  623. cotx850 comparetotal sNaN NaN -> -1
  624. cotx851 comparetotal sNaN sNaN -> 0
  625. cotx852 comparetotal -sNaN sNaN -> -1
  626. cotx853 comparetotal -NaN sNaN -> -1
  627. cotx854 comparetotal -Inf sNaN -> -1
  628. cotx855 comparetotal -1000 sNaN -> -1
  629. cotx856 comparetotal -1 sNaN -> -1
  630. cotx857 comparetotal -0 sNaN -> -1
  631. cotx858 comparetotal 0 sNaN -> -1
  632. cotx859 comparetotal 1 sNaN -> -1
  633. cotx860 comparetotal 1000 sNaN -> -1
  634. cotx861 comparetotal Inf sNaN -> -1
  635. cotx862 comparetotal NaN sNaN -> 1
  636. cotx863 comparetotal sNaN sNaN -> 0
  637. cotx871 comparetotal -sNaN -sNaN -> 0
  638. cotx872 comparetotal -sNaN -NaN -> 1
  639. cotx873 comparetotal -sNaN -Inf -> -1
  640. cotx874 comparetotal -sNaN -1000 -> -1
  641. cotx875 comparetotal -sNaN -1 -> -1
  642. cotx876 comparetotal -sNaN -0 -> -1
  643. cotx877 comparetotal -sNaN 0 -> -1
  644. cotx878 comparetotal -sNaN 1 -> -1
  645. cotx879 comparetotal -sNaN 1000 -> -1
  646. cotx880 comparetotal -sNaN NaN -> -1
  647. cotx881 comparetotal -sNaN sNaN -> -1
  648. cotx882 comparetotal -sNaN -sNaN -> 0
  649. cotx883 comparetotal -NaN -sNaN -> -1
  650. cotx884 comparetotal -Inf -sNaN -> 1
  651. cotx885 comparetotal -1000 -sNaN -> 1
  652. cotx886 comparetotal -1 -sNaN -> 1
  653. cotx887 comparetotal -0 -sNaN -> 1
  654. cotx888 comparetotal 0 -sNaN -> 1
  655. cotx889 comparetotal 1 -sNaN -> 1
  656. cotx890 comparetotal 1000 -sNaN -> 1
  657. cotx891 comparetotal Inf -sNaN -> 1
  658. cotx892 comparetotal NaN -sNaN -> 1
  659. cotx893 comparetotal sNaN -sNaN -> 1
  660. -- NaNs with payload
  661. cotx960 comparetotal NaN9 -Inf -> 1
  662. cotx961 comparetotal NaN8 999 -> 1
  663. cotx962 comparetotal NaN77 Inf -> 1
  664. cotx963 comparetotal -NaN67 NaN5 -> -1
  665. cotx964 comparetotal -Inf -NaN4 -> 1
  666. cotx965 comparetotal -999 -NaN33 -> 1
  667. cotx966 comparetotal Inf NaN2 -> -1
  668. cotx970 comparetotal -NaN41 -NaN42 -> 1
  669. cotx971 comparetotal +NaN41 -NaN42 -> 1
  670. cotx972 comparetotal -NaN41 +NaN42 -> -1
  671. cotx973 comparetotal +NaN41 +NaN42 -> -1
  672. cotx974 comparetotal -NaN42 -NaN01 -> -1
  673. cotx975 comparetotal +NaN42 -NaN01 -> 1
  674. cotx976 comparetotal -NaN42 +NaN01 -> -1
  675. cotx977 comparetotal +NaN42 +NaN01 -> 1
  676. cotx980 comparetotal -sNaN771 -sNaN772 -> 1
  677. cotx981 comparetotal +sNaN771 -sNaN772 -> 1
  678. cotx982 comparetotal -sNaN771 +sNaN772 -> -1
  679. cotx983 comparetotal +sNaN771 +sNaN772 -> -1
  680. cotx984 comparetotal -sNaN772 -sNaN771 -> -1
  681. cotx985 comparetotal +sNaN772 -sNaN771 -> 1
  682. cotx986 comparetotal -sNaN772 +sNaN771 -> -1
  683. cotx987 comparetotal +sNaN772 +sNaN771 -> 1
  684. cotx991 comparetotal -sNaN99 -Inf -> -1
  685. cotx992 comparetotal sNaN98 -11 -> 1
  686. cotx993 comparetotal sNaN97 NaN -> -1
  687. cotx994 comparetotal sNaN16 sNaN94 -> -1
  688. cotx995 comparetotal NaN85 sNaN83 -> 1
  689. cotx996 comparetotal -Inf sNaN92 -> -1
  690. cotx997 comparetotal 088 sNaN81 -> -1
  691. cotx998 comparetotal Inf sNaN90 -> -1
  692. cotx999 comparetotal NaN -sNaN89 -> 1
  693. -- overflow and underflow tests .. subnormal results now allowed
  694. maxExponent: 999999999
  695. minexponent: -999999999
  696. cotx1080 comparetotal +1.23456789012345E-0 9E+999999999 -> -1
  697. cotx1081 comparetotal 9E+999999999 +1.23456789012345E-0 -> 1
  698. cotx1082 comparetotal +0.100 9E-999999999 -> 1
  699. cotx1083 comparetotal 9E-999999999 +0.100 -> -1
  700. cotx1085 comparetotal -1.23456789012345E-0 9E+999999999 -> -1
  701. cotx1086 comparetotal 9E+999999999 -1.23456789012345E-0 -> 1
  702. cotx1087 comparetotal -0.100 9E-999999999 -> -1
  703. cotx1088 comparetotal 9E-999999999 -0.100 -> 1
  704. cotx1089 comparetotal 1e-599999999 1e-400000001 -> -1
  705. cotx1090 comparetotal 1e-599999999 1e-400000000 -> -1
  706. cotx1091 comparetotal 1e-600000000 1e-400000000 -> -1
  707. cotx1092 comparetotal 9e-999999998 0.01 -> -1
  708. cotx1093 comparetotal 9e-999999998 0.1 -> -1
  709. cotx1094 comparetotal 0.01 9e-999999998 -> 1
  710. cotx1095 comparetotal 1e599999999 1e400000001 -> 1
  711. cotx1096 comparetotal 1e599999999 1e400000000 -> 1
  712. cotx1097 comparetotal 1e600000000 1e400000000 -> 1
  713. cotx1098 comparetotal 9e999999998 100 -> 1
  714. cotx1099 comparetotal 9e999999998 10 -> 1
  715. cotx1100 comparetotal 100 9e999999998 -> -1
  716. -- signs
  717. cotx1101 comparetotal 1e+777777777 1e+411111111 -> 1
  718. cotx1102 comparetotal 1e+777777777 -1e+411111111 -> 1
  719. cotx1103 comparetotal -1e+777777777 1e+411111111 -> -1
  720. cotx1104 comparetotal -1e+777777777 -1e+411111111 -> -1
  721. cotx1105 comparetotal 1e-777777777 1e-411111111 -> -1
  722. cotx1106 comparetotal 1e-777777777 -1e-411111111 -> 1
  723. cotx1107 comparetotal -1e-777777777 1e-411111111 -> -1
  724. cotx1108 comparetotal -1e-777777777 -1e-411111111 -> 1
  725. -- spread zeros
  726. cotx1110 comparetotal 0E-383 0 -> -1
  727. cotx1111 comparetotal 0E-383 -0 -> 1
  728. cotx1112 comparetotal -0E-383 0 -> -1
  729. cotx1113 comparetotal -0E-383 -0 -> 1
  730. cotx1114 comparetotal 0E-383 0E+384 -> -1
  731. cotx1115 comparetotal 0E-383 -0E+384 -> 1
  732. cotx1116 comparetotal -0E-383 0E+384 -> -1
  733. cotx1117 comparetotal -0E-383 -0E+384 -> 1
  734. cotx1118 comparetotal 0 0E+384 -> -1
  735. cotx1119 comparetotal 0 -0E+384 -> 1
  736. cotx1120 comparetotal -0 0E+384 -> -1
  737. cotx1121 comparetotal -0 -0E+384 -> 1
  738. cotx1130 comparetotal 0E+384 0 -> 1
  739. cotx1131 comparetotal 0E+384 -0 -> 1
  740. cotx1132 comparetotal -0E+384 0 -> -1
  741. cotx1133 comparetotal -0E+384 -0 -> -1
  742. cotx1134 comparetotal 0E+384 0E-383 -> 1
  743. cotx1135 comparetotal 0E+384 -0E-383 -> 1
  744. cotx1136 comparetotal -0E+384 0E-383 -> -1
  745. cotx1137 comparetotal -0E+384 -0E-383 -> -1
  746. cotx1138 comparetotal 0 0E-383 -> 1
  747. cotx1139 comparetotal 0 -0E-383 -> 1
  748. cotx1140 comparetotal -0 0E-383 -> -1
  749. cotx1141 comparetotal -0 -0E-383 -> -1
  750. -- Null tests
  751. cotx9990 comparetotal 10 # -> NaN Invalid_operation
  752. cotx9991 comparetotal # 10 -> NaN Invalid_operation