[問題] 直接讀寫file 換行問題
open(135,file='test.xyz',status='replace',access='direct',
form='formatted',recl=46)
if (XX .lt. XX) then
N = N + 1
recposition = N + 1
write(135,7777,rec=recposition) AAA,BBB,CCC
endif
write(135,9999,rec=1) N
** N必須要全部跑完才能知道值，可是又必須寫在檔案的開頭
目前的問題是使用 direct file "寫出" data
N有成功出現在檔案開頭，可是每一筆data不會自動換行，全部就一行
網路上我查過，還是無解
是否有方法可讓每筆data都自動換行
請高手解答，謝謝!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.115.43.188
※ 編輯: band33 來自: 140.115.43.188 (06/06 13:55)
※ 編輯: band33 來自: 140.115.43.188 (06/06 13:59)
→
06/10 23:11, , 1F
06/10 23:11, 1F
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
