Section 11,69: NINT

 NINT (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  |  NINT     | ININT    | REAL*4     | INTEGER*2   |
 |      |           | JNINT    | REAL*4     | INTEGER*4   |
 |      |see note 1 | KNINT    | REAL*4     | INTEGER*8   |
 |      |           | IIDNNT   | REAL*8     | INTEGER*2   |
 |      |           | JIDNNT   | REAL*8     | INTEGER*4   |
 |      |see note 1 | KIDNNT   | REAL*8     | INTEGER*8   |
 |      |see note 2 | IIQNNT   | REAL*16    | INTEGER*2   |
 |      |see note 2 | JIQNNT   | REAL*16    | INTEGER*4   |
 +------+-----------+----------+------------+-------------+

 NOTE 1: KNINT and KIDNNT are only available on AXP systems.
 NOTE 2: IIQNNT and JIQNNT are not available in DEC Fortran.

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

 See also the ANINT, IDNINT, and IQNINT intrinsic functions.