1
1
------------------------------------------------------------------------
2
2
-- ddAdd.decTest -- decDouble addition --
3
-- Copyright (c) IBM Corporation, 1981, 2008. All rights reserved. --
3
4
------------------------------------------------------------------------
4
5
-- Please see the document "General Decimal Arithmetic Testcases" --
5
6
-- at http://www2.hursley.ibm.com/decimal for the description of --
17
17
-- IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK --
18
18
-- mfc@uk.ibm.com --
19
19
------------------------------------------------------------------------
22
22
-- This set of tests are for decDoubles only; all arguments are
23
23
-- representable in a decDouble
415
415
ddadd435 add 77e-19 10 -> 10.00000000000000 Inexact Rounded
416
416
ddadd436 add 77e-299 10 -> 10.00000000000000 Inexact Rounded
418
-- fastpath boundary (more in dqadd)
420
ddadd539 add '4444444444444444' '3333333333333333' -> '7777777777777777'
421
ddadd540 add '4444444444444444' '4444444444444444' -> '8888888888888888'
422
ddadd541 add '4444444444444444' '5555555555555555' -> '9999999999999999'
423
ddadd542 add '3333333333333333' '4444444444444444' -> '7777777777777777'
424
ddadd543 add '4444444444444444' '4444444444444444' -> '8888888888888888'
425
ddadd544 add '5555555555555555' '4444444444444444' -> '9999999999999999'
426
ddadd545 add '3000004000000000' '3000000000000040' -> '6000004000000040'
427
ddadd546 add '3000000400000000' '4000000000000400' -> '7000000400000400'
428
ddadd547 add '3000000040000000' '5000000000004000' -> '8000000040004000'
429
ddadd548 add '4000000004000000' '3000000000040000' -> '7000000004040000'
430
ddadd549 add '4000000000400000' '4000000000400000' -> '8000000000800000'
431
ddadd550 add '4000000000040000' '5000000004000000' -> '9000000004040000'
432
ddadd551 add '5000000000004000' '3000000040000000' -> '8000000040004000'
433
ddadd552 add '5000000000000400' '4000000400000000' -> '9000000400000400'
434
ddadd553 add '5000000000000040' '5000004000000000' -> 1.000000400000004E+16 Rounded
436
ddadd554 add '8999999999999999' '0000000000000001' -> 9000000000000000
437
ddadd555 add '0000000000000001' '8999999999999999' -> 9000000000000000
438
ddadd556 add '0999999999999999' '0000000000000001' -> 1000000000000000
439
ddadd557 add '0000000000000001' '0999999999999999' -> 1000000000000000
440
ddadd558 add '4444444444444444' '4555555555555556' -> 9000000000000000
441
ddadd559 add '4555555555555556' '4444444444444444' -> 9000000000000000
419
444
ddadd6440 add 1 -77e-14 -> 0.99999999999923
420
445
ddadd6441 add 1 -77e-15 -> 0.999999999999923
740
765
ddadd7575 add 1E-383 -1E-398 -> 9.99999999999999E-384 Subnormal
741
766
ddadd7576 add -1E-383 +1E-398 -> -9.99999999999999E-384 Subnormal
768
-- and another curious case
769
ddadd7577 add 7.000000000000E-385 -1.00000E-391 -> 6.999999000000E-385 Subnormal
743
771
-- check overflow edge case
744
772
-- 1234567890123456
745
773
ddadd7972 apply 9.999999999999999E+384 -> 9.999999999999999E+384