初期値設定プログラム単位

初期値設定プログラム単位は，名前付き共通ブロック中の非ポインタ変数のための初期値を提供します。詳細は，「BLOCK DATA」を参照してください。

例

初期値設定プログラム単位の例を以下に示します。

	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