the expression foo**baris legal in HP FORTRAN 77™but not in HP Fortran™. (HP FORTRAN 77 ™coerces COMPLEX(16)entities to COMPLEX(8)in order to continue the computation.)
Given the previous declarations, the following is acceptable in HP Fortran™:
foo**REAL(bar, 8) ! foo**bar
See the HP Fortran Programmer's Reference for information about theREAL intrinsic.
Input/outputThe following I/O specifiers are recognized by the OPENstatement and by other I/Ostatements in HP FORTRAN 77™ but are not supported in HP Fortran™:
ACCESS=expr1, where expr1is a constant expression other than DIRECTor SEQUENTIAL.
•IOSTAT=
•KEY=
•NAME=
•READONLY
•STATUS=expr2, where expr2is a constant expression other than OLD, NEW, UNKNOWN,
REPLACE, or SCRATCH.
•TYPE=
In general, HP FORTRAN 77™ allows more specifiers (and more options to specifiers) than does HP Fortran™. There are additional differences between the HP FORTRAN 77™ version of the
OPENstatement and the HP Fortran™ version; compare the description ofOPEN in the HP Fortran Programmer's Reference with that in the HP FORTRAN/9000 Programmer's Reference.
In HP FORTRAN 77™,
Only a small number of the compiler directives from HP FORTRAN 77™ are supported under HP Fortran. These are:
•ALIAS
•CHECK_OVERFLOW
•LIST
•OPTIMIZE
•SHARED_COMMON
The syntax and functionality of individual directives has also changed; for detailed information about the HP Fortran™ directives, see the HP Fortran Programmer's Reference.
All unsupported directives should be deleted or replaced by HP Fortran code that results in the same functionality (see Table on page 228).
134 Migrating to HP Fortran