------------------------------------------------------------------------
-- tointegral0.decTest -- round decimal to integral value             --
-- Copyright (c) IBM Corporation, 2001, 2008.  All rights reserved.   --
------------------------------------------------------------------------
-- Please see the document "General Decimal Arithmetic Testcases"     --
-- at http://www2.hursley.ibm.com/decimal for the description of      --
-- these testcases.                                                   --
--                                                                    --
-- These testcases are experimental ('beta' versions), and they       --
-- may contain errors.  They are offered on an as-is basis.  In       --
-- particular, achieving the same results as the tests here is not    --
-- a guarantee that an implementation complies with any Standard      --
-- or specification.  The tests are not exhaustive.                   --
--                                                                    --
-- Please send comments, suggestions, and corrections to the author:  --
--   Mike Cowlishaw, IBM Fellow                                       --
--   IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK         --
--   mfc@uk.ibm.com                                                   --
------------------------------------------------------------------------
version: 2.58

-- This set of tests tests the extended specification 'round-to-integral
-- value' operation (from IEEE 854, later modified in 754r).
-- All non-zero results are defined as being those from either copy or
-- quantize, so those are assumed to have been tested.
-- Note that 754r requires that Inexact not be set, and we similarly
-- assume Rounded is not set.

extended:    0
precision:   9
rounding:    half_up
maxExponent: 999
minexponent: -999

int001 tointegral      0     ->  0
int002 tointegral      0.0   ->  0
int003 tointegral      0.1   ->  0
int004 tointegral      0.2   ->  0
int005 tointegral      0.3   ->  0
int006 tointegral      0.4   ->  0
int007 tointegral      0.5   ->  1
int008 tointegral      0.6   ->  1
int009 tointegral      0.7   ->  1
int010 tointegral      0.8   ->  1
int011 tointegral      0.9   ->  1
int012 tointegral      1     ->  1
int013 tointegral      1.0   ->  1
int014 tointegral      1.1   ->  1
int015 tointegral      1.2   ->  1
int016 tointegral      1.3   ->  1
int017 tointegral      1.4   ->  1
int018 tointegral      1.5   ->  2
int019 tointegral      1.6   ->  2
int020 tointegral      1.7   ->  2
int021 tointegral      1.8   ->  2
int022 tointegral      1.9   ->  2
-- negatives
int031 tointegral     -0     ->  0
int032 tointegral     -0.0   ->  0
int033 tointegral     -0.1   ->  0
int034 tointegral     -0.2   ->  0
int035 tointegral     -0.3   ->  0
int036 tointegral     -0.4   ->  0
int037 tointegral     -0.5   -> -1
int038 tointegral     -0.6   -> -1
int039 tointegral     -0.7   -> -1
int040 tointegral     -0.8   -> -1
int041 tointegral     -0.9   -> -1
int042 tointegral     -1     -> -1
int043 tointegral     -1.0   -> -1
int044 tointegral     -1.1   -> -1
int045 tointegral     -1.2   -> -1
int046 tointegral     -1.3   -> -1
int047 tointegral     -1.4   -> -1
int048 tointegral     -1.5   -> -2
int049 tointegral     -1.6   -> -2
int050 tointegral     -1.7   -> -2
int051 tointegral     -1.8   -> -2
int052 tointegral     -1.9   -> -2

-- numbers around precision
precision: 9
int060 tointegral '56267E-10'   -> '0'
int061 tointegral '56267E-5'    -> '1'
int062 tointegral '56267E-2'    -> '563'
int063 tointegral '56267E-1'    -> '5627'
int065 tointegral '56267E-0'    -> '56267'
int066 tointegral '56267E+0'    -> '56267'
int067 tointegral '56267E+1'    -> '5.6267E+5'
int068 tointegral '56267E+2'    -> '5.6267E+6'
int069 tointegral '56267E+3'    -> '5.6267E+7'
int070 tointegral '56267E+4'    -> '5.6267E+8'
int071 tointegral '56267E+5'    -> '5.6267E+9'
int072 tointegral '56267E+6'    -> '5.6267E+10'
int073 tointegral '56267E+995'  -> '5.6267E+999'

int080 tointegral '-56267E-10'  -> '0'
int081 tointegral '-56267E-5'   -> '-1'
int082 tointegral '-56267E-2'   -> '-563'
int083 tointegral '-56267E-1'   -> '-5627'
int085 tointegral '-56267E-0'   -> '-56267'
int086 tointegral '-56267E+0'   -> '-56267'
int087 tointegral '-56267E+1'   -> '-5.6267E+5'
int088 tointegral '-56267E+2'   -> '-5.6267E+6'
int089 tointegral '-56267E+3'   -> '-5.6267E+7'
int090 tointegral '-56267E+4'   -> '-5.6267E+8'
int091 tointegral '-56267E+5'   -> '-5.6267E+9'
int092 tointegral '-56267E+6'   -> '-5.6267E+10'
int093 tointegral '-56267E+995' -> '-5.6267E+999'