Section 11,47: INT

 INT (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   |  INT      |  --      | INTEGER*1  | INTEGER*2   |
 |      |           |  --      | INTEGER*1  | INTEGER*4   |
 |      |see note 1 |  --      | INTEGER*1  | INTEGER*8   |
 |      |           |  --      | INTEGER*2  | INTEGER*4   |
 |      |see note 1 |  --      | INTEGER*2  | INTEGER*8   |
 |      |           |  --      | INTEGER*4  | INTEGER*4   |
 |      |see note 1 |  --      | INTEGER*4  | INTEGER*8   |
 |      |see note 1 |  --      | INTEGER*8  | INTEGER*8   |
 |      |           | IINT     | REAL*4     | INTEGER*2   |
 |      |           | JINT     | REAL*4     | INTEGER*4   |
 |      |see note 2 | KINT     | REAL*4     | INTEGER*8   |
 |      |           | IIDINT   | REAL*8     | INTEGER*2   |
 |      |           | JIDINT   | REAL*8     | INTEGER*4   |
 |      |see note 2 | KIDINT   | REAL*4     | INTEGER*8   |
 |      |see note 3 | IIQINT   | REAL*16    | INTEGER*2   |
 |      |see note 3 | JIQINT   | REAL*16    | INTEGER*4   |
 |      |           |  --      | COMPLEX*8  | INTEGER*2   |
 |      |           |  --      | COMPLEX*8  | INTEGER*4   |
 |      |see note 1 |  --      | COMPLEX*8  | INTEGER*8   |
 |      |           |  --      | COMPLEX*16 | INTEGER*2   |
 |      |           |  --      | COMPLEX*16 | INTEGER*4   |
 |      |see note 1 |  --      | COMPLEX*16 | INTEGER*8   |
 +------+-----------+----------+------------+-------------+

 NOTE 1: INTEGER*8 is only available on AXP systems.
 NOTE 2: KINT and KIDINT are only available on AXP systems.
 NOTE 3: IIQINT and JIQINT are not available in DEC Fortran.

 The setting of -noi4 or -i8 (AXP only) affects INT.

 See also AINT, IDINT, and IQINT.