ANINT — Nearest whole number#

ANINT(A[, KIND])#

ANINT(A [, KIND]) rounds its argument to the nearest whole number.

Parameters:

A – The type of the argument shall be REAL.
KIND – (Optional) An INTEGER initialization expression indicating the kind parameter of the result.

Returns:

The return value is of type real with the kind type parameter of the argument if the optional KIND is absent; otherwise, the kind type parameter will be given by KIND. If A is greater than zero, ANINT(A) returns AINT(X+0.5). If A is less than or equal to zero then it returns AINT(X-0.5).

Standard:

Fortran 77 and later

Class:

Elemental function

Syntax:

RESULT = ANINT(A [, KIND])

Example:

program test_anint
  real(4) x4
  real(8) x8
  x4 = 1.234E0_4
  x8 = 4.321_8
  print *, anint(x4), dnint(x8)
  x8 = anint(x4,8)
end program test_anint

Specific names:

Name	Argument	Return type	Standard
`ANINT(A)`	`REAL(4) A`	`REAL(4)`	Fortran 77 and later
`DNINT(A)`	`REAL(8) A`	`REAL(8)`	Fortran 77 and later