HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure speciļ¬cations
Chapter 11 577
Result
JZEXT converts A to INTEGER(4) by sign-extending zeroes instead of the actual sign bit.
KIND(X)
Description
Returns the value of the kind type parameter of X.
Class
Inquiry function.
Argument
X may be of any intrinsic type.
Result type,
type parameters,
and shape
Default integer scalar.
Result value
The result has a value equal to the kind type parameter value of X.
KZEXT(A)
Description
Zero extend.
Class
Generic elemental nonstandard function.
Argument
A must be of type INTEGER(1), INTEGER(2), INTEGER(4), INTEGER(8),
LOGICAL(1), LOGICAL(2), LOGICAL(4), or LOGICAL(8).