[問題] 如何輸出不會被覆蓋
大家好~ 我是程式新手
程式有問題想請教各位前輩
我有一個主程式、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://www.ptt.cc/bbs/Fortran/M.1460470908.A.B6A.html
→
04/13 09:25, , 1F
04/13 09:25, 1F
→
04/13 11:21, , 2F
04/13 11:21, 2F
感謝兩位!!!已經成功了~~
※ 編輯: blue33210 (36.224.7.33), 04/13/2016 18:57:58
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
