ddMinMag.decTest 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293
  1. ------------------------------------------------------------------------
  2. -- ddMinMag.decTest -- decDouble minnummag --
  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. precision: 16
  24. maxExponent: 384
  25. minExponent: -383
  26. extended: 1
  27. clamp: 1
  28. rounding: half_even
  29. -- sanity checks
  30. ddmng001 minmag -2 -2 -> -2
  31. ddmng002 minmag -2 -1 -> -1
  32. ddmng003 minmag -2 0 -> 0
  33. ddmng004 minmag -2 1 -> 1
  34. ddmng005 minmag -2 2 -> -2
  35. ddmng006 minmag -1 -2 -> -1
  36. ddmng007 minmag -1 -1 -> -1
  37. ddmng008 minmag -1 0 -> 0
  38. ddmng009 minmag -1 1 -> -1
  39. ddmng010 minmag -1 2 -> -1
  40. ddmng011 minmag 0 -2 -> 0
  41. ddmng012 minmag 0 -1 -> 0
  42. ddmng013 minmag 0 0 -> 0
  43. ddmng014 minmag 0 1 -> 0
  44. ddmng015 minmag 0 2 -> 0
  45. ddmng016 minmag 1 -2 -> 1
  46. ddmng017 minmag 1 -1 -> -1
  47. ddmng018 minmag 1 0 -> 0
  48. ddmng019 minmag 1 1 -> 1
  49. ddmng020 minmag 1 2 -> 1
  50. ddmng021 minmag 2 -2 -> -2
  51. ddmng022 minmag 2 -1 -> -1
  52. ddmng023 minmag 2 0 -> 0
  53. ddmng025 minmag 2 1 -> 1
  54. ddmng026 minmag 2 2 -> 2
  55. -- extended zeros
  56. ddmng030 minmag 0 0 -> 0
  57. ddmng031 minmag 0 -0 -> -0
  58. ddmng032 minmag 0 -0.0 -> -0.0
  59. ddmng033 minmag 0 0.0 -> 0.0
  60. ddmng034 minmag -0 0 -> -0
  61. ddmng035 minmag -0 -0 -> -0
  62. ddmng036 minmag -0 -0.0 -> -0
  63. ddmng037 minmag -0 0.0 -> -0
  64. ddmng038 minmag 0.0 0 -> 0.0
  65. ddmng039 minmag 0.0 -0 -> -0
  66. ddmng040 minmag 0.0 -0.0 -> -0.0
  67. ddmng041 minmag 0.0 0.0 -> 0.0
  68. ddmng042 minmag -0.0 0 -> -0.0
  69. ddmng043 minmag -0.0 -0 -> -0
  70. ddmng044 minmag -0.0 -0.0 -> -0.0
  71. ddmng045 minmag -0.0 0.0 -> -0.0
  72. ddmng046 minmag 0E1 -0E1 -> -0E+1
  73. ddmng047 minmag -0E1 0E2 -> -0E+1
  74. ddmng048 minmag 0E2 0E1 -> 0E+1
  75. ddmng049 minmag 0E1 0E2 -> 0E+1
  76. ddmng050 minmag -0E3 -0E2 -> -0E+3
  77. ddmng051 minmag -0E2 -0E3 -> -0E+3
  78. -- Specials
  79. ddmng090 minmag Inf -Inf -> -Infinity
  80. ddmng091 minmag Inf -1000 -> -1000
  81. ddmng092 minmag Inf -1 -> -1
  82. ddmng093 minmag Inf -0 -> -0
  83. ddmng094 minmag Inf 0 -> 0
  84. ddmng095 minmag Inf 1 -> 1
  85. ddmng096 minmag Inf 1000 -> 1000
  86. ddmng097 minmag Inf Inf -> Infinity
  87. ddmng098 minmag -1000 Inf -> -1000
  88. ddmng099 minmag -Inf Inf -> -Infinity
  89. ddmng100 minmag -1 Inf -> -1
  90. ddmng101 minmag -0 Inf -> -0
  91. ddmng102 minmag 0 Inf -> 0
  92. ddmng103 minmag 1 Inf -> 1
  93. ddmng104 minmag 1000 Inf -> 1000
  94. ddmng105 minmag Inf Inf -> Infinity
  95. ddmng120 minmag -Inf -Inf -> -Infinity
  96. ddmng121 minmag -Inf -1000 -> -1000
  97. ddmng122 minmag -Inf -1 -> -1
  98. ddmng123 minmag -Inf -0 -> -0
  99. ddmng124 minmag -Inf 0 -> 0
  100. ddmng125 minmag -Inf 1 -> 1
  101. ddmng126 minmag -Inf 1000 -> 1000
  102. ddmng127 minmag -Inf Inf -> -Infinity
  103. ddmng128 minmag -Inf -Inf -> -Infinity
  104. ddmng129 minmag -1000 -Inf -> -1000
  105. ddmng130 minmag -1 -Inf -> -1
  106. ddmng131 minmag -0 -Inf -> -0
  107. ddmng132 minmag 0 -Inf -> 0
  108. ddmng133 minmag 1 -Inf -> 1
  109. ddmng134 minmag 1000 -Inf -> 1000
  110. ddmng135 minmag Inf -Inf -> -Infinity
  111. -- 2004.08.02 754r chooses number over NaN in mixed cases
  112. ddmng141 minmag NaN -Inf -> -Infinity
  113. ddmng142 minmag NaN -1000 -> -1000
  114. ddmng143 minmag NaN -1 -> -1
  115. ddmng144 minmag NaN -0 -> -0
  116. ddmng145 minmag NaN 0 -> 0
  117. ddmng146 minmag NaN 1 -> 1
  118. ddmng147 minmag NaN 1000 -> 1000
  119. ddmng148 minmag NaN Inf -> Infinity
  120. ddmng149 minmag NaN NaN -> NaN
  121. ddmng150 minmag -Inf NaN -> -Infinity
  122. ddmng151 minmag -1000 NaN -> -1000
  123. ddmng152 minmag -1 -NaN -> -1
  124. ddmng153 minmag -0 NaN -> -0
  125. ddmng154 minmag 0 -NaN -> 0
  126. ddmng155 minmag 1 NaN -> 1
  127. ddmng156 minmag 1000 NaN -> 1000
  128. ddmng157 minmag Inf NaN -> Infinity
  129. ddmng161 minmag sNaN -Inf -> NaN Invalid_operation
  130. ddmng162 minmag sNaN -1000 -> NaN Invalid_operation
  131. ddmng163 minmag sNaN -1 -> NaN Invalid_operation
  132. ddmng164 minmag sNaN -0 -> NaN Invalid_operation
  133. ddmng165 minmag -sNaN 0 -> -NaN Invalid_operation
  134. ddmng166 minmag -sNaN 1 -> -NaN Invalid_operation
  135. ddmng167 minmag sNaN 1000 -> NaN Invalid_operation
  136. ddmng168 minmag sNaN NaN -> NaN Invalid_operation
  137. ddmng169 minmag sNaN sNaN -> NaN Invalid_operation
  138. ddmng170 minmag NaN sNaN -> NaN Invalid_operation
  139. ddmng171 minmag -Inf sNaN -> NaN Invalid_operation
  140. ddmng172 minmag -1000 sNaN -> NaN Invalid_operation
  141. ddmng173 minmag -1 sNaN -> NaN Invalid_operation
  142. ddmng174 minmag -0 sNaN -> NaN Invalid_operation
  143. ddmng175 minmag 0 sNaN -> NaN Invalid_operation
  144. ddmng176 minmag 1 sNaN -> NaN Invalid_operation
  145. ddmng177 minmag 1000 sNaN -> NaN Invalid_operation
  146. ddmng178 minmag Inf sNaN -> NaN Invalid_operation
  147. ddmng179 minmag NaN sNaN -> NaN Invalid_operation
  148. -- propagating NaNs
  149. ddmng181 minmag NaN9 -Inf -> -Infinity
  150. ddmng182 minmag -NaN8 9990 -> 9990
  151. ddmng183 minmag NaN71 Inf -> Infinity
  152. ddmng184 minmag NaN1 NaN54 -> NaN1
  153. ddmng185 minmag NaN22 -NaN53 -> NaN22
  154. ddmng186 minmag -NaN3 NaN6 -> -NaN3
  155. ddmng187 minmag -NaN44 NaN7 -> -NaN44
  156. ddmng188 minmag -Inf NaN41 -> -Infinity
  157. ddmng189 minmag -9999 -NaN33 -> -9999
  158. ddmng190 minmag Inf NaN2 -> Infinity
  159. ddmng191 minmag sNaN99 -Inf -> NaN99 Invalid_operation
  160. ddmng192 minmag sNaN98 -11 -> NaN98 Invalid_operation
  161. ddmng193 minmag -sNaN97 NaN8 -> -NaN97 Invalid_operation
  162. ddmng194 minmag sNaN69 sNaN94 -> NaN69 Invalid_operation
  163. ddmng195 minmag NaN95 sNaN93 -> NaN93 Invalid_operation
  164. ddmng196 minmag -Inf sNaN92 -> NaN92 Invalid_operation
  165. ddmng197 minmag 088 sNaN91 -> NaN91 Invalid_operation
  166. ddmng198 minmag Inf -sNaN90 -> -NaN90 Invalid_operation
  167. ddmng199 minmag NaN sNaN86 -> NaN86 Invalid_operation
  168. -- old rounding checks
  169. ddmng221 minmag -12345678000 1 -> 1
  170. ddmng222 minmag 1 -12345678000 -> 1
  171. ddmng223 minmag -1234567800 1 -> 1
  172. ddmng224 minmag 1 -1234567800 -> 1
  173. ddmng225 minmag -1234567890 1 -> 1
  174. ddmng226 minmag 1 -1234567890 -> 1
  175. ddmng227 minmag -1234567891 1 -> 1
  176. ddmng228 minmag 1 -1234567891 -> 1
  177. ddmng229 minmag -12345678901 1 -> 1
  178. ddmng230 minmag 1 -12345678901 -> 1
  179. ddmng231 minmag -1234567896 1 -> 1
  180. ddmng232 minmag 1 -1234567896 -> 1
  181. ddmng233 minmag 1234567891 1 -> 1
  182. ddmng234 minmag 1 1234567891 -> 1
  183. ddmng235 minmag 12345678901 1 -> 1
  184. ddmng236 minmag 1 12345678901 -> 1
  185. ddmng237 minmag 1234567896 1 -> 1
  186. ddmng238 minmag 1 1234567896 -> 1
  187. -- from examples
  188. ddmng280 minmag '3' '2' -> '2'
  189. ddmng281 minmag '-10' '3' -> '3'
  190. ddmng282 minmag '1.0' '1' -> '1.0'
  191. ddmng283 minmag '1' '1.0' -> '1.0'
  192. ddmng284 minmag '7' 'NaN' -> '7'
  193. -- expanded list from min/max 754r purple prose
  194. -- [explicit tests for exponent ordering]
  195. ddmng401 minmag Inf 1.1 -> 1.1
  196. ddmng402 minmag 1.1 1 -> 1
  197. ddmng403 minmag 1 1.0 -> 1.0
  198. ddmng404 minmag 1.0 0.1 -> 0.1
  199. ddmng405 minmag 0.1 0.10 -> 0.10
  200. ddmng406 minmag 0.10 0.100 -> 0.100
  201. ddmng407 minmag 0.10 0 -> 0
  202. ddmng408 minmag 0 0.0 -> 0.0
  203. ddmng409 minmag 0.0 -0 -> -0
  204. ddmng410 minmag 0.0 -0.0 -> -0.0
  205. ddmng411 minmag 0.00 -0.0 -> -0.0
  206. ddmng412 minmag 0.0 -0.00 -> -0.00
  207. ddmng413 minmag 0 -0.0 -> -0.0
  208. ddmng414 minmag 0 -0 -> -0
  209. ddmng415 minmag -0.0 -0 -> -0
  210. ddmng416 minmag -0 -0.100 -> -0
  211. ddmng417 minmag -0.100 -0.10 -> -0.10
  212. ddmng418 minmag -0.10 -0.1 -> -0.1
  213. ddmng419 minmag -0.1 -1.0 -> -0.1
  214. ddmng420 minmag -1.0 -1 -> -1
  215. ddmng421 minmag -1 -1.1 -> -1
  216. ddmng423 minmag -1.1 -Inf -> -1.1
  217. -- same with operands reversed
  218. ddmng431 minmag 1.1 Inf -> 1.1
  219. ddmng432 minmag 1 1.1 -> 1
  220. ddmng433 minmag 1.0 1 -> 1.0
  221. ddmng434 minmag 0.1 1.0 -> 0.1
  222. ddmng435 minmag 0.10 0.1 -> 0.10
  223. ddmng436 minmag 0.100 0.10 -> 0.100
  224. ddmng437 minmag 0 0.10 -> 0
  225. ddmng438 minmag 0.0 0 -> 0.0
  226. ddmng439 minmag -0 0.0 -> -0
  227. ddmng440 minmag -0.0 0.0 -> -0.0
  228. ddmng441 minmag -0.0 0.00 -> -0.0
  229. ddmng442 minmag -0.00 0.0 -> -0.00
  230. ddmng443 minmag -0.0 0 -> -0.0
  231. ddmng444 minmag -0 0 -> -0
  232. ddmng445 minmag -0 -0.0 -> -0
  233. ddmng446 minmag -0.100 -0 -> -0
  234. ddmng447 minmag -0.10 -0.100 -> -0.10
  235. ddmng448 minmag -0.1 -0.10 -> -0.1
  236. ddmng449 minmag -1.0 -0.1 -> -0.1
  237. ddmng450 minmag -1 -1.0 -> -1
  238. ddmng451 minmag -1.1 -1 -> -1
  239. ddmng453 minmag -Inf -1.1 -> -1.1
  240. -- largies
  241. ddmng460 minmag 1000 1E+3 -> 1000
  242. ddmng461 minmag 1E+3 1000 -> 1000
  243. ddmng462 minmag 1000 -1E+3 -> -1E+3
  244. ddmng463 minmag 1E+3 -384 -> -384
  245. ddmng464 minmag -384 1E+3 -> -384
  246. ddmng465 minmag -1E+3 1000 -> -1E+3
  247. ddmng466 minmag -384 -1E+3 -> -384
  248. ddmng467 minmag -1E+3 -384 -> -384
  249. -- subnormals
  250. ddmng510 minmag 1.00E-383 0 -> 0
  251. ddmng511 minmag 0.1E-383 0 -> 0
  252. ddmng512 minmag 0.10E-383 0 -> 0
  253. ddmng513 minmag 0.100E-383 0 -> 0
  254. ddmng514 minmag 0.01E-383 0 -> 0
  255. ddmng515 minmag 0.999E-383 0 -> 0
  256. ddmng516 minmag 0.099E-383 0 -> 0
  257. ddmng517 minmag 0.009E-383 0 -> 0
  258. ddmng518 minmag 0.001E-383 0 -> 0
  259. ddmng519 minmag 0.0009E-383 0 -> 0
  260. ddmng520 minmag 0.0001E-383 0 -> 0
  261. ddmng530 minmag -1.00E-383 0 -> 0
  262. ddmng531 minmag -0.1E-383 0 -> 0
  263. ddmng532 minmag -0.10E-383 0 -> 0
  264. ddmng533 minmag -0.100E-383 0 -> 0
  265. ddmng534 minmag -0.01E-383 0 -> 0
  266. ddmng535 minmag -0.999E-383 0 -> 0
  267. ddmng536 minmag -0.099E-383 0 -> 0
  268. ddmng537 minmag -0.009E-383 0 -> 0
  269. ddmng538 minmag -0.001E-383 0 -> 0
  270. ddmng539 minmag -0.0009E-383 0 -> 0
  271. ddmng540 minmag -0.0001E-383 0 -> 0
  272. -- Null tests
  273. ddmng900 minmag 10 # -> NaN Invalid_operation
  274. ddmng901 minmag # 10 -> NaN Invalid_operation