Block Data Program Units

A block data program unit provides initial values for nonpointer variables in named common blocks. For more information, see BLOCK DATA in the A to Z Reference.

Examples

An example of a block data program unit follows:

  BLOCK DATA WORK
     COMMON /WRKCOM/ A, B, C (10,10)
     DATA A /1.0/, B /2.0/, C /100*0.0/
  END BLOCK DATA WORK