[問題] Write出現NaN 卻又神奇的消失!!
因為程式有點長 就不全po上來了
基本上問題重點的部分是
------
! Name, open and head output file:
write (*,*) ' Enter output file name:'
read (*,10) output
open (unit=8, file=output, status='unknown')
t_loop: do j= 1, n
...
...
write (8, 40) t, y, r1 ! y is a 4*1 array
40 format (F14.5, 5E14.5)
...
enddo t_loop
------
程式執行的結果
所有的數值都被寫成NaN在output file裡
但是神奇的事情是
只要在write變數這個command之前任何一個地方 loop外也行
加入任意一個print*的指令 不管print字或是變數
例如
print*, 'test'
t_loop ...
...
那麼所有的數值就會正正確確的寫入檔案(表示計算部分應該沒有出錯?)
請問到底是什麼事情造成了這個奇怪的現象呢?
實在是令我百思不得其解呀....
只能來像板上的高手求救了 感謝
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.158.62.232
推
05/29 09:19, , 1F
05/29 09:19, 1F
→
05/29 10:00, , 2F
05/29 10:00, 2F
推
05/29 10:52, , 3F
05/29 10:52, 3F
→
05/30 10:08, , 4F
05/30 10:08, 4F
推
06/02 05:13, , 5F
06/02 05:13, 5F
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章