02.07.2013 Views

HP Fortran Programmer's Reference

HP Fortran Programmer's Reference

HP Fortran Programmer's Reference

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Program units and procedures<br />

Block data program unit<br />

The block data program unit can initialize more than one common block. However, a common<br />

block can be initialized in only one block data program unit. It is not necessary to initialize<br />

every object within the common block, but the common block must be completely specified.<br />

As an extension, <strong>HP</strong> <strong>Fortran</strong> allows the initialization of objects in blank—or<br />

unnamed—common. The following example illustrates this extension:<br />

BLOCK DATA blank<br />

COMMON//aa(3),ab(5) ! an unnamed common block<br />

DATA aa/3*1.0/<br />

DATA ab/1.0,2.0,3*4.0/<br />

END BLOCK DATA blank<br />

Chapter 7 167

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!