作者blue33210 (蘭)
看板Fortran
標題[問題] 如何輸出不會被覆蓋
時間Tue Apr 12 22:21:46 2016
大家好~ 我是程式新手
程式有問題想請教各位前輩
我有一個主程式、N個Subroutine
想要在Subroutine被Call的時候，輸出一段文字到一個已存在的TXT檔
程式碼如下：
character(len=10)::in
OPEN(21,file='in.txt',status='old',action='write')
WRITE(21,10)
FORMAT(2X,'in calpuv9')
CLOSE(21)
我在N個子程式中輸入相同的程式碼
但WRITE和FORMAT的編號會改，輸出的文字也不一樣
跑完之後發現好像會覆蓋，只剩下一個子程式的文字有輸出
請問要怎麼更改才能在TXT檔中看到複數個子程式文字輸出
想要的TXT檔範例: in calpuv8 . in calpuv9 . in calpuv10 ...
麻煩各位前輩了，謝謝!!
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 36.224.6.186
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Fortran/M.1460470908.A.B6A.html
1F：→ kerwinhui: access='append' .... 04/13 09:25
2F：→ rex0707: 為什麼不在主程式開檔案 副程式寫資料進去就好了 04/13 11:21
感謝兩位!!!已經成功了~~
※ 編輯: blue33210 (36.224.7.33), 04/13/2016 18:57:58