17db96d56Sopenharmony_ci------------------------------------------------------------------------ 27db96d56Sopenharmony_ci-- ddCopyNegate.decTest -- quiet decDouble copy and negate -- 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_ciddcpn001 copynegate +7.50 -> -7.50 327db96d56Sopenharmony_ci 337db96d56Sopenharmony_ci-- Infinities 347db96d56Sopenharmony_ciddcpn011 copynegate Infinity -> -Infinity 357db96d56Sopenharmony_ciddcpn012 copynegate -Infinity -> Infinity 367db96d56Sopenharmony_ci 377db96d56Sopenharmony_ci-- NaNs, 0 payload 387db96d56Sopenharmony_ciddcpn021 copynegate NaN -> -NaN 397db96d56Sopenharmony_ciddcpn022 copynegate -NaN -> NaN 407db96d56Sopenharmony_ciddcpn023 copynegate sNaN -> -sNaN 417db96d56Sopenharmony_ciddcpn024 copynegate -sNaN -> sNaN 427db96d56Sopenharmony_ci 437db96d56Sopenharmony_ci-- NaNs, non-0 payload 447db96d56Sopenharmony_ciddcpn031 copynegate NaN13 -> -NaN13 457db96d56Sopenharmony_ciddcpn032 copynegate -NaN13 -> NaN13 467db96d56Sopenharmony_ciddcpn033 copynegate sNaN13 -> -sNaN13 477db96d56Sopenharmony_ciddcpn034 copynegate -sNaN13 -> sNaN13 487db96d56Sopenharmony_ciddcpn035 copynegate NaN70 -> -NaN70 497db96d56Sopenharmony_ciddcpn036 copynegate -NaN70 -> NaN70 507db96d56Sopenharmony_ciddcpn037 copynegate sNaN101 -> -sNaN101 517db96d56Sopenharmony_ciddcpn038 copynegate -sNaN101 -> sNaN101 527db96d56Sopenharmony_ci 537db96d56Sopenharmony_ci-- finites 547db96d56Sopenharmony_ciddcpn101 copynegate 7 -> -7 557db96d56Sopenharmony_ciddcpn102 copynegate -7 -> 7 567db96d56Sopenharmony_ciddcpn103 copynegate 75 -> -75 577db96d56Sopenharmony_ciddcpn104 copynegate -75 -> 75 587db96d56Sopenharmony_ciddcpn105 copynegate 7.50 -> -7.50 597db96d56Sopenharmony_ciddcpn106 copynegate -7.50 -> 7.50 607db96d56Sopenharmony_ciddcpn107 copynegate 7.500 -> -7.500 617db96d56Sopenharmony_ciddcpn108 copynegate -7.500 -> 7.500 627db96d56Sopenharmony_ci 637db96d56Sopenharmony_ci-- zeros 647db96d56Sopenharmony_ciddcpn111 copynegate 0 -> -0 657db96d56Sopenharmony_ciddcpn112 copynegate -0 -> 0 667db96d56Sopenharmony_ciddcpn113 copynegate 0E+4 -> -0E+4 677db96d56Sopenharmony_ciddcpn114 copynegate -0E+4 -> 0E+4 687db96d56Sopenharmony_ciddcpn115 copynegate 0.0000 -> -0.0000 697db96d56Sopenharmony_ciddcpn116 copynegate -0.0000 -> 0.0000 707db96d56Sopenharmony_ciddcpn117 copynegate 0E-141 -> -0E-141 717db96d56Sopenharmony_ciddcpn118 copynegate -0E-141 -> 0E-141 727db96d56Sopenharmony_ci 737db96d56Sopenharmony_ci-- full coefficients, alternating bits 747db96d56Sopenharmony_ciddcpn121 copynegate 2682682682682682 -> -2682682682682682 757db96d56Sopenharmony_ciddcpn122 copynegate -2682682682682682 -> 2682682682682682 767db96d56Sopenharmony_ciddcpn123 copynegate 1341341341341341 -> -1341341341341341 777db96d56Sopenharmony_ciddcpn124 copynegate -1341341341341341 -> 1341341341341341 787db96d56Sopenharmony_ci 797db96d56Sopenharmony_ci-- Nmax, Nmin, Ntiny 807db96d56Sopenharmony_ciddcpn131 copynegate 9.999999999999999E+384 -> -9.999999999999999E+384 817db96d56Sopenharmony_ciddcpn132 copynegate 1E-383 -> -1E-383 827db96d56Sopenharmony_ciddcpn133 copynegate 1.000000000000000E-383 -> -1.000000000000000E-383 837db96d56Sopenharmony_ciddcpn134 copynegate 1E-398 -> -1E-398 847db96d56Sopenharmony_ci 857db96d56Sopenharmony_ciddcpn135 copynegate -1E-398 -> 1E-398 867db96d56Sopenharmony_ciddcpn136 copynegate -1.000000000000000E-383 -> 1.000000000000000E-383 877db96d56Sopenharmony_ciddcpn137 copynegate -1E-383 -> 1E-383 887db96d56Sopenharmony_ciddcpn138 copynegate -9.999999999999999E+384 -> 9.999999999999999E+384 89