ROUND(3F-SysV) RISC/os Reference Manual ROUND(3F-SysV)
NAME
round: anint, dnint, nint, idnint - Fortran nearest integer
functions
SYNOPSIS
integer i
real r1, r2
double precision dp1, dp2
r2 = anint(r1)
i = nint(r1)
dp2 = anint(dp1)
dp2 = dnint(dp1)
i = nint(dp1)
i = idnint(dp1)
DESCRIPTION
anint returns the nearest whole real number to its real
argument (i.e., int(a+0.5) if a > 0, int(a-0.5) otherwise).
dnint does the same for its double-precision argument. nint
returns the nearest integer to its real argument. Idnint is
the double-precision version. anint is the generic form of
anint and dnint , performing the same operation and return-
ing the data type of its argument. nint is also the generic
form of idnint.
Printed 1/15/91 Page 1