17db96d56Sopenharmony_ci------------------------------------------------------------------------ 27db96d56Sopenharmony_ci-- dqCopyAbs.decTest -- quiet decQuad copy and set sign to zero -- 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-- All operands and results are decQuads. 237db96d56Sopenharmony_ciextended: 1 247db96d56Sopenharmony_ciclamp: 1 257db96d56Sopenharmony_ciprecision: 34 267db96d56Sopenharmony_cimaxExponent: 6144 277db96d56Sopenharmony_ciminExponent: -6143 287db96d56Sopenharmony_cirounding: half_even 297db96d56Sopenharmony_ci 307db96d56Sopenharmony_ci-- Sanity check 317db96d56Sopenharmony_cidqcpa001 copyabs +7.50 -> 7.50 327db96d56Sopenharmony_ci 337db96d56Sopenharmony_ci-- Infinities 347db96d56Sopenharmony_cidqcpa011 copyabs Infinity -> Infinity 357db96d56Sopenharmony_cidqcpa012 copyabs -Infinity -> Infinity 367db96d56Sopenharmony_ci 377db96d56Sopenharmony_ci-- NaNs, 0 payload 387db96d56Sopenharmony_cidqcpa021 copyabs NaN -> NaN 397db96d56Sopenharmony_cidqcpa022 copyabs -NaN -> NaN 407db96d56Sopenharmony_cidqcpa023 copyabs sNaN -> sNaN 417db96d56Sopenharmony_cidqcpa024 copyabs -sNaN -> sNaN 427db96d56Sopenharmony_ci 437db96d56Sopenharmony_ci-- NaNs, non-0 payload 447db96d56Sopenharmony_cidqcpa031 copyabs NaN10 -> NaN10 457db96d56Sopenharmony_cidqcpa032 copyabs -NaN15 -> NaN15 467db96d56Sopenharmony_cidqcpa033 copyabs sNaN15 -> sNaN15 477db96d56Sopenharmony_cidqcpa034 copyabs -sNaN10 -> sNaN10 487db96d56Sopenharmony_cidqcpa035 copyabs NaN7 -> NaN7 497db96d56Sopenharmony_cidqcpa036 copyabs -NaN7 -> NaN7 507db96d56Sopenharmony_cidqcpa037 copyabs sNaN101 -> sNaN101 517db96d56Sopenharmony_cidqcpa038 copyabs -sNaN101 -> sNaN101 527db96d56Sopenharmony_ci 537db96d56Sopenharmony_ci-- finites 547db96d56Sopenharmony_cidqcpa101 copyabs 7 -> 7 557db96d56Sopenharmony_cidqcpa102 copyabs -7 -> 7 567db96d56Sopenharmony_cidqcpa103 copyabs 75 -> 75 577db96d56Sopenharmony_cidqcpa104 copyabs -75 -> 75 587db96d56Sopenharmony_cidqcpa105 copyabs 7.10 -> 7.10 597db96d56Sopenharmony_cidqcpa106 copyabs -7.10 -> 7.10 607db96d56Sopenharmony_cidqcpa107 copyabs 7.500 -> 7.500 617db96d56Sopenharmony_cidqcpa108 copyabs -7.500 -> 7.500 627db96d56Sopenharmony_ci 637db96d56Sopenharmony_ci-- zeros 647db96d56Sopenharmony_cidqcpa111 copyabs 0 -> 0 657db96d56Sopenharmony_cidqcpa112 copyabs -0 -> 0 667db96d56Sopenharmony_cidqcpa113 copyabs 0E+6 -> 0E+6 677db96d56Sopenharmony_cidqcpa114 copyabs -0E+6 -> 0E+6 687db96d56Sopenharmony_cidqcpa115 copyabs 0.0000 -> 0.0000 697db96d56Sopenharmony_cidqcpa116 copyabs -0.0000 -> 0.0000 707db96d56Sopenharmony_cidqcpa117 copyabs 0E-141 -> 0E-141 717db96d56Sopenharmony_cidqcpa118 copyabs -0E-141 -> 0E-141 727db96d56Sopenharmony_ci 737db96d56Sopenharmony_ci-- full coefficients, alternating bits 747db96d56Sopenharmony_cidqcpa121 copyabs 2682682682682682682682682682682682 -> 2682682682682682682682682682682682 757db96d56Sopenharmony_cidqcpa122 copyabs -2682682682682682682682682682682682 -> 2682682682682682682682682682682682 767db96d56Sopenharmony_cidqcpa123 copyabs 1341341341341341341341341341341341 -> 1341341341341341341341341341341341 777db96d56Sopenharmony_cidqcpa124 copyabs -1341341341341341341341341341341341 -> 1341341341341341341341341341341341 787db96d56Sopenharmony_ci 797db96d56Sopenharmony_ci-- Nmax, Nmin, Ntiny 807db96d56Sopenharmony_cidqcpa131 copyabs 9.999999999999999999999999999999999E+6144 -> 9.999999999999999999999999999999999E+6144 817db96d56Sopenharmony_cidqcpa132 copyabs 1E-6143 -> 1E-6143 827db96d56Sopenharmony_cidqcpa133 copyabs 1.000000000000000000000000000000000E-6143 -> 1.000000000000000000000000000000000E-6143 837db96d56Sopenharmony_cidqcpa134 copyabs 1E-6176 -> 1E-6176 847db96d56Sopenharmony_ci 857db96d56Sopenharmony_cidqcpa135 copyabs -1E-6176 -> 1E-6176 867db96d56Sopenharmony_cidqcpa136 copyabs -1.000000000000000000000000000000000E-6143 -> 1.000000000000000000000000000000000E-6143 877db96d56Sopenharmony_cidqcpa137 copyabs -1E-6143 -> 1E-6143 887db96d56Sopenharmony_cidqcpa138 copyabs -9.999999999999999999999999999999999E+6144 -> 9.999999999999999999999999999999999E+6144 89