17db96d56Sopenharmony_ci------------------------------------------------------------------------
27db96d56Sopenharmony_ci-- abs.decTest -- decimal absolute value                              --
37db96d56Sopenharmony_ci-- Copyright (c) IBM Corporation, 1981, 2008.  All rights reserved.   --
47db96d56Sopenharmony_ci------------------------------------------------------------------------
57db96d56Sopenharmony_ci-- Please see the document "General Decimal Arithmetic Testcases"     --
67db96d56Sopenharmony_ci-- at http://www2.hursley.ibm.com/decimal for the description of      --
77db96d56Sopenharmony_ci-- these testcases.                                                   --
87db96d56Sopenharmony_ci--                                                                    --
97db96d56Sopenharmony_ci-- These testcases are experimental ('beta' versions), and they       --
107db96d56Sopenharmony_ci-- may contain errors.  They are offered on an as-is basis.  In       --
117db96d56Sopenharmony_ci-- particular, achieving the same results as the tests here is not    --
127db96d56Sopenharmony_ci-- a guarantee that an implementation complies with any Standard      --
137db96d56Sopenharmony_ci-- or specification.  The tests are not exhaustive.                   --
147db96d56Sopenharmony_ci--                                                                    --
157db96d56Sopenharmony_ci-- Please send comments, suggestions, and corrections to the author:  --
167db96d56Sopenharmony_ci--   Mike Cowlishaw, IBM Fellow                                       --
177db96d56Sopenharmony_ci--   IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK         --
187db96d56Sopenharmony_ci--   mfc@uk.ibm.com                                                   --
197db96d56Sopenharmony_ci------------------------------------------------------------------------
207db96d56Sopenharmony_civersion: 2.59
217db96d56Sopenharmony_ci
227db96d56Sopenharmony_ci-- This set of tests primarily tests the existence of the operator.
237db96d56Sopenharmony_ci-- Addition, subtraction, rounding, and more overflows are tested
247db96d56Sopenharmony_ci-- elsewhere.
257db96d56Sopenharmony_ci
267db96d56Sopenharmony_ciprecision:   9
277db96d56Sopenharmony_cirounding:    half_up
287db96d56Sopenharmony_cimaxExponent: 384
297db96d56Sopenharmony_ciminexponent: -383
307db96d56Sopenharmony_ciextended: 1
317db96d56Sopenharmony_ci
327db96d56Sopenharmony_ciabsx001 abs '1'      -> '1'
337db96d56Sopenharmony_ciabsx002 abs '-1'     -> '1'
347db96d56Sopenharmony_ciabsx003 abs '1.00'   -> '1.00'
357db96d56Sopenharmony_ciabsx004 abs '-1.00'  -> '1.00'
367db96d56Sopenharmony_ciabsx005 abs '0'      -> '0'
377db96d56Sopenharmony_ciabsx006 abs '0.00'   -> '0.00'
387db96d56Sopenharmony_ciabsx007 abs '00.0'   -> '0.0'
397db96d56Sopenharmony_ciabsx008 abs '00.00'  -> '0.00'
407db96d56Sopenharmony_ciabsx009 abs '00'     -> '0'
417db96d56Sopenharmony_ci
427db96d56Sopenharmony_ciabsx010 abs '-2'     -> '2'
437db96d56Sopenharmony_ciabsx011 abs '2'      -> '2'
447db96d56Sopenharmony_ciabsx012 abs '-2.00'  -> '2.00'
457db96d56Sopenharmony_ciabsx013 abs '2.00'   -> '2.00'
467db96d56Sopenharmony_ciabsx014 abs '-0'     -> '0'
477db96d56Sopenharmony_ciabsx015 abs '-0.00'  -> '0.00'
487db96d56Sopenharmony_ciabsx016 abs '-00.0'  -> '0.0'
497db96d56Sopenharmony_ciabsx017 abs '-00.00' -> '0.00'
507db96d56Sopenharmony_ciabsx018 abs '-00'    -> '0'
517db96d56Sopenharmony_ci
527db96d56Sopenharmony_ciabsx020 abs '-2000000' -> '2000000'
537db96d56Sopenharmony_ciabsx021 abs '2000000'  -> '2000000'
547db96d56Sopenharmony_ciprecision: 7
557db96d56Sopenharmony_ciabsx022 abs '-2000000' -> '2000000'
567db96d56Sopenharmony_ciabsx023 abs '2000000'  -> '2000000'
577db96d56Sopenharmony_ciprecision: 6
587db96d56Sopenharmony_ciabsx024 abs '-2000000' -> '2.00000E+6' Rounded
597db96d56Sopenharmony_ciabsx025 abs '2000000'  -> '2.00000E+6' Rounded
607db96d56Sopenharmony_ciprecision: 3
617db96d56Sopenharmony_ciabsx026 abs '-2000000' -> '2.00E+6' Rounded
627db96d56Sopenharmony_ciabsx027 abs '2000000'  -> '2.00E+6' Rounded
637db96d56Sopenharmony_ci
647db96d56Sopenharmony_ciabsx030 abs '+0.1'            -> '0.1'
657db96d56Sopenharmony_ciabsx031 abs '-0.1'            -> '0.1'
667db96d56Sopenharmony_ciabsx032 abs '+0.01'           -> '0.01'
677db96d56Sopenharmony_ciabsx033 abs '-0.01'           -> '0.01'
687db96d56Sopenharmony_ciabsx034 abs '+0.001'          -> '0.001'
697db96d56Sopenharmony_ciabsx035 abs '-0.001'          -> '0.001'
707db96d56Sopenharmony_ciabsx036 abs '+0.000001'       -> '0.000001'
717db96d56Sopenharmony_ciabsx037 abs '-0.000001'       -> '0.000001'
727db96d56Sopenharmony_ciabsx038 abs '+0.000000000001' -> '1E-12'
737db96d56Sopenharmony_ciabsx039 abs '-0.000000000001' -> '1E-12'
747db96d56Sopenharmony_ci
757db96d56Sopenharmony_ci-- examples from decArith
767db96d56Sopenharmony_ciprecision: 9
777db96d56Sopenharmony_ciabsx040 abs '2.1'     ->  '2.1'
787db96d56Sopenharmony_ciabsx041 abs '-100'    ->  '100'
797db96d56Sopenharmony_ciabsx042 abs '101.5'   ->  '101.5'
807db96d56Sopenharmony_ciabsx043 abs '-101.5'  ->  '101.5'
817db96d56Sopenharmony_ci
827db96d56Sopenharmony_ci-- more fixed, potential LHS swaps/overlays if done by subtract 0
837db96d56Sopenharmony_ciprecision: 9
847db96d56Sopenharmony_ciabsx060 abs '-56267E-10'  -> '0.0000056267'
857db96d56Sopenharmony_ciabsx061 abs '-56267E-5'   -> '0.56267'
867db96d56Sopenharmony_ciabsx062 abs '-56267E-2'   -> '562.67'
877db96d56Sopenharmony_ciabsx063 abs '-56267E-1'   -> '5626.7'
887db96d56Sopenharmony_ciabsx065 abs '-56267E-0'   -> '56267'
897db96d56Sopenharmony_ci
907db96d56Sopenharmony_ci-- overflow tests
917db96d56Sopenharmony_cimaxexponent: 999999999
927db96d56Sopenharmony_ciminexponent: -999999999
937db96d56Sopenharmony_ciprecision: 3
947db96d56Sopenharmony_ciabsx120 abs 9.999E+999999999 -> Infinity Inexact Overflow Rounded
957db96d56Sopenharmony_ci
967db96d56Sopenharmony_ci-- subnormals and underflow
977db96d56Sopenharmony_ciprecision: 3
987db96d56Sopenharmony_cimaxexponent: 999
997db96d56Sopenharmony_ciminexponent: -999
1007db96d56Sopenharmony_ciabsx210 abs  1.00E-999        ->   1.00E-999
1017db96d56Sopenharmony_ciabsx211 abs  0.1E-999         ->   1E-1000   Subnormal
1027db96d56Sopenharmony_ciabsx212 abs  0.10E-999        ->   1.0E-1000 Subnormal
1037db96d56Sopenharmony_ciabsx213 abs  0.100E-999       ->   1.0E-1000 Subnormal Rounded
1047db96d56Sopenharmony_ciabsx214 abs  0.01E-999        ->   1E-1001   Subnormal
1057db96d56Sopenharmony_ci-- next is rounded to Emin
1067db96d56Sopenharmony_ciabsx215 abs  0.999E-999       ->   1.00E-999 Inexact Rounded Subnormal Underflow
1077db96d56Sopenharmony_ciabsx216 abs  0.099E-999       ->   1.0E-1000 Inexact Rounded Subnormal Underflow
1087db96d56Sopenharmony_ciabsx217 abs  0.009E-999       ->   1E-1001   Inexact Rounded Subnormal Underflow
1097db96d56Sopenharmony_ciabsx218 abs  0.001E-999       ->   0E-1001   Inexact Rounded Subnormal Underflow Clamped
1107db96d56Sopenharmony_ciabsx219 abs  0.0009E-999      ->   0E-1001   Inexact Rounded Subnormal Underflow Clamped
1117db96d56Sopenharmony_ciabsx220 abs  0.0001E-999      ->   0E-1001   Inexact Rounded Subnormal Underflow Clamped
1127db96d56Sopenharmony_ci
1137db96d56Sopenharmony_ciabsx230 abs -1.00E-999        ->   1.00E-999
1147db96d56Sopenharmony_ciabsx231 abs -0.1E-999         ->   1E-1000   Subnormal
1157db96d56Sopenharmony_ciabsx232 abs -0.10E-999        ->   1.0E-1000 Subnormal
1167db96d56Sopenharmony_ciabsx233 abs -0.100E-999       ->   1.0E-1000 Subnormal Rounded
1177db96d56Sopenharmony_ciabsx234 abs -0.01E-999        ->   1E-1001   Subnormal
1187db96d56Sopenharmony_ci-- next is rounded to Emin
1197db96d56Sopenharmony_ciabsx235 abs -0.999E-999       ->   1.00E-999 Inexact Rounded Subnormal Underflow
1207db96d56Sopenharmony_ciabsx236 abs -0.099E-999       ->   1.0E-1000 Inexact Rounded Subnormal Underflow
1217db96d56Sopenharmony_ciabsx237 abs -0.009E-999       ->   1E-1001   Inexact Rounded Subnormal Underflow
1227db96d56Sopenharmony_ciabsx238 abs -0.001E-999       ->   0E-1001   Inexact Rounded Subnormal Underflow Clamped
1237db96d56Sopenharmony_ciabsx239 abs -0.0009E-999      ->   0E-1001   Inexact Rounded Subnormal Underflow Clamped
1247db96d56Sopenharmony_ciabsx240 abs -0.0001E-999      ->   0E-1001   Inexact Rounded Subnormal Underflow Clamped
1257db96d56Sopenharmony_ci
1267db96d56Sopenharmony_ci-- long operand tests
1277db96d56Sopenharmony_cimaxexponent: 999
1287db96d56Sopenharmony_ciminexponent: -999
1297db96d56Sopenharmony_ciprecision: 9
1307db96d56Sopenharmony_ciabsx301 abs 12345678000  -> 1.23456780E+10 Rounded
1317db96d56Sopenharmony_ciabsx302 abs 1234567800   -> 1.23456780E+9 Rounded
1327db96d56Sopenharmony_ciabsx303 abs 1234567890   -> 1.23456789E+9 Rounded
1337db96d56Sopenharmony_ciabsx304 abs 1234567891   -> 1.23456789E+9 Inexact Rounded
1347db96d56Sopenharmony_ciabsx305 abs 12345678901  -> 1.23456789E+10 Inexact Rounded
1357db96d56Sopenharmony_ciabsx306 abs 1234567896   -> 1.23456790E+9 Inexact Rounded
1367db96d56Sopenharmony_ci
1377db96d56Sopenharmony_ciprecision: 15
1387db96d56Sopenharmony_ciabsx321 abs 12345678000  -> 12345678000
1397db96d56Sopenharmony_ciabsx322 abs 1234567800   -> 1234567800
1407db96d56Sopenharmony_ciabsx323 abs 1234567890   -> 1234567890
1417db96d56Sopenharmony_ciabsx324 abs 1234567891   -> 1234567891
1427db96d56Sopenharmony_ciabsx325 abs 12345678901  -> 12345678901
1437db96d56Sopenharmony_ciabsx326 abs 1234567896   -> 1234567896
1447db96d56Sopenharmony_ci
1457db96d56Sopenharmony_ci
1467db96d56Sopenharmony_ci-- Specials
1477db96d56Sopenharmony_ciprecision:   9
1487db96d56Sopenharmony_ci
1497db96d56Sopenharmony_ci-- specials
1507db96d56Sopenharmony_ciabsx520 abs 'Inf'    -> 'Infinity'
1517db96d56Sopenharmony_ciabsx521 abs '-Inf'   -> 'Infinity'
1527db96d56Sopenharmony_ciabsx522 abs   NaN    ->  NaN
1537db96d56Sopenharmony_ciabsx523 abs  sNaN    ->  NaN   Invalid_operation
1547db96d56Sopenharmony_ciabsx524 abs   NaN22  ->  NaN22
1557db96d56Sopenharmony_ciabsx525 abs  sNaN33  ->  NaN33 Invalid_operation
1567db96d56Sopenharmony_ciabsx526 abs  -NaN22  -> -NaN22
1577db96d56Sopenharmony_ciabsx527 abs -sNaN33  -> -NaN33 Invalid_operation
1587db96d56Sopenharmony_ci
1597db96d56Sopenharmony_ci-- Null tests
1607db96d56Sopenharmony_ciabsx900 abs  # -> NaN Invalid_operation
1617db96d56Sopenharmony_ci
162