PROGRAM main [宣言部] [シナリオ部： CALL [動作名(引数なし)] ...] CONTAINS [動作の記述部： SUBROUTINE [動作名] (宣言なし：本体で宣言、副作用注意) [動作の詳細] END SUBROUTINE ...] [ラッパー部： SUBROUTINE w__[サブルーチン名](最小限の引数) […

あと2週間。……気が重い。 チェック用のコードのチェックの部分にバグを入れたら世話はない。ま、午後遅くなったとはいえ、とにかくバグがとれてよかった。バグの原因は配列をもちいた構造型変数にファイルからデータを読み込もうとして、構造型の要素名を書…