[問題] 要如何將迴圈值分開存檔

[zx168zx (zx168zx)]

小弟想請問一下各位前輩們

我的程式結構如下

do aa=1,5
do bb=1,10
.
.
.
.

do while (條件)
.
.
write(126,"(3(F13.5))") aa,bb,X
.
.
enddo
enddo
enddo

但我跑資料時 這樣的存法讓我的檔案變很大

想問一下 是否能夠將檔案自動存成

aa-bb.txt 照我的迴圈編號分割儲存好我的檔案

就是1-1.txt 存的檔案是 aa=1,bb=1的資料

1-2.txt 是aa=1,bb=2 的資料

我試過這樣的寫法

character(len=20) :: string


do m=1,2
do aa=1,1
do bb=1,2

write(unit=string,fmt='((F13.5))')m,'.txt'
.
.
.
.
do while (條件)


open(unit=1 ,file= string)
write(1,fmt='((F13.5))')m, X
close(1)


enddo
enddo
enddo

但沒辦法成功  所以想請問一下各位前輩們



--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 140.116.1.136
※ 文章網址: http://www.ptt.cc/bbs/Fortran/M.1416108955.A.46C.html
※ 編輯: zx168zx (140.116.1.136), 11/16/2014 11:38:08
→ jubilee2: 每次開檔案會洗掉前面已經輸出的，所以可以迴圈外面先
→ jubilee2: open 所有的檔案，另一法是看看有沒有接續寫檔案的指令
→ blc: open有個append，查一下吧
→ zx168zx: append指令我知道 但我不太懂移到檔案結尾的意思
→ fcuiii: 把OPEN放到do 裡面 將string 改為迴圈，如string=i.txt
→ fcuiii: i 要改為字元，就會切成很多檔案。
→ zx168zx: i.txt我太不懂要怎麼定義 i如果是迴圈數 不是已經定義成
→ zx168zx: integer了嗎 怎麼在定義成字元?
推 terryys: 板上搜尋字串,例如這個: #19xRni2i
→ rex0707: WRITE(string,*) integer
→ zx168zx: r大 我不太懂你那樣的寫法....