HP Fortran Programmer's Reference (September 2007)

Program units and procedures
Block data program unit
Chapter 7 199
The block data program unit can initialize more than one common block. However, a common
block can be initialized in only one block data program unit. It is not necessary to initialize
every object within the common block, but the common block must be completely specified.
As an extension, HP Fortran allows the initialization of objects in blank—or
unnamed—common. The following example illustrates this extension:
BLOCK DATA blank
COMMON//aa(3),ab(5) ! an unnamed common block
DATA aa/3*1.0/
DATA ab/1.0,2.0,3*4.0/
END BLOCK DATA blank