ddAbs.decTest 4.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126
  1. ------------------------------------------------------------------------
  2. -- ddAbs.decTest -- decDouble absolute value, heeding sNaN --
  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. precision: 16
  22. maxExponent: 384
  23. minExponent: -383
  24. extended: 1
  25. clamp: 1
  26. rounding: half_even
  27. ddabs001 abs '1' -> '1'
  28. ddabs002 abs '-1' -> '1'
  29. ddabs003 abs '1.00' -> '1.00'
  30. ddabs004 abs '-1.00' -> '1.00'
  31. ddabs005 abs '0' -> '0'
  32. ddabs006 abs '0.00' -> '0.00'
  33. ddabs007 abs '00.0' -> '0.0'
  34. ddabs008 abs '00.00' -> '0.00'
  35. ddabs009 abs '00' -> '0'
  36. ddabs010 abs '-2' -> '2'
  37. ddabs011 abs '2' -> '2'
  38. ddabs012 abs '-2.00' -> '2.00'
  39. ddabs013 abs '2.00' -> '2.00'
  40. ddabs014 abs '-0' -> '0'
  41. ddabs015 abs '-0.00' -> '0.00'
  42. ddabs016 abs '-00.0' -> '0.0'
  43. ddabs017 abs '-00.00' -> '0.00'
  44. ddabs018 abs '-00' -> '0'
  45. ddabs020 abs '-2000000' -> '2000000'
  46. ddabs021 abs '2000000' -> '2000000'
  47. ddabs030 abs '+0.1' -> '0.1'
  48. ddabs031 abs '-0.1' -> '0.1'
  49. ddabs032 abs '+0.01' -> '0.01'
  50. ddabs033 abs '-0.01' -> '0.01'
  51. ddabs034 abs '+0.001' -> '0.001'
  52. ddabs035 abs '-0.001' -> '0.001'
  53. ddabs036 abs '+0.000001' -> '0.000001'
  54. ddabs037 abs '-0.000001' -> '0.000001'
  55. ddabs038 abs '+0.000000000001' -> '1E-12'
  56. ddabs039 abs '-0.000000000001' -> '1E-12'
  57. -- examples from decArith
  58. ddabs040 abs '2.1' -> '2.1'
  59. ddabs041 abs '-100' -> '100'
  60. ddabs042 abs '101.5' -> '101.5'
  61. ddabs043 abs '-101.5' -> '101.5'
  62. -- more fixed, potential LHS swaps/overlays if done by subtract 0
  63. ddabs060 abs '-56267E-10' -> '0.0000056267'
  64. ddabs061 abs '-56267E-5' -> '0.56267'
  65. ddabs062 abs '-56267E-2' -> '562.67'
  66. ddabs063 abs '-56267E-1' -> '5626.7'
  67. ddabs065 abs '-56267E-0' -> '56267'
  68. -- subnormals and underflow
  69. -- long operand tests
  70. ddabs321 abs 1234567890123456 -> 1234567890123456
  71. ddabs322 abs 12345678000 -> 12345678000
  72. ddabs323 abs 1234567800 -> 1234567800
  73. ddabs324 abs 1234567890 -> 1234567890
  74. ddabs325 abs 1234567891 -> 1234567891
  75. ddabs326 abs 12345678901 -> 12345678901
  76. ddabs327 abs 1234567896 -> 1234567896
  77. -- zeros
  78. ddabs111 abs 0 -> 0
  79. ddabs112 abs -0 -> 0
  80. ddabs113 abs 0E+6 -> 0E+6
  81. ddabs114 abs -0E+6 -> 0E+6
  82. ddabs115 abs 0.0000 -> 0.0000
  83. ddabs116 abs -0.0000 -> 0.0000
  84. ddabs117 abs 0E-141 -> 0E-141
  85. ddabs118 abs -0E-141 -> 0E-141
  86. -- full coefficients, alternating bits
  87. ddabs121 abs 2682682682682682 -> 2682682682682682
  88. ddabs122 abs -2682682682682682 -> 2682682682682682
  89. ddabs123 abs 1341341341341341 -> 1341341341341341
  90. ddabs124 abs -1341341341341341 -> 1341341341341341
  91. -- Nmax, Nmin, Ntiny
  92. ddabs131 abs 9.999999999999999E+384 -> 9.999999999999999E+384
  93. ddabs132 abs 1E-383 -> 1E-383
  94. ddabs133 abs 1.000000000000000E-383 -> 1.000000000000000E-383
  95. ddabs134 abs 1E-398 -> 1E-398 Subnormal
  96. ddabs135 abs -1E-398 -> 1E-398 Subnormal
  97. ddabs136 abs -1.000000000000000E-383 -> 1.000000000000000E-383
  98. ddabs137 abs -1E-383 -> 1E-383
  99. ddabs138 abs -9.999999999999999E+384 -> 9.999999999999999E+384
  100. -- specials
  101. ddabs520 abs 'Inf' -> 'Infinity'
  102. ddabs521 abs '-Inf' -> 'Infinity'
  103. ddabs522 abs NaN -> NaN
  104. ddabs523 abs sNaN -> NaN Invalid_operation
  105. ddabs524 abs NaN22 -> NaN22
  106. ddabs525 abs sNaN33 -> NaN33 Invalid_operation
  107. ddabs526 abs -NaN22 -> -NaN22
  108. ddabs527 abs -sNaN33 -> -NaN33 Invalid_operation
  109. -- Null tests
  110. ddabs900 abs # -> NaN Invalid_operation