A block data program unit provides initial values for data in one or more named common blocks. Only specification statements may appear in a block data program unit. A block data program unit may be referenced only in EXTERNAL statements in other program units.
The form of a block data program unit is
block-data-stmt
[specification-part]
end-stmt
Where:block-data-stmt is a BLOCK DATA statement.
specification-part is one or more specification statements, other than ALLOCATABLE, INTENT, PUBLIC, PRIVATE, OPTIONAL, and SEQUENCE.
end-stmt is an END statement.