VMS Help FORTRAN, Intrinsic Procedures, ANINT  *Conan The Librarian (sorry for the slow response - running on an old VAX)

  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      |
  |      |         | QNINT    | REAL*16    | REAL*16     |
  +------+---------+----------+------------+-------------+
  [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.