HP Fortran Programmer's Reference (September 2007)

Program units and procedures
Block data program unit
Chapter 7198
Block data program unit
A block data program unit initializes data values in common blocks. The syntax of a block
data program unit is:
BLOCK DATA [ block-data-name ]
[ specification-part ]
END [BLOCK DATA [ block-data-name ]]
block-data-name
is the name of the block data program unit. Note that the name is optional.
If omitted, no more than one unnamed block data program unit may appear
in an executable program.
specification-part
is zero or more of the following:
• Type declaration statement
• USE statement
• IMPLICIT statement
• COMMON statement
• DATA statement
• EQUIVALENCE statement
• Derived-type definition
• The following attribute-specification statements:
❏ DIMENSION
❏ INTRINSIC
❏ PARAMETER
❏ POINTER
❏ SAVE
❏ TARGET
If a USE statement appears in a block data program unit, it makes only the named constants
accessible to the program unit.