HP Fortran Programmer's Guide (September 2007)

Porting to HP Fortran
Compatibility extensions
Chapter 11 237
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 FSTREAM INT4 MCLOCK SYSTEM
ATAND GETARG INT8 OR TAND
ATANH GETENV INUM QEXT TIME
BADDRESS GRAN IOMSG QFLOAT XOR
COSD HFIX IQINT QNUM ZEXT
DATE IACHAR IRAND QPROD
DCMPLX IADDR IRANP RAN
DFLOAT IARGC ISIGN RAND
DNUM IDATE ISNAN RNUM
Table 11-4 Nonstandard intrinsic procedures in HP Fortran (Continued)