HP Fortran Programmer's Guide (March 2010)

Porting to HP Fortran
Compatibility extensions
Chapter 11 251
HP Fortran also provides nonstandard specific intrinsics that derive from standard generic
intrinsics; these nonstandard specific intrinsics are not listed in Table 11-4. They provide
generic intrinsics with the ability to operate on nonstandard data type sizes. For example, the
generic intrinsic ABS is defined by the Fortran 90 Standard to return the absolute value of the
standard data types. HP Fortran provides BABS and ZABS as extensions, enabling ABS to
operate on INTEGER(KIND=1) and DOUBLE COMPLEX values—both of which are nonstandard.
Many of the nonstandard specific intrinsics (including BABS and ZABS) are compatible with
similarly named intrinsics available on other implementations.
ATAN2D FNUM INT1 MALLOC SIZEOF
ATAND FREE INT2 MCLOCK SRAND
ATANH FSET INT4 OR SYSTEM
BADDRESS FSTREAM INT8 QCOTAN TAND
COSD GETARG INUM QCOTAND TIME
COTAN GETENV IOMSG QEXT XOR
COTAND GRAN IQINT QFLOAT ZEXT
DATE HFIX IRAND QNUM
DCMPLX IACHAR IRANP QPROD
DCOTAN IADDR ISIGN RAN
Table 11-4 Nonstandard intrinsic procedures in HP Fortran (Continued)