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, IRIX systems

     CF90, MIPSpro 7 Fortran 90

STANDARDS
     Fortran

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 for the printed version of this
     man page.