Open Watcom FORTRAN 77 Language Reference

Open Watcom FORTRAN 77 Extensions to Standard FORTRAN 77
A. Open Watcom FORTRAN 77 Extensions to
Standard FORTRAN 77
This appendix summarizes the extensions supported by Open Watcom FORTRAN 77.
1. The INCLUDE statement for embedding source from another file is supported.
INCLUDE ’SRC’
2. Symbolic names are unique up to 32 characters. Also, ’$’, ’_’, and lowercase letters are allowed
in symbolic names.
3. Lowercase and uppercase letters are treated in the same way except in:
1. character and hollerith constants
2. apostrophe and H edit descriptors
4. End-of-line comments are permitted.
PRINT *, ’Hello world’ ! print ’Hello World’
5. The IMPLICIT NONE statement is supported.
6. An asterisk enclosed in parentheses is allowed with the type CHARACTER when specified in an
IMPLICIT statement.
IMPLICIT CHARACTER*(*) (Z)
7. Length specifiers are allowed with types specified in IMPLICIT statements.
IMPLICIT INTEGER*2 (I-N)
8. Length specifiers are allowed with type specification statements.
LOGICAL*1, LOGICAL*4
INTEGER*1, INTEGER*2, INTEGER*4
REAL*4, REAL*8
COMPLEX*8, COMPLEX*16
Length specifiers are also allowed with the type specified in FUNCTION statements.
COMPLEX*16 FUNCTION ZADD( X, Y )
9. Length specifiers are allowed with symbol names.
INTEGER I*2, A*2(10), B(20)*2
COMPLEX FUNCTION ZADD*16( X, Y )
Open Watcom FORTRAN 77 Extensions to Standard FORTRAN 77 285