Ada Programming/Attributes/'Rounding
Description
editX'Rounding(Y) is an Ada attribute where X is any floating-point type and Y is any instance of that type. This attribute represents the closest integer value to Y. If Y is exactly between two integer values (e.g. 1.5), then the result is the number farthest away from zero (e.g. 1.5 => 2.0, -1.5 => -2.0).
Example
editW : Float := -1.5; X : Float := 1.5; Y : Float := 1.0; Z : Float := 1.999; ...pragma
Assert (Float'Rounding(W) = -2.0); -- OKpragma
Assert (Float'Rounding(X) = 2.0); -- OKpragma
Assert (Float'Rounding(Y) = 1.0); -- OKpragma
Assert (Float'Rounding(Z) = 2.0); -- OKpragma
Assert (Float'Rounding(W) = -1.0); -- Wrongpragma
Assert (Float'Rounding(X) = 1.0); -- Wrong
See also
editWikibook
edit- Ada Programming
- Ada Programming/Attributes
- Ada Programming/Attributes/'Ceiling
- Ada Programming/Attributes/'Floor
- Ada Programming/Attributes/'Unbiased_Rounding