[問題] 有沒有插入write竟然會影響結果!
我遇到了幾次這種奇怪的問題
以下面的do loop為例
AV_Vi=0d0
do io=1,neff(is)
do ii=1,N
do jj=1,L+1
AV_Vi(io)=AV_Vi(io)+Vi(ii,jj,io)*den_orb(ii,jj,io)
/ *Weight(ii,jj) ! eq 20
end do
end do
end do
Vi,den_orb,Weight 在前面都有算出數值了
結果我發現在這都變成0了
但如果我在剛算出Vi的地方插進 write(*,*)檢查算出來的值
最後結果忽然又變正常了
write明明只是輸出 不應該影響運算啊...
但我已經不只第一次遇到這種問題了
想請教一下原因
謝謝大家~
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 114.24.4.52
推
09/02 05:24, , 1F
09/02 05:24, 1F
推
09/02 14:22, , 2F
09/02 14:22, 2F
→
09/02 14:24, , 3F
09/02 14:24, 3F
→
09/03 03:22, , 4F
09/03 03:22, 4F
→
09/03 13:19, , 5F
09/03 13:19, 5F
→
09/03 13:39, , 6F
09/03 13:39, 6F
推
09/03 13:41, , 7F
09/03 13:41, 7F
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
