Section 11,5: AINT

 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      |
 |      |see note | QINT     | REAL*16    | REAL*16     |
 +------+---------+----------+------------+-------------+

 NOTE: QINT is not available in DEC Fortran.

 See also the INT intrinsic function.