HP Fortran Programmer's Reference

Result value
Intrinsic procedures
Intrinsic procedure specifications
Theresulthasthevalueq if X is of type integer and p if X is of type real, where q and p are as
defined in “Data representation models” on page 473 for the model representing numbers of
thesametypeandkindtypeparameterasX.
DIM(X, Y)
Description
The difference X–Y if it is positive; otherwise zero.
Class
Elemental function.
Arguments
X must be of type integer or real.
Y must be of the same type and kind type parameter as X.
Result type/
type parameters
Same as X.
Result value
ThevalueoftheresultisX–Y if X > Y and zero otherwise.
Specific forms
BDIM, DDIM, HDIM, QDIM.
DNUM(I)
Description
Convert to double precision.
Class
Elemental nonstandard function.
Chapter 11 509