Fortran 板


LINE

各位高手們好, 因為先前筆電跑了一週之後熱當,除了買散熱墊以外,想請問怎麼處理多階段輸出? 假設目前跑10萬次,能否每1萬次輸出一個檔? stat_test1_2_10000.dat 從1到10000次 stat_test1_2_20000.dat 從10001到20000次 或是每1萬次輸出一個檔,但涵蓋先前的次數? stat_test1_2_10000.dat 從1到10000次 stat_test1_2_20000.dat 從1到20000次 不知道上述兩種哪一種比較容易?還是其實都差不多只是因為我不會所以覺得很卡。 萬一跑次數不夠可以讀檔接續,或沒跑完也可以先抓部分數據。就不用再手動處理。 目前只有純粹寫入一個檔,我有爬過下面幾篇教學討論文,但不是很理解。 標題 Re: [問題] 請問如何在輸出檔名中包含變數 標題 Re: [問題] 如何輸出連續的檔名? 現行檔open file如下,就是一直持續累計下去的。後面的主程式才有write。 不太確定如果要加,是應該加在前面這裡?還是後面主程式執行的地方? open( unit = 2 & ,file = 'stat_test1_2.dat' & ,status = 'unknown' & ,access = 'sequential' & ,form = 'formatted') close (unit=2, status='delete') open( unit = 2 & ,file = 'stat_test1_2.dat' & ,status = 'new' & ,access = 'sequential' & ,form = 'formatted') 先謝謝願意幫忙的高手!已經找了兩天還是沒有頭緒,所以才貿然上來發問。 不好意思,我是新手,如果問題很low,還請見諒! -- 「機會是無法貯存的!你只能選擇努力,或是放棄。」 《筆談公關小姐》 --



※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.161.125.217
1F:→ Cypresslin:為啥你的程式要先開檔案再刪掉?為了覆蓋掉舊的檔案嗎? 06/29 11:40
2F:→ FainaTseng:對 因為是覆蓋舊的檔案:) 06/29 13:20
※ 編輯: FainaTseng 來自: 140.119.66.154 (06/29 13:21)
3F:推 roythepigmy:你的資料是每計算一次就輸出到.DAT 還是先存在 06/29 13:45
4F:→ roythepigmy:在程式中 最後再一次寫入? 06/29 13:45
5F:→ Cypresslin:哦~不過其實status='unknown'寫入時就會覆蓋舊的了 06/29 15:50
6F:→ FainaTseng:會每一次都寫入.dat檔。想要拆成不同檔是因為當機時 06/29 16:17
7F:→ FainaTseng:抓資料出來的時候因為沒跑完會無法切齊 得手動排版 06/29 16:17
8F:→ FainaTseng:所以想請問大家有沒有方式就是每跑幾次輸出一個檔 06/29 16:18
9F:→ FainaTseng:這樣就算程式跑到一半中斷還是有完全的輸出 只是沒跑完 06/29 16:19
10F:→ FainaTseng:另外一個原因是現在跑10萬次發現不夠 就可以接續跑 06/29 16:20
11F:→ FainaTseng:不用從頭開始(因為上次跑了一週多才跑到10萬次) 06/29 16:20
12F:→ FainaTseng:手動切齊現在可行是因為跑的job還算少 但之後會上百筆 06/29 16:22
13F:→ FainaTseng:所以似乎得有個更聰明一點的方法? 06/29 16:23
14F:→ Cypresslin:可是你現在已經是每次運算都寫入了,這樣對於隨時要中 06/29 16:31
15F:→ Cypresslin:斷來說是最好,反正何時停他輸出就停在哪,所以我看不 06/29 16:32
16F:→ Cypresslin:大懂你希望"每跑幾次輸出一個檔",如果是格式會跑掉造 06/29 16:33
17F:→ Cypresslin:成無法切齊(?)這就跟你write的部份有關,而接續計算 06/29 16:33
18F:→ Cypresslin:也要看你程式是怎麼寫的(運算時需要什麼資料) 06/29 16:34
19F:→ roythepigmy:我猜他是當機時會輸出資料不完整 造成後續不好讀入 06/29 16:37
20F:→ roythepigmy:要重跑要手動調整一下資料 06/29 16:38
21F:→ roythepigmy:希望是 -.-||| 06/29 16:38
22F:→ FainaTseng:就是樓上說的意思:) 06/29 17:48
23F:→ FainaTseng:是輸出資料不完整所以得手動 格式都是正確的 06/29 18:02
24F:→ george1224:你使用的是windows的系統嗎?? 還是linux的 06/29 22:20
25F:→ george1224:我不知道會不會是這個樣子造成的原因 06/29 22:20
26F:→ FainaTseng:那台是windows系統:) 06/30 10:59
27F:→ george1224:我想你可以再給一個變數 給他做+1的運算 06/30 18:26
28F:→ george1224:之後再用判斷輸出然後再用變數的連續檔案輸出 06/30 18:29
29F:→ george1224:另外 在視窗上輸出的內容建議不要太多 這樣會消耗 06/30 18:29
30F:→ george1224:大量資源在顯示上面,我想這也有可能是當機的原因吧? 06/30 18:29
31F:→ Cypresslin:那這樣的話看你資料怎樣才算是"完整",弄一個判斷式讓 06/30 21:13
32F:→ Cypresslin:你的資料算到"完整"之後再輸出就好 06/30 21:14







like.gif 您可能會有興趣的文章
icon.png[問題/行為] 貓晚上進房間會不會有憋尿問題
icon.pngRe: [閒聊] 選了錯誤的女孩成為魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一張
icon.png[心得] EMS高領長版毛衣.墨小樓MC1002
icon.png[分享] 丹龍隔熱紙GE55+33+22
icon.png[問題] 清洗洗衣機
icon.png[尋物] 窗台下的空間
icon.png[閒聊] 双極の女神1 木魔爵
icon.png[售車] 新竹 1997 march 1297cc 白色 四門
icon.png[討論] 能從照片感受到攝影者心情嗎
icon.png[狂賀] 賀賀賀賀 賀!島村卯月!總選舉NO.1
icon.png[難過] 羨慕白皮膚的女生
icon.png閱讀文章
icon.png[黑特]
icon.png[問題] SBK S1安裝於安全帽位置
icon.png[分享] 舊woo100絕版開箱!!
icon.pngRe: [無言] 關於小包衛生紙
icon.png[開箱] E5-2683V3 RX480Strix 快睿C1 簡單測試
icon.png[心得] 蒼の海賊龍 地獄 執行者16PT
icon.png[售車] 1999年Virage iO 1.8EXi
icon.png[心得] 挑戰33 LV10 獅子座pt solo
icon.png[閒聊] 手把手教你不被桶之新手主購教學
icon.png[分享] Civic Type R 量產版官方照無預警流出
icon.png[售車] Golf 4 2.0 銀色 自排
icon.png[出售] Graco提籃汽座(有底座)2000元誠可議
icon.png[問題] 請問補牙材質掉了還能再補嗎?(台中半年內
icon.png[問題] 44th 單曲 生寫竟然都給重複的啊啊!
icon.png[心得] 華南紅卡/icash 核卡
icon.png[問題] 拔牙矯正這樣正常嗎
icon.png[贈送] 老莫高業 初業 102年版
icon.png[情報] 三大行動支付 本季掀戰火
icon.png[寶寶] 博客來Amos水蠟筆5/1特價五折
icon.pngRe: [心得] 新鮮人一些面試分享
icon.png[心得] 蒼の海賊龍 地獄 麒麟25PT
icon.pngRe: [閒聊] (君の名は。雷慎入) 君名二創漫畫翻譯
icon.pngRe: [閒聊] OGN中場影片:失蹤人口局 (英文字幕)
icon.png[問題] 台灣大哥大4G訊號差
icon.png[出售] [全國]全新千尋侘草LED燈, 水草

請輸入看板名稱,例如:WOW站內搜尋

TOP