HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11 523
ANINT(A, KIND)
Optional argument
KIND
Description
Nearest whole number.
Class
Elemental function.
Arguments
A must be of type real.
KIND (optional) must be a scalar integer initialization expression.
Result type/
type parameters
The result is of type real. If KIND is present, the kind type parameter is that specified by KIND;
otherwise, the kind type parameter is that of A.
Result value
If A>0, ANINT(A) has the value AINT(A+0.5);ifA <= 0, ANINT(A) has the value AINT(A–0.5).
Specific forms
DNINT, QNINT.
ANY(MASK, DIM)
Optional argument
DIM
Description
Determine whether any value is .TRUE. in MASK along dimension DIM.