• 締切済み

fortran90 ファイル出力の名前

ファイル出力の仕方なのですが do j=1,step ・ ・ ・ OPEN(3, FILE = "nucsig12.txt", STATUS = "old", ACTION = "WRITE") DO i=1,nucnum WRITE(3,*) i,nucsig12(i) END DO CLOSE(3) ・ ・ のようにstepごとにファイルの出力をしたいのですが テキスト名をstepごとに変えたいのですがどうしたらよいのでしょうか?? OPEN(3, FILE = "nucsig12.txt", STATUS = "old", ACTION = "WRITE") の部分をどう修正したらいいのか・・・ 理想としては "nucsig12[step].txt"(stepには数字をいれたい) というようにstepと同じ数のテキストファイルを作りたいです こういうことはできるのでしょうか?? もしできるなら教えてください お願いしますm(__)m

みんなの回答

  • mac_res
  • ベストアンサー率36% (568/1571)
回答No.1

CHARACTER*80 fname INTEGER step こんな感じではどうでしょうか? DIMENSION nucsig12(10) do step=1,10 WRITE(fname,'(a,i3.3,a)') 'nucsig12',step,'.txt' OPEN(3, FILE=fname, ACTION = "WRITE") DO i=1,nucnum WRITE(3,*) i,nucsig12(i) END DO CLOSE(3) END DO END

yayk1119
質問者

お礼

できました♪ 文字列を使うんですね! 勉強になりましたありがとうございます

関連するQ&A