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

  AINT (real-number)

  A function that returns the largest integer whose absolute value
  does not exceed the absolute value of the argument and has the same
  sign as the argument.

  +------+---------+----------+------------+-------------+
  | Args | Generic | Specific |  Argument  | Result Type |
  +------+---------+----------+------------+-------------+
  |  1   |  AINT   | AINT     | REAL*4     | REAL*4      |
  |      |         | DINT     | REAL*8     | REAL*8      |
  |      |         | QINT     | REAL*16    | REAL*16     |
  +------+---------+----------+------------+-------------+
  See also the INT intrinsic function.