#
Fortran Wiki

nint

## Description

`nint(x)`

rounds its argument to the nearest whole number.

## Standard

FORTRAN 77 and later, with `kind`

argument Fortran 90 and later

## Class

Elemental function

## Syntax

`result = nint(x [, kind])`

## Arguments

`x`

- The type of the argument shall be `real`

.
`kind`

- (Optional) An `integer`

initialization expression indicating the kind parameter of the result.

## Return value

Returns `a`

with the fractional portion of its magnitude eliminated by rounding to the nearest whole number and with its sign preserved, converted to an `integer`

of the default kind.

## Example

```
program test_nint
real(4) x4
real(8) x8
x4 = 1.234E0_4
x8 = 4.321_8
print *, nint(x4), idnint(x8)
end program test_nint
```

## See also

ceiling, floor

Revised on April 30, 2009 20:18:11
by

Jason Blevins
(71.70.142.190)
(880 characters / 0.0 pages)