17db96d56Sopenharmony_ci------------------------------------------------------------------------
27db96d56Sopenharmony_ci-- ddCopy.decTest -- quiet decDouble copy                             --
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 decDoubles.
237db96d56Sopenharmony_ciprecision:   16
247db96d56Sopenharmony_cimaxExponent: 384
257db96d56Sopenharmony_ciminExponent: -383
267db96d56Sopenharmony_ciextended:    1
277db96d56Sopenharmony_ciclamp:       1
287db96d56Sopenharmony_cirounding:    half_even
297db96d56Sopenharmony_ci
307db96d56Sopenharmony_ci-- Sanity check
317db96d56Sopenharmony_ciddcpy001 copy       +7.50  -> 7.50
327db96d56Sopenharmony_ci
337db96d56Sopenharmony_ci-- Infinities
347db96d56Sopenharmony_ciddcpy011 copy  Infinity    -> Infinity
357db96d56Sopenharmony_ciddcpy012 copy  -Infinity   -> -Infinity
367db96d56Sopenharmony_ci
377db96d56Sopenharmony_ci-- NaNs, 0 payload
387db96d56Sopenharmony_ciddcpy021 copy         NaN  -> NaN
397db96d56Sopenharmony_ciddcpy022 copy        -NaN  -> -NaN
407db96d56Sopenharmony_ciddcpy023 copy        sNaN  -> sNaN
417db96d56Sopenharmony_ciddcpy024 copy       -sNaN  -> -sNaN
427db96d56Sopenharmony_ci
437db96d56Sopenharmony_ci-- NaNs, non-0 payload
447db96d56Sopenharmony_ciddcpy031 copy       NaN10  -> NaN10
457db96d56Sopenharmony_ciddcpy032 copy      -NaN10  -> -NaN10
467db96d56Sopenharmony_ciddcpy033 copy      sNaN10  -> sNaN10
477db96d56Sopenharmony_ciddcpy034 copy     -sNaN10  -> -sNaN10
487db96d56Sopenharmony_ciddcpy035 copy       NaN7   -> NaN7
497db96d56Sopenharmony_ciddcpy036 copy      -NaN7   -> -NaN7
507db96d56Sopenharmony_ciddcpy037 copy      sNaN101 -> sNaN101
517db96d56Sopenharmony_ciddcpy038 copy     -sNaN101 -> -sNaN101
527db96d56Sopenharmony_ci
537db96d56Sopenharmony_ci-- finites
547db96d56Sopenharmony_ciddcpy101 copy          7   -> 7
557db96d56Sopenharmony_ciddcpy102 copy         -7   -> -7
567db96d56Sopenharmony_ciddcpy103 copy         75   -> 75
577db96d56Sopenharmony_ciddcpy104 copy        -75   -> -75
587db96d56Sopenharmony_ciddcpy105 copy       7.50   -> 7.50
597db96d56Sopenharmony_ciddcpy106 copy      -7.50   -> -7.50
607db96d56Sopenharmony_ciddcpy107 copy       7.500  -> 7.500
617db96d56Sopenharmony_ciddcpy108 copy      -7.500  -> -7.500
627db96d56Sopenharmony_ci
637db96d56Sopenharmony_ci-- zeros
647db96d56Sopenharmony_ciddcpy111 copy          0   -> 0
657db96d56Sopenharmony_ciddcpy112 copy         -0   -> -0
667db96d56Sopenharmony_ciddcpy113 copy       0E+4   -> 0E+4
677db96d56Sopenharmony_ciddcpy114 copy      -0E+4   -> -0E+4
687db96d56Sopenharmony_ciddcpy115 copy     0.0000   -> 0.0000
697db96d56Sopenharmony_ciddcpy116 copy    -0.0000   -> -0.0000
707db96d56Sopenharmony_ciddcpy117 copy      0E-141  -> 0E-141
717db96d56Sopenharmony_ciddcpy118 copy     -0E-141  -> -0E-141
727db96d56Sopenharmony_ci
737db96d56Sopenharmony_ci-- full coefficients, alternating bits
747db96d56Sopenharmony_ciddcpy121 copy  2682682682682682         -> 2682682682682682
757db96d56Sopenharmony_ciddcpy122 copy  -2682682682682682        -> -2682682682682682
767db96d56Sopenharmony_ciddcpy123 copy  1341341341341341         -> 1341341341341341
777db96d56Sopenharmony_ciddcpy124 copy  -1341341341341341        -> -1341341341341341
787db96d56Sopenharmony_ci
797db96d56Sopenharmony_ci-- Nmax, Nmin, Ntiny
807db96d56Sopenharmony_ciddcpy131 copy  9.999999999999999E+384   -> 9.999999999999999E+384
817db96d56Sopenharmony_ciddcpy132 copy  1E-383                   -> 1E-383
827db96d56Sopenharmony_ciddcpy133 copy  1.000000000000000E-383   -> 1.000000000000000E-383
837db96d56Sopenharmony_ciddcpy134 copy  1E-398                   -> 1E-398
847db96d56Sopenharmony_ci
857db96d56Sopenharmony_ciddcpy135 copy  -1E-398                  -> -1E-398
867db96d56Sopenharmony_ciddcpy136 copy  -1.000000000000000E-383  -> -1.000000000000000E-383
877db96d56Sopenharmony_ciddcpy137 copy  -1E-383                  -> -1E-383
887db96d56Sopenharmony_ciddcpy138 copy  -9.999999999999999E+384  -> -9.999999999999999E+384
89