NEAREST — Nearest representable number#
-
NEAREST(X, S)#
NEAREST(X, S)
returns the processor-representable number nearest toX
in the direction indicated by the sign ofS
.- Parameters
X – Shall be of type
REAL
.S – Shall be of type
REAL
and not equal to zero.
- Returns
The return value is of the same type as
X
. IfS
is positive,NEAREST
returns the processor-representable number greater thanX
and nearest to it. IfS
is negative,NEAREST
returns the processor-representable number smaller thanX
and nearest to it.
- Standard:
Fortran 90 and later
- Class:
Elemental function
- Syntax:
RESULT = NEAREST(X, S)
- Example:
program test_nearest real :: x, y x = nearest(42.0, 1.0) y = nearest(42.0, -1.0) write (*,"(3(G20.15))") x, y, x - y end program test_nearest