anint(3I)

NAME
     ANINT, DNINT, QNINT - Finds nearest whole number

SYNOPSIS
     ANINT ([A=]a [,[KIND=]kind])
     DNINT ([A=]a [,[KIND=]kind])
     QNINT ([A=]a [,[KIND=]kind])

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

     CF90, MIPSpro 7 Fortran 90, MIPSpro Fortran 77

STANDARDS
     Fortran

     Fortran extension:  QNINT

DESCRIPTION
     ANINT is the generic function name; the others are specifics.  These
     are elemental intrinsic functions.  They accept the following
     arguments:

     a         Must be type single precision, double precision, or quad
               precision.  See the RETURN VALUES section for information on
               input data types and return values.

               The data type and kind type for single-precision,
               double-precision, and quad-precision values differ depending
               on your platform.  For platform-specific information, see
               the TERMINOLOGY section of the INTRO_INTRIN(3I) man page.

     kind      Must be a kind type allowed for x.  This argument is not
               accepted by the MIPSpro Fortran 77 compiler.

     These functions find the nearest whole number for real and
     double-precision numbers by using the following equations:

          y = AINT(x + .5) if x >= 0

          y = AINT(x - .5) if x < 0

NOTES
     The ANINT and DNINT intrinsic function names can be passed as
     arguments; the other cannot.

RETURN VALUES
     ANINT returns the real nearest whole number for its real argument.

     DNINT returns the double-precision nearest whole number for its
     double-precision argument.

     QNINT returns the quad-precision nearest whole number for its
     quad-precision argument.

EXAMPLES
     The following examples show the results of calling ANINT with positive
     and negative arguments:

     ANINT(3.7) = 4.0

     ANINT(-3.7) = -4.0

SEE ALSO
     AINT(3I)

     Intrinsic Procedures Reference Manual for the printed version of this
     man page.