• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1------------------------------------------------------------------------
2-- dqAbs.decTest -- decQuad 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------------------------------------------------------------------------
20version: 2.59
21
22extended:    1
23clamp:       1
24precision:   34
25maxExponent: 6144
26minExponent: -6143
27rounding:    half_even
28
29dqabs001 abs '1'      -> '1'
30dqabs002 abs '-1'     -> '1'
31dqabs003 abs '1.00'   -> '1.00'
32dqabs004 abs '-1.00'  -> '1.00'
33dqabs005 abs '0'      -> '0'
34dqabs006 abs '0.00'   -> '0.00'
35dqabs007 abs '00.0'   -> '0.0'
36dqabs008 abs '00.00'  -> '0.00'
37dqabs009 abs '00'     -> '0'
38
39dqabs010 abs '-2'     -> '2'
40dqabs011 abs '2'      -> '2'
41dqabs012 abs '-2.00'  -> '2.00'
42dqabs013 abs '2.00'   -> '2.00'
43dqabs014 abs '-0'     -> '0'
44dqabs015 abs '-0.00'  -> '0.00'
45dqabs016 abs '-00.0'  -> '0.0'
46dqabs017 abs '-00.00' -> '0.00'
47dqabs018 abs '-00'    -> '0'
48
49dqabs020 abs '-2000000' -> '2000000'
50dqabs021 abs '2000000'  -> '2000000'
51
52dqabs030 abs '+0.1'            -> '0.1'
53dqabs031 abs '-0.1'            -> '0.1'
54dqabs032 abs '+0.01'           -> '0.01'
55dqabs033 abs '-0.01'           -> '0.01'
56dqabs034 abs '+0.001'          -> '0.001'
57dqabs035 abs '-0.001'          -> '0.001'
58dqabs036 abs '+0.000001'       -> '0.000001'
59dqabs037 abs '-0.000001'       -> '0.000001'
60dqabs038 abs '+0.000000000001' -> '1E-12'
61dqabs039 abs '-0.000000000001' -> '1E-12'
62
63-- examples from decArith
64dqabs040 abs '2.1'     ->  '2.1'
65dqabs041 abs '-100'    ->  '100'
66dqabs042 abs '101.5'   ->  '101.5'
67dqabs043 abs '-101.5'  ->  '101.5'
68
69-- more fixed, potential LHS swaps/overlays if done by subtract 0
70dqabs060 abs '-56267E-10'  -> '0.0000056267'
71dqabs061 abs '-56267E-5'   -> '0.56267'
72dqabs062 abs '-56267E-2'   -> '562.67'
73dqabs063 abs '-56267E-1'   -> '5626.7'
74dqabs065 abs '-56267E-0'   -> '56267'
75
76-- subnormals and underflow
77
78-- long operand tests
79dqabs321 abs 1234567890123456  -> 1234567890123456
80dqabs322 abs 12345678000  -> 12345678000
81dqabs323 abs 1234567800   -> 1234567800
82dqabs324 abs 1234567890   -> 1234567890
83dqabs325 abs 1234567891   -> 1234567891
84dqabs326 abs 12345678901  -> 12345678901
85dqabs327 abs 1234567896   -> 1234567896
86
87-- zeros
88dqabs111 abs          0   -> 0
89dqabs112 abs         -0   -> 0
90dqabs113 abs       0E+6   -> 0E+6
91dqabs114 abs      -0E+6   -> 0E+6
92dqabs115 abs     0.0000   -> 0.0000
93dqabs116 abs    -0.0000   -> 0.0000
94dqabs117 abs      0E-141  -> 0E-141
95dqabs118 abs     -0E-141  -> 0E-141
96
97-- full coefficients, alternating bits
98dqabs121 abs   2682682682682682682682682682682682    ->  2682682682682682682682682682682682
99dqabs122 abs  -2682682682682682682682682682682682    ->  2682682682682682682682682682682682
100dqabs123 abs   1341341341341341341341341341341341    ->  1341341341341341341341341341341341
101dqabs124 abs  -1341341341341341341341341341341341    ->  1341341341341341341341341341341341
102
103-- Nmax, Nmin, Ntiny
104dqabs131 abs  9.999999999999999999999999999999999E+6144   ->  9.999999999999999999999999999999999E+6144
105dqabs132 abs  1E-6143                                     ->  1E-6143
106dqabs133 abs  1.000000000000000000000000000000000E-6143   ->  1.000000000000000000000000000000000E-6143
107dqabs134 abs  1E-6176                                     ->  1E-6176 Subnormal
108
109dqabs135 abs  -1E-6176                                    ->  1E-6176 Subnormal
110dqabs136 abs  -1.000000000000000000000000000000000E-6143  ->  1.000000000000000000000000000000000E-6143
111dqabs137 abs  -1E-6143                                    ->  1E-6143
112dqabs138 abs  -9.999999999999999999999999999999999E+6144  ->  9.999999999999999999999999999999999E+6144
113
114-- specials
115dqabs520 abs 'Inf'    -> 'Infinity'
116dqabs521 abs '-Inf'   -> 'Infinity'
117dqabs522 abs   NaN    ->  NaN
118dqabs523 abs  sNaN    ->  NaN   Invalid_operation
119dqabs524 abs   NaN22  ->  NaN22
120dqabs525 abs  sNaN33  ->  NaN33 Invalid_operation
121dqabs526 abs  -NaN22  -> -NaN22
122dqabs527 abs -sNaN33  -> -NaN33 Invalid_operation
123
124-- Null tests
125dqabs900 abs  # -> NaN Invalid_operation
126
127