[問題] 要如何將迴圈值分開存檔
小弟想請問一下各位前輩們
我的程式結構如下
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
→
11/16 12:59, , 1F
11/16 12:59, 1F
→
11/16 13:00, , 2F
11/16 13:00, 2F
→
11/16 15:14, , 3F
11/16 15:14, 3F
→
11/16 16:16, , 4F
11/16 16:16, 4F
→
11/17 10:39, , 5F
11/17 10:39, 5F
→
11/17 10:40, , 6F
11/17 10:40, 6F
→
11/17 13:52, , 7F
11/17 13:52, 7F
→
11/17 13:52, , 8F
11/17 13:52, 8F
推
11/17 16:59, , 9F
11/17 16:59, 9F
→
11/18 10:48, , 10F
11/18 10:48, 10F
→
11/18 13:28, , 11F
11/18 13:28, 11F
討論串 (同標題文章)
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
