Open Watcom FORTRAN 77 Language Reference

Appendices
36. Non-character arrays are allowed as format specifiers.
37. The following format edit descriptors are allowed:
Z
Ew.dDe
for displaying data in hexadecimal format
same as Ew.dEe except D is used as exponentiation character
$ or \ leave cursor at end of line
38. A repeat count is not required for the X edit descriptor (a repeat count of one is assumed).
39. Commas are optional between format edit descriptors.
100 FORMAT( 1X I5 )
40. It is possible to substring the return values of functions and statement functions.
CHARACTER*7 F, G
F() = ’1234567’
PRINT *, F()(1:3), G()(4:7)
41. Functions may be invoked via the CALL statement. This allows the return value of functions to
be ignored.
42. A RETURN statement is allowed in the main program.
43. Integer constants with more than 5 digits are allowed in the STOP and PAUSE statements.
PAUSE 123456
STOP 123456
44. Multiple assignment is allowed.
X = Y = Z = 0.0
45. The .XOR. operator is supported (equivalent to .NEQV.).
46. The .AND., .OR., .NEQV., .EQV. and .XOR. operators may take integer arguments.
They can be used to perform bit operations on integers.
47. Several additional program structure control statements are supported:
288 Open Watcom FORTRAN 77 Extensions to Standard FORTRAN 77