HP Fortran Programmer's Reference

KIND (optional) must be a scalar integer initialization expression.
Result type/
type parameters
Intrinsic procedures
Intrinsic procedure specifications
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) istheintegerwhosemagnitudeisthelargestintegerthat
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.
Chapter 11 531