HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11566
KIND (optional) must be a scalar integer initialization expression.
Result type/
type parameters
Integer. If KIND is present, the kind type parameter is that specified by KIND; otherwise, the
kind type parameter is that of default integer type.
Result value
Case 1 If A is of type integer, INT(A) = A.
Case 2 If A is of type real, there are two cases: if |A|<1,INT(A) has the value 0; if
|A|>=1,INT(A) is the integer whose magnitude is the largest integer that
does not exceed the magnitude of A and whose sign is the same as the sign of
A.
Case 3 If A is of type complex, INT(A) is the value obtained by applying the above
rules (for reals) to the real part of A. The result is undefined if the processor
cannot represent the result in the specified integer type.
Specific forms
IFIX, IIFIX, IINT, JIFIX, JINT, KIFIX, KINT.
INT1(A)
Description
Convert to INTEGER(1) type.
Class
Elemental nonstandard function.
Argument
A must be of type integer, real, or complex.
Result
INTEGER(1) type. If A is complex, INT1(A) is equal to the truncated real portion of A.