dqMax.decTest 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322
  1. ------------------------------------------------------------------------
  2. -- dqMax.decTest -- decQuad maxnum --
  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. -- we assume that base comparison is tested in compare.decTest, so
  22. -- these mainly cover special cases and rounding
  23. extended: 1
  24. clamp: 1
  25. precision: 34
  26. maxExponent: 6144
  27. minExponent: -6143
  28. rounding: half_even
  29. -- sanity checks
  30. dqmax001 max -2 -2 -> -2
  31. dqmax002 max -2 -1 -> -1
  32. dqmax003 max -2 0 -> 0
  33. dqmax004 max -2 1 -> 1
  34. dqmax005 max -2 2 -> 2
  35. dqmax006 max -1 -2 -> -1
  36. dqmax007 max -1 -1 -> -1
  37. dqmax008 max -1 0 -> 0
  38. dqmax009 max -1 1 -> 1
  39. dqmax010 max -1 2 -> 2
  40. dqmax011 max 0 -2 -> 0
  41. dqmax012 max 0 -1 -> 0
  42. dqmax013 max 0 0 -> 0
  43. dqmax014 max 0 1 -> 1
  44. dqmax015 max 0 2 -> 2
  45. dqmax016 max 1 -2 -> 1
  46. dqmax017 max 1 -1 -> 1
  47. dqmax018 max 1 0 -> 1
  48. dqmax019 max 1 1 -> 1
  49. dqmax020 max 1 2 -> 2
  50. dqmax021 max 2 -2 -> 2
  51. dqmax022 max 2 -1 -> 2
  52. dqmax023 max 2 0 -> 2
  53. dqmax025 max 2 1 -> 2
  54. dqmax026 max 2 2 -> 2
  55. -- extended zeros
  56. dqmax030 max 0 0 -> 0
  57. dqmax031 max 0 -0 -> 0
  58. dqmax032 max 0 -0.0 -> 0
  59. dqmax033 max 0 0.0 -> 0
  60. dqmax034 max -0 0 -> 0 -- note: -0 = 0, but 0 chosen
  61. dqmax035 max -0 -0 -> -0
  62. dqmax036 max -0 -0.0 -> -0.0
  63. dqmax037 max -0 0.0 -> 0.0
  64. dqmax038 max 0.0 0 -> 0
  65. dqmax039 max 0.0 -0 -> 0.0
  66. dqmax040 max 0.0 -0.0 -> 0.0
  67. dqmax041 max 0.0 0.0 -> 0.0
  68. dqmax042 max -0.0 0 -> 0
  69. dqmax043 max -0.0 -0 -> -0.0
  70. dqmax044 max -0.0 -0.0 -> -0.0
  71. dqmax045 max -0.0 0.0 -> 0.0
  72. dqmax050 max -0E1 0E1 -> 0E+1
  73. dqmax051 max -0E2 0E2 -> 0E+2
  74. dqmax052 max -0E2 0E1 -> 0E+1
  75. dqmax053 max -0E1 0E2 -> 0E+2
  76. dqmax054 max 0E1 -0E1 -> 0E+1
  77. dqmax055 max 0E2 -0E2 -> 0E+2
  78. dqmax056 max 0E2 -0E1 -> 0E+2
  79. dqmax057 max 0E1 -0E2 -> 0E+1
  80. dqmax058 max 0E1 0E1 -> 0E+1
  81. dqmax059 max 0E2 0E2 -> 0E+2
  82. dqmax060 max 0E2 0E1 -> 0E+2
  83. dqmax061 max 0E1 0E2 -> 0E+2
  84. dqmax062 max -0E1 -0E1 -> -0E+1
  85. dqmax063 max -0E2 -0E2 -> -0E+2
  86. dqmax064 max -0E2 -0E1 -> -0E+1
  87. dqmax065 max -0E1 -0E2 -> -0E+1
  88. -- Specials
  89. dqmax090 max Inf -Inf -> Infinity
  90. dqmax091 max Inf -1000 -> Infinity
  91. dqmax092 max Inf -1 -> Infinity
  92. dqmax093 max Inf -0 -> Infinity
  93. dqmax094 max Inf 0 -> Infinity
  94. dqmax095 max Inf 1 -> Infinity
  95. dqmax096 max Inf 1000 -> Infinity
  96. dqmax097 max Inf Inf -> Infinity
  97. dqmax098 max -1000 Inf -> Infinity
  98. dqmax099 max -Inf Inf -> Infinity
  99. dqmax100 max -1 Inf -> Infinity
  100. dqmax101 max -0 Inf -> Infinity
  101. dqmax102 max 0 Inf -> Infinity
  102. dqmax103 max 1 Inf -> Infinity
  103. dqmax104 max 1000 Inf -> Infinity
  104. dqmax105 max Inf Inf -> Infinity
  105. dqmax120 max -Inf -Inf -> -Infinity
  106. dqmax121 max -Inf -1000 -> -1000
  107. dqmax122 max -Inf -1 -> -1
  108. dqmax123 max -Inf -0 -> -0
  109. dqmax124 max -Inf 0 -> 0
  110. dqmax125 max -Inf 1 -> 1
  111. dqmax126 max -Inf 1000 -> 1000
  112. dqmax127 max -Inf Inf -> Infinity
  113. dqmax128 max -Inf -Inf -> -Infinity
  114. dqmax129 max -1000 -Inf -> -1000
  115. dqmax130 max -1 -Inf -> -1
  116. dqmax131 max -0 -Inf -> -0
  117. dqmax132 max 0 -Inf -> 0
  118. dqmax133 max 1 -Inf -> 1
  119. dqmax134 max 1000 -Inf -> 1000
  120. dqmax135 max Inf -Inf -> Infinity
  121. -- 2004.08.02 754r chooses number over NaN in mixed cases
  122. dqmax141 max NaN -Inf -> -Infinity
  123. dqmax142 max NaN -1000 -> -1000
  124. dqmax143 max NaN -1 -> -1
  125. dqmax144 max NaN -0 -> -0
  126. dqmax145 max NaN 0 -> 0
  127. dqmax146 max NaN 1 -> 1
  128. dqmax147 max NaN 1000 -> 1000
  129. dqmax148 max NaN Inf -> Infinity
  130. dqmax149 max NaN NaN -> NaN
  131. dqmax150 max -Inf NaN -> -Infinity
  132. dqmax151 max -1000 NaN -> -1000
  133. dqmax152 max -1 NaN -> -1
  134. dqmax153 max -0 NaN -> -0
  135. dqmax154 max 0 NaN -> 0
  136. dqmax155 max 1 NaN -> 1
  137. dqmax156 max 1000 NaN -> 1000
  138. dqmax157 max Inf NaN -> Infinity
  139. dqmax161 max sNaN -Inf -> NaN Invalid_operation
  140. dqmax162 max sNaN -1000 -> NaN Invalid_operation
  141. dqmax163 max sNaN -1 -> NaN Invalid_operation
  142. dqmax164 max sNaN -0 -> NaN Invalid_operation
  143. dqmax165 max sNaN 0 -> NaN Invalid_operation
  144. dqmax166 max sNaN 1 -> NaN Invalid_operation
  145. dqmax167 max sNaN 1000 -> NaN Invalid_operation
  146. dqmax168 max sNaN NaN -> NaN Invalid_operation
  147. dqmax169 max sNaN sNaN -> NaN Invalid_operation
  148. dqmax170 max NaN sNaN -> NaN Invalid_operation
  149. dqmax171 max -Inf sNaN -> NaN Invalid_operation
  150. dqmax172 max -1000 sNaN -> NaN Invalid_operation
  151. dqmax173 max -1 sNaN -> NaN Invalid_operation
  152. dqmax174 max -0 sNaN -> NaN Invalid_operation
  153. dqmax175 max 0 sNaN -> NaN Invalid_operation
  154. dqmax176 max 1 sNaN -> NaN Invalid_operation
  155. dqmax177 max 1000 sNaN -> NaN Invalid_operation
  156. dqmax178 max Inf sNaN -> NaN Invalid_operation
  157. dqmax179 max NaN sNaN -> NaN Invalid_operation
  158. -- propagating NaNs
  159. dqmax181 max NaN9 -Inf -> -Infinity
  160. dqmax182 max NaN8 9 -> 9
  161. dqmax183 max -NaN7 Inf -> Infinity
  162. dqmax184 max -NaN1 NaN11 -> -NaN1
  163. dqmax185 max NaN2 NaN12 -> NaN2
  164. dqmax186 max -NaN13 -NaN7 -> -NaN13
  165. dqmax187 max NaN14 -NaN5 -> NaN14
  166. dqmax188 max -Inf NaN4 -> -Infinity
  167. dqmax189 max -9 -NaN3 -> -9
  168. dqmax190 max Inf NaN2 -> Infinity
  169. dqmax191 max sNaN99 -Inf -> NaN99 Invalid_operation
  170. dqmax192 max sNaN98 -1 -> NaN98 Invalid_operation
  171. dqmax193 max -sNaN97 NaN -> -NaN97 Invalid_operation
  172. dqmax194 max sNaN96 sNaN94 -> NaN96 Invalid_operation
  173. dqmax195 max NaN95 sNaN93 -> NaN93 Invalid_operation
  174. dqmax196 max -Inf sNaN92 -> NaN92 Invalid_operation
  175. dqmax197 max 0 sNaN91 -> NaN91 Invalid_operation
  176. dqmax198 max Inf -sNaN90 -> -NaN90 Invalid_operation
  177. dqmax199 max NaN sNaN89 -> NaN89 Invalid_operation
  178. -- old rounding checks
  179. dqmax221 max 12345678000 1 -> 12345678000
  180. dqmax222 max 1 12345678000 -> 12345678000
  181. dqmax223 max 1234567800 1 -> 1234567800
  182. dqmax224 max 1 1234567800 -> 1234567800
  183. dqmax225 max 1234567890 1 -> 1234567890
  184. dqmax226 max 1 1234567890 -> 1234567890
  185. dqmax227 max 1234567891 1 -> 1234567891
  186. dqmax228 max 1 1234567891 -> 1234567891
  187. dqmax229 max 12345678901 1 -> 12345678901
  188. dqmax230 max 1 12345678901 -> 12345678901
  189. dqmax231 max 1234567896 1 -> 1234567896
  190. dqmax232 max 1 1234567896 -> 1234567896
  191. dqmax233 max -1234567891 1 -> 1
  192. dqmax234 max 1 -1234567891 -> 1
  193. dqmax235 max -12345678901 1 -> 1
  194. dqmax236 max 1 -12345678901 -> 1
  195. dqmax237 max -1234567896 1 -> 1
  196. dqmax238 max 1 -1234567896 -> 1
  197. -- from examples
  198. dqmax280 max '3' '2' -> '3'
  199. dqmax281 max '-10' '3' -> '3'
  200. dqmax282 max '1.0' '1' -> '1'
  201. dqmax283 max '1' '1.0' -> '1'
  202. dqmax284 max '7' 'NaN' -> '7'
  203. -- expanded list from min/max 754r purple prose
  204. -- [explicit tests for exponent ordering]
  205. dqmax401 max Inf 1.1 -> Infinity
  206. dqmax402 max 1.1 1 -> 1.1
  207. dqmax403 max 1 1.0 -> 1
  208. dqmax404 max 1.0 0.1 -> 1.0
  209. dqmax405 max 0.1 0.10 -> 0.1
  210. dqmax406 max 0.10 0.100 -> 0.10
  211. dqmax407 max 0.10 0 -> 0.10
  212. dqmax408 max 0 0.0 -> 0
  213. dqmax409 max 0.0 -0 -> 0.0
  214. dqmax410 max 0.0 -0.0 -> 0.0
  215. dqmax411 max 0.00 -0.0 -> 0.00
  216. dqmax412 max 0.0 -0.00 -> 0.0
  217. dqmax413 max 0 -0.0 -> 0
  218. dqmax414 max 0 -0 -> 0
  219. dqmax415 max -0.0 -0 -> -0.0
  220. dqmax416 max -0 -0.100 -> -0
  221. dqmax417 max -0.100 -0.10 -> -0.100
  222. dqmax418 max -0.10 -0.1 -> -0.10
  223. dqmax419 max -0.1 -1.0 -> -0.1
  224. dqmax420 max -1.0 -1 -> -1.0
  225. dqmax421 max -1 -1.1 -> -1
  226. dqmax423 max -1.1 -Inf -> -1.1
  227. -- same with operands reversed
  228. dqmax431 max 1.1 Inf -> Infinity
  229. dqmax432 max 1 1.1 -> 1.1
  230. dqmax433 max 1.0 1 -> 1
  231. dqmax434 max 0.1 1.0 -> 1.0
  232. dqmax435 max 0.10 0.1 -> 0.1
  233. dqmax436 max 0.100 0.10 -> 0.10
  234. dqmax437 max 0 0.10 -> 0.10
  235. dqmax438 max 0.0 0 -> 0
  236. dqmax439 max -0 0.0 -> 0.0
  237. dqmax440 max -0.0 0.0 -> 0.0
  238. dqmax441 max -0.0 0.00 -> 0.00
  239. dqmax442 max -0.00 0.0 -> 0.0
  240. dqmax443 max -0.0 0 -> 0
  241. dqmax444 max -0 0 -> 0
  242. dqmax445 max -0 -0.0 -> -0.0
  243. dqmax446 max -0.100 -0 -> -0
  244. dqmax447 max -0.10 -0.100 -> -0.100
  245. dqmax448 max -0.1 -0.10 -> -0.10
  246. dqmax449 max -1.0 -0.1 -> -0.1
  247. dqmax450 max -1 -1.0 -> -1.0
  248. dqmax451 max -1.1 -1 -> -1
  249. dqmax453 max -Inf -1.1 -> -1.1
  250. -- largies
  251. dqmax460 max 1000 1E+3 -> 1E+3
  252. dqmax461 max 1E+3 1000 -> 1E+3
  253. dqmax462 max 1000 -1E+3 -> 1000
  254. dqmax463 max 1E+3 -1000 -> 1E+3
  255. dqmax464 max -1000 1E+3 -> 1E+3
  256. dqmax465 max -1E+3 1000 -> 1000
  257. dqmax466 max -1000 -1E+3 -> -1000
  258. dqmax467 max -1E+3 -1000 -> -1000
  259. -- misalignment traps for little-endian
  260. dqmax471 max 1.0 0.1 -> 1.0
  261. dqmax472 max 0.1 1.0 -> 1.0
  262. dqmax473 max 10.0 0.1 -> 10.0
  263. dqmax474 max 0.1 10.0 -> 10.0
  264. dqmax475 max 100 1.0 -> 100
  265. dqmax476 max 1.0 100 -> 100
  266. dqmax477 max 1000 10.0 -> 1000
  267. dqmax478 max 10.0 1000 -> 1000
  268. dqmax479 max 10000 100.0 -> 10000
  269. dqmax480 max 100.0 10000 -> 10000
  270. dqmax481 max 100000 1000.0 -> 100000
  271. dqmax482 max 1000.0 100000 -> 100000
  272. dqmax483 max 1000000 10000.0 -> 1000000
  273. dqmax484 max 10000.0 1000000 -> 1000000
  274. -- subnormals
  275. dqmax510 max 1.00E-6143 0 -> 1.00E-6143
  276. dqmax511 max 0.1E-6143 0 -> 1E-6144 Subnormal
  277. dqmax512 max 0.10E-6143 0 -> 1.0E-6144 Subnormal
  278. dqmax513 max 0.100E-6143 0 -> 1.00E-6144 Subnormal
  279. dqmax514 max 0.01E-6143 0 -> 1E-6145 Subnormal
  280. dqmax515 max 0.999E-6143 0 -> 9.99E-6144 Subnormal
  281. dqmax516 max 0.099E-6143 0 -> 9.9E-6145 Subnormal
  282. dqmax517 max 0.009E-6143 0 -> 9E-6146 Subnormal
  283. dqmax518 max 0.001E-6143 0 -> 1E-6146 Subnormal
  284. dqmax519 max 0.0009E-6143 0 -> 9E-6147 Subnormal
  285. dqmax520 max 0.0001E-6143 0 -> 1E-6147 Subnormal
  286. dqmax530 max -1.00E-6143 0 -> 0
  287. dqmax531 max -0.1E-6143 0 -> 0
  288. dqmax532 max -0.10E-6143 0 -> 0
  289. dqmax533 max -0.100E-6143 0 -> 0
  290. dqmax534 max -0.01E-6143 0 -> 0
  291. dqmax535 max -0.999E-6143 0 -> 0
  292. dqmax536 max -0.099E-6143 0 -> 0
  293. dqmax537 max -0.009E-6143 0 -> 0
  294. dqmax538 max -0.001E-6143 0 -> 0
  295. dqmax539 max -0.0009E-6143 0 -> 0
  296. dqmax540 max -0.0001E-6143 0 -> 0
  297. -- Null tests
  298. dqmax900 max 10 # -> NaN Invalid_operation
  299. dqmax901 max # 10 -> NaN Invalid_operation