write 文の format で変数を使う(fortran 77)

☆write 文の format で変数を使う(fortran 77)
write 文で出力する時に通常は以下のように format を指定する（標準出力に表示する場合）
write (6,*) 変数
write (6,’(4E15.4)’) 変数
入力ファイルの数に合わせて format を変更したいとか format を指定する時に変数を使い
たい時がある．そんな時は例えば
integer n
character fmt*11
n=4
write (fmt,’(“(“I0”E15.4)”) n
write (6,fmt) 変数
とすれば良い．
2 行目では文字変数 fmt に「”」で囲まれた文字列と変数 n を文字列として指定したフォー
マットで代入する．
この例では write (6,*) fmt とすると(4E15.4)と表示される．I0 は整数かつ左寄せを意味す
る．
fortran 77 の宿命なのか format を指定しないと文字数が多いときに勝手に改行してしまう
ので，出力データ数が変動する時には便利．