dqShift.decTest 19 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298
  1. ------------------------------------------------------------------------
  2. -- dqShift.decTest -- shift decQuad coefficient left or right --
  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. extended: 1
  22. clamp: 1
  23. precision: 34
  24. maxExponent: 6144
  25. minExponent: -6143
  26. rounding: half_even
  27. -- Sanity check
  28. dqshi001 shift 0 0 -> 0
  29. dqshi002 shift 0 2 -> 0
  30. dqshi003 shift 1 2 -> 100
  31. dqshi004 shift 1 33 -> 1000000000000000000000000000000000
  32. dqshi005 shift 1 34 -> 0
  33. dqshi006 shift 1 -1 -> 0
  34. dqshi007 shift 0 -2 -> 0
  35. dqshi008 shift 1234567890123456789012345678901234 -1 -> 123456789012345678901234567890123
  36. dqshi009 shift 1234567890123456789012345678901234 -33 -> 1
  37. dqshi010 shift 1234567890123456789012345678901234 -34 -> 0
  38. dqshi011 shift 9934567890123456789012345678901234 -33 -> 9
  39. dqshi012 shift 9934567890123456789012345678901234 -34 -> 0
  40. -- rhs must be an integer
  41. dqshi015 shift 1 1.5 -> NaN Invalid_operation
  42. dqshi016 shift 1 1.0 -> NaN Invalid_operation
  43. dqshi017 shift 1 0.1 -> NaN Invalid_operation
  44. dqshi018 shift 1 0.0 -> NaN Invalid_operation
  45. dqshi019 shift 1 1E+1 -> NaN Invalid_operation
  46. dqshi020 shift 1 1E+99 -> NaN Invalid_operation
  47. dqshi021 shift 1 Inf -> NaN Invalid_operation
  48. dqshi022 shift 1 -Inf -> NaN Invalid_operation
  49. -- and |rhs| <= precision
  50. dqshi025 shift 1 -1000 -> NaN Invalid_operation
  51. dqshi026 shift 1 -35 -> NaN Invalid_operation
  52. dqshi027 shift 1 35 -> NaN Invalid_operation
  53. dqshi028 shift 1 1000 -> NaN Invalid_operation
  54. -- full shifting pattern
  55. dqshi030 shift 1234567890123456789012345678901234 -34 -> 0
  56. dqshi031 shift 1234567890123456789012345678901234 -33 -> 1
  57. dqshi032 shift 1234567890123456789012345678901234 -32 -> 12
  58. dqshi033 shift 1234567890123456789012345678901234 -31 -> 123
  59. dqshi034 shift 1234567890123456789012345678901234 -30 -> 1234
  60. dqshi035 shift 1234567890123456789012345678901234 -29 -> 12345
  61. dqshi036 shift 1234567890123456789012345678901234 -28 -> 123456
  62. dqshi037 shift 1234567890123456789012345678901234 -27 -> 1234567
  63. dqshi038 shift 1234567890123456789012345678901234 -26 -> 12345678
  64. dqshi039 shift 1234567890123456789012345678901234 -25 -> 123456789
  65. dqshi040 shift 1234567890123456789012345678901234 -24 -> 1234567890
  66. dqshi041 shift 1234567890123456789012345678901234 -23 -> 12345678901
  67. dqshi042 shift 1234567890123456789012345678901234 -22 -> 123456789012
  68. dqshi043 shift 1234567890123456789012345678901234 -21 -> 1234567890123
  69. dqshi044 shift 1234567890123456789012345678901234 -20 -> 12345678901234
  70. dqshi045 shift 1234567890123456789012345678901234 -19 -> 123456789012345
  71. dqshi047 shift 1234567890123456789012345678901234 -18 -> 1234567890123456
  72. dqshi048 shift 1234567890123456789012345678901234 -17 -> 12345678901234567
  73. dqshi049 shift 1234567890123456789012345678901234 -16 -> 123456789012345678
  74. dqshi050 shift 1234567890123456789012345678901234 -15 -> 1234567890123456789
  75. dqshi051 shift 1234567890123456789012345678901234 -14 -> 12345678901234567890
  76. dqshi052 shift 1234567890123456789012345678901234 -13 -> 123456789012345678901
  77. dqshi053 shift 1234567890123456789012345678901234 -12 -> 1234567890123456789012
  78. dqshi054 shift 1234567890123456789012345678901234 -11 -> 12345678901234567890123
  79. dqshi055 shift 1234567890123456789012345678901234 -10 -> 123456789012345678901234
  80. dqshi056 shift 1234567890123456789012345678901234 -9 -> 1234567890123456789012345
  81. dqshi057 shift 1234567890123456789012345678901234 -8 -> 12345678901234567890123456
  82. dqshi058 shift 1234567890123456789012345678901234 -7 -> 123456789012345678901234567
  83. dqshi059 shift 1234567890123456789012345678901234 -6 -> 1234567890123456789012345678
  84. dqshi060 shift 1234567890123456789012345678901234 -5 -> 12345678901234567890123456789
  85. dqshi061 shift 1234567890123456789012345678901234 -4 -> 123456789012345678901234567890
  86. dqshi062 shift 1234567890123456789012345678901234 -3 -> 1234567890123456789012345678901
  87. dqshi063 shift 1234567890123456789012345678901234 -2 -> 12345678901234567890123456789012
  88. dqshi064 shift 1234567890123456789012345678901234 -1 -> 123456789012345678901234567890123
  89. dqshi065 shift 1234567890123456789012345678901234 -0 -> 1234567890123456789012345678901234
  90. dqshi066 shift 1234567890123456789012345678901234 +0 -> 1234567890123456789012345678901234
  91. dqshi067 shift 1234567890123456789012345678901234 +1 -> 2345678901234567890123456789012340
  92. dqshi068 shift 1234567890123456789012345678901234 +2 -> 3456789012345678901234567890123400
  93. dqshi069 shift 1234567890123456789012345678901234 +3 -> 4567890123456789012345678901234000
  94. dqshi070 shift 1234567890123456789012345678901234 +4 -> 5678901234567890123456789012340000
  95. dqshi071 shift 1234567890123456789012345678901234 +5 -> 6789012345678901234567890123400000
  96. dqshi072 shift 1234567890123456789012345678901234 +6 -> 7890123456789012345678901234000000
  97. dqshi073 shift 1234567890123456789012345678901234 +7 -> 8901234567890123456789012340000000
  98. dqshi074 shift 1234567890123456789012345678901234 +8 -> 9012345678901234567890123400000000
  99. dqshi075 shift 1234567890123456789012345678901234 +9 -> 123456789012345678901234000000000
  100. dqshi076 shift 1234567890123456789012345678901234 +10 -> 1234567890123456789012340000000000
  101. dqshi077 shift 1234567890123456789012345678901234 +11 -> 2345678901234567890123400000000000
  102. dqshi078 shift 1234567890123456789012345678901234 +12 -> 3456789012345678901234000000000000
  103. dqshi079 shift 1234567890123456789012345678901234 +13 -> 4567890123456789012340000000000000
  104. dqshi080 shift 1234567890123456789012345678901234 +14 -> 5678901234567890123400000000000000
  105. dqshi081 shift 1234567890123456789012345678901234 +15 -> 6789012345678901234000000000000000
  106. dqshi082 shift 1234567890123456789012345678901234 +16 -> 7890123456789012340000000000000000
  107. dqshi083 shift 1234567890123456789012345678901234 +17 -> 8901234567890123400000000000000000
  108. dqshi084 shift 1234567890123456789012345678901234 +18 -> 9012345678901234000000000000000000
  109. dqshi085 shift 1234567890123456789012345678901234 +19 -> 123456789012340000000000000000000
  110. dqshi086 shift 1234567890123456789012345678901234 +20 -> 1234567890123400000000000000000000
  111. dqshi087 shift 1234567890123456789012345678901234 +21 -> 2345678901234000000000000000000000
  112. dqshi088 shift 1234567890123456789012345678901234 +22 -> 3456789012340000000000000000000000
  113. dqshi089 shift 1234567890123456789012345678901234 +23 -> 4567890123400000000000000000000000
  114. dqshi090 shift 1234567890123456789012345678901234 +24 -> 5678901234000000000000000000000000
  115. dqshi091 shift 1234567890123456789012345678901234 +25 -> 6789012340000000000000000000000000
  116. dqshi092 shift 1234567890123456789012345678901234 +26 -> 7890123400000000000000000000000000
  117. dqshi093 shift 1234567890123456789012345678901234 +27 -> 8901234000000000000000000000000000
  118. dqshi094 shift 1234567890123456789012345678901234 +28 -> 9012340000000000000000000000000000
  119. dqshi095 shift 1234567890123456789012345678901234 +29 -> 123400000000000000000000000000000
  120. dqshi096 shift 1234567890123456789012345678901234 +30 -> 1234000000000000000000000000000000
  121. dqshi097 shift 1234567890123456789012345678901234 +31 -> 2340000000000000000000000000000000
  122. dqshi098 shift 1234567890123456789012345678901234 +32 -> 3400000000000000000000000000000000
  123. dqshi099 shift 1234567890123456789012345678901234 +33 -> 4000000000000000000000000000000000
  124. dqshi100 shift 1234567890123456789012345678901234 +34 -> 0
  125. -- zeros
  126. dqshi270 shift 0E-10 +29 -> 0E-10
  127. dqshi271 shift 0E-10 -29 -> 0E-10
  128. dqshi272 shift 0.000 +29 -> 0.000
  129. dqshi273 shift 0.000 -29 -> 0.000
  130. dqshi274 shift 0E+10 +29 -> 0E+10
  131. dqshi275 shift 0E+10 -29 -> 0E+10
  132. dqshi276 shift -0E-10 +29 -> -0E-10
  133. dqshi277 shift -0E-10 -29 -> -0E-10
  134. dqshi278 shift -0.000 +29 -> -0.000
  135. dqshi279 shift -0.000 -29 -> -0.000
  136. dqshi280 shift -0E+10 +29 -> -0E+10
  137. dqshi281 shift -0E+10 -29 -> -0E+10
  138. -- Nmax, Nmin, Ntiny
  139. dqshi141 shift 9.999999999999999999999999999999999E+6144 -1 -> 9.99999999999999999999999999999999E+6143
  140. dqshi142 shift 9.999999999999999999999999999999999E+6144 -33 -> 9E+6111
  141. dqshi143 shift 9.999999999999999999999999999999999E+6144 1 -> 9.999999999999999999999999999999990E+6144
  142. dqshi144 shift 9.999999999999999999999999999999999E+6144 33 -> 9.000000000000000000000000000000000E+6144
  143. dqshi145 shift 1E-6143 -1 -> 0E-6143
  144. dqshi146 shift 1E-6143 -33 -> 0E-6143
  145. dqshi147 shift 1E-6143 1 -> 1.0E-6142
  146. dqshi148 shift 1E-6143 33 -> 1.000000000000000000000000000000000E-6110
  147. dqshi151 shift 1.000000000000000000000000000000000E-6143 -1 -> 1.00000000000000000000000000000000E-6144
  148. dqshi152 shift 1.000000000000000000000000000000000E-6143 -33 -> 1E-6176
  149. dqshi153 shift 1.000000000000000000000000000000000E-6143 1 -> 0E-6176
  150. dqshi154 shift 1.000000000000000000000000000000000E-6143 33 -> 0E-6176
  151. dqshi155 shift 9.000000000000000000000000000000000E-6143 -1 -> 9.00000000000000000000000000000000E-6144
  152. dqshi156 shift 9.000000000000000000000000000000000E-6143 -33 -> 9E-6176
  153. dqshi157 shift 9.000000000000000000000000000000000E-6143 1 -> 0E-6176
  154. dqshi158 shift 9.000000000000000000000000000000000E-6143 33 -> 0E-6176
  155. dqshi160 shift 1E-6176 -1 -> 0E-6176
  156. dqshi161 shift 1E-6176 -33 -> 0E-6176
  157. dqshi162 shift 1E-6176 1 -> 1.0E-6175
  158. dqshi163 shift 1E-6176 33 -> 1.000000000000000000000000000000000E-6143
  159. -- negatives
  160. dqshi171 shift -9.999999999999999999999999999999999E+6144 -1 -> -9.99999999999999999999999999999999E+6143
  161. dqshi172 shift -9.999999999999999999999999999999999E+6144 -33 -> -9E+6111
  162. dqshi173 shift -9.999999999999999999999999999999999E+6144 1 -> -9.999999999999999999999999999999990E+6144
  163. dqshi174 shift -9.999999999999999999999999999999999E+6144 33 -> -9.000000000000000000000000000000000E+6144
  164. dqshi175 shift -1E-6143 -1 -> -0E-6143
  165. dqshi176 shift -1E-6143 -33 -> -0E-6143
  166. dqshi177 shift -1E-6143 1 -> -1.0E-6142
  167. dqshi178 shift -1E-6143 33 -> -1.000000000000000000000000000000000E-6110
  168. dqshi181 shift -1.000000000000000000000000000000000E-6143 -1 -> -1.00000000000000000000000000000000E-6144
  169. dqshi182 shift -1.000000000000000000000000000000000E-6143 -33 -> -1E-6176
  170. dqshi183 shift -1.000000000000000000000000000000000E-6143 1 -> -0E-6176
  171. dqshi184 shift -1.000000000000000000000000000000000E-6143 33 -> -0E-6176
  172. dqshi185 shift -9.000000000000000000000000000000000E-6143 -1 -> -9.00000000000000000000000000000000E-6144
  173. dqshi186 shift -9.000000000000000000000000000000000E-6143 -33 -> -9E-6176
  174. dqshi187 shift -9.000000000000000000000000000000000E-6143 1 -> -0E-6176
  175. dqshi188 shift -9.000000000000000000000000000000000E-6143 33 -> -0E-6176
  176. dqshi190 shift -1E-6176 -1 -> -0E-6176
  177. dqshi191 shift -1E-6176 -33 -> -0E-6176
  178. dqshi192 shift -1E-6176 1 -> -1.0E-6175
  179. dqshi193 shift -1E-6176 33 -> -1.000000000000000000000000000000000E-6143
  180. -- more negatives (of sanities)
  181. dqshi201 shift -0 0 -> -0
  182. dqshi202 shift -0 2 -> -0
  183. dqshi203 shift -1 2 -> -100
  184. dqshi204 shift -1 33 -> -1000000000000000000000000000000000
  185. dqshi205 shift -1 34 -> -0
  186. dqshi206 shift -1 -1 -> -0
  187. dqshi207 shift -0 -2 -> -0
  188. dqshi208 shift -1234567890123456789012345678901234 -1 -> -123456789012345678901234567890123
  189. dqshi209 shift -1234567890123456789012345678901234 -33 -> -1
  190. dqshi210 shift -1234567890123456789012345678901234 -34 -> -0
  191. dqshi211 shift -9934567890123456789012345678901234 -33 -> -9
  192. dqshi212 shift -9934567890123456789012345678901234 -34 -> -0
  193. -- Specials; NaNs are handled as usual
  194. dqshi781 shift -Inf -8 -> -Infinity
  195. dqshi782 shift -Inf -1 -> -Infinity
  196. dqshi783 shift -Inf -0 -> -Infinity
  197. dqshi784 shift -Inf 0 -> -Infinity
  198. dqshi785 shift -Inf 1 -> -Infinity
  199. dqshi786 shift -Inf 8 -> -Infinity
  200. dqshi787 shift -1000 -Inf -> NaN Invalid_operation
  201. dqshi788 shift -Inf -Inf -> NaN Invalid_operation
  202. dqshi789 shift -1 -Inf -> NaN Invalid_operation
  203. dqshi790 shift -0 -Inf -> NaN Invalid_operation
  204. dqshi791 shift 0 -Inf -> NaN Invalid_operation
  205. dqshi792 shift 1 -Inf -> NaN Invalid_operation
  206. dqshi793 shift 1000 -Inf -> NaN Invalid_operation
  207. dqshi794 shift Inf -Inf -> NaN Invalid_operation
  208. dqshi800 shift Inf -Inf -> NaN Invalid_operation
  209. dqshi801 shift Inf -8 -> Infinity
  210. dqshi802 shift Inf -1 -> Infinity
  211. dqshi803 shift Inf -0 -> Infinity
  212. dqshi804 shift Inf 0 -> Infinity
  213. dqshi805 shift Inf 1 -> Infinity
  214. dqshi806 shift Inf 8 -> Infinity
  215. dqshi807 shift Inf Inf -> NaN Invalid_operation
  216. dqshi808 shift -1000 Inf -> NaN Invalid_operation
  217. dqshi809 shift -Inf Inf -> NaN Invalid_operation
  218. dqshi810 shift -1 Inf -> NaN Invalid_operation
  219. dqshi811 shift -0 Inf -> NaN Invalid_operation
  220. dqshi812 shift 0 Inf -> NaN Invalid_operation
  221. dqshi813 shift 1 Inf -> NaN Invalid_operation
  222. dqshi814 shift 1000 Inf -> NaN Invalid_operation
  223. dqshi815 shift Inf Inf -> NaN Invalid_operation
  224. dqshi821 shift NaN -Inf -> NaN
  225. dqshi822 shift NaN -1000 -> NaN
  226. dqshi823 shift NaN -1 -> NaN
  227. dqshi824 shift NaN -0 -> NaN
  228. dqshi825 shift NaN 0 -> NaN
  229. dqshi826 shift NaN 1 -> NaN
  230. dqshi827 shift NaN 1000 -> NaN
  231. dqshi828 shift NaN Inf -> NaN
  232. dqshi829 shift NaN NaN -> NaN
  233. dqshi830 shift -Inf NaN -> NaN
  234. dqshi831 shift -1000 NaN -> NaN
  235. dqshi832 shift -1 NaN -> NaN
  236. dqshi833 shift -0 NaN -> NaN
  237. dqshi834 shift 0 NaN -> NaN
  238. dqshi835 shift 1 NaN -> NaN
  239. dqshi836 shift 1000 NaN -> NaN
  240. dqshi837 shift Inf NaN -> NaN
  241. dqshi841 shift sNaN -Inf -> NaN Invalid_operation
  242. dqshi842 shift sNaN -1000 -> NaN Invalid_operation
  243. dqshi843 shift sNaN -1 -> NaN Invalid_operation
  244. dqshi844 shift sNaN -0 -> NaN Invalid_operation
  245. dqshi845 shift sNaN 0 -> NaN Invalid_operation
  246. dqshi846 shift sNaN 1 -> NaN Invalid_operation
  247. dqshi847 shift sNaN 1000 -> NaN Invalid_operation
  248. dqshi848 shift sNaN NaN -> NaN Invalid_operation
  249. dqshi849 shift sNaN sNaN -> NaN Invalid_operation
  250. dqshi850 shift NaN sNaN -> NaN Invalid_operation
  251. dqshi851 shift -Inf sNaN -> NaN Invalid_operation
  252. dqshi852 shift -1000 sNaN -> NaN Invalid_operation
  253. dqshi853 shift -1 sNaN -> NaN Invalid_operation
  254. dqshi854 shift -0 sNaN -> NaN Invalid_operation
  255. dqshi855 shift 0 sNaN -> NaN Invalid_operation
  256. dqshi856 shift 1 sNaN -> NaN Invalid_operation
  257. dqshi857 shift 1000 sNaN -> NaN Invalid_operation
  258. dqshi858 shift Inf sNaN -> NaN Invalid_operation
  259. dqshi859 shift NaN sNaN -> NaN Invalid_operation
  260. -- propagating NaNs
  261. dqshi861 shift NaN1 -Inf -> NaN1
  262. dqshi862 shift +NaN2 -1000 -> NaN2
  263. dqshi863 shift NaN3 1000 -> NaN3
  264. dqshi864 shift NaN4 Inf -> NaN4
  265. dqshi865 shift NaN5 +NaN6 -> NaN5
  266. dqshi866 shift -Inf NaN7 -> NaN7
  267. dqshi867 shift -1000 NaN8 -> NaN8
  268. dqshi868 shift 1000 NaN9 -> NaN9
  269. dqshi869 shift Inf +NaN10 -> NaN10
  270. dqshi871 shift sNaN11 -Inf -> NaN11 Invalid_operation
  271. dqshi872 shift sNaN12 -1000 -> NaN12 Invalid_operation
  272. dqshi873 shift sNaN13 1000 -> NaN13 Invalid_operation
  273. dqshi874 shift sNaN14 NaN17 -> NaN14 Invalid_operation
  274. dqshi875 shift sNaN15 sNaN18 -> NaN15 Invalid_operation
  275. dqshi876 shift NaN16 sNaN19 -> NaN19 Invalid_operation
  276. dqshi877 shift -Inf +sNaN20 -> NaN20 Invalid_operation
  277. dqshi878 shift -1000 sNaN21 -> NaN21 Invalid_operation
  278. dqshi879 shift 1000 sNaN22 -> NaN22 Invalid_operation
  279. dqshi880 shift Inf sNaN23 -> NaN23 Invalid_operation
  280. dqshi881 shift +NaN25 +sNaN24 -> NaN24 Invalid_operation
  281. dqshi882 shift -NaN26 NaN28 -> -NaN26
  282. dqshi883 shift -sNaN27 sNaN29 -> -NaN27 Invalid_operation
  283. dqshi884 shift 1000 -NaN30 -> -NaN30
  284. dqshi885 shift 1000 -sNaN31 -> -NaN31 Invalid_operation