The BLOCK DATA statement identifies a subprogram that initializes variables and arrays in labeled common blocks.
Symbolic name of the block data subprogram in which the BLOCK DATA statement appears. This parameter is optional. It is a global name.
A block data subprogram can contain as many labeled common blocks and data initializations as desired.
The BLOCK DATA statement must be the first statement in a block data subprogram.
The only other statements that can appear in a block data subprogram are:
Only an entity defined in a labeled common block can be initially defined in a block data subprogram.
If an entity in a labeled common block is initially defined, all entities having storage units in the common block storage sequence must be specified, even if they are not all initially defined.
Only one unnamed block data subprogram can appear in the executable program.
The same labeled common block cannot be specified in more than one block data subprogram in the same executable program.
The optional parameter name must not be the same as the name of an external procedure, main program, common block, or other block data subprogram in the same executable program. The name must not be the same as any local name in the subprogram.
BLOCK DATA INIT COMMON /RANGE/ X0, X1 DATA X0, X1 / 2.0, 6.0 / END