HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11 561
Result value
The result is the position of C in the processor collating sequence associated with the kind
type parameter of C and is in the range 0 <= IACHAR(C) < n -1, where n is the number of
characters in the collating sequence.
For any characters C and D capable of representation in the processor, C.LE.D is .TRUE. if and
only if ICHAR(C) .LE. ICHAR(D) is .TRUE., and C.EQ.D is .TRUE. if and only if
ICHAR(C).EQ. ICHAR(D) is .TRUE..
IDATE(MONTH, DAY, YEAR)
Description
Return the month, day, and year of current system.
Class
Nonstandard subroutine.
Arguments
MONTH, DAY, and YEAR must be of type integer.
IDIM(X, Y)
Description
Integer positive difference.
Class
Nonstandard function.
Arguments
X must be of type integer.
Y must be of type integer with the same kind type parameter as X.
Result type/
type parameters
Integer of same kind type parameter as X.