Next: NEW_LINE, Previous: MVBITS, Up: Intrinsic Procedures [Contents][Index]
NEAREST
— Nearest representable numberNEAREST(X, S)
returns the processor-representable number nearest
to X
in the direction indicated by the sign of S
.
Fortran 90 and later
Elemental function
RESULT = NEAREST(X, S)
X | Shall be of type REAL . |
S | Shall be of type REAL and
not equal to zero. |
The return value is of the same type as X
. If S
is
positive, NEAREST
returns the processor-representable number
greater than X
and nearest to it. If S
is negative,
NEAREST
returns the processor-representable number smaller than
X
and nearest to it.
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