nearest(3I)

NAME
     NEAREST - Returns the nearest different machine representable number
     in a given direction

SYNOPSIS
     NEAREST ([X=]x, [S=]s)

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

STANDARDS
     Fortran 90

DESCRIPTION
     The NEAREST intrinsic function returns the nearest different machine
     representable number in a given direction.  It accepts the following
     arguments:

     x    Must be of type real

     s    Must be of type real and not equal to zero

     NEAREST is an elemental function.  The name of this intrinsic cannot
     be passed as an argument.

RETURN VALUES
     The result type and type parameter are the same as x.  The result has
     a value equal to the machine representable number distinct from x and
     nearest to it in the direction of the infinity with the same sign as
     s.

NOTES
     On CRAY T90 systems that support IEEE arithmetic, this intrinsic
     vectorizes inline for 64-bit operands and calls to scalar-only library
     routines for 128-bit operands.

EXAMPLES                                   -46
     NEAREST (3.0, 2.0) has the value 3 + 2    on UNICOS systems according
     to the real number system model.
                                           -22
     NEAREST (3.0, 2.0) has the value 3 + 2    on UNICOS/mk and IRIX
     systems, according to the real number system model.

     For more information on the real number model, see the MODELS(3I) man
     page.

SEE ALSO
     MODELS(3I)

     Intrinsic Procedures Reference Manual, publication SR-2138, for the
     printed version of this man page.