Section 11,8: ANINT

 ANINT (real-number)

 A function that returns the value of the integer nearest to the
 value of the argument.

 +------+---------+----------+------------+-------------+        
 | Args | Generic | Specific |  Argument  | Result Type |
 +------+---------+----------+------------+-------------+
 |  1   | ANINT   | ANINT    | REAL*4     | REAL*4      |
 |      |         | DNINT    | REAL*8     | REAL*8      |
 |      |see note | QNINT    | REAL*16    | REAL*16     |
 +------+---------+----------+------------+-------------+

 NOTE: QNINT is not available in DEC Fortran.

 [x] is defined as the largest integer whose magnitude does not
 exceed the magnitude of x and whose sign is the same as that of x.

 See also the NINT intrinsic function.