[問題] [fortran] do...enddo迴圈中的檔案無法寫入??

[irlmpo (無心插柳柳橙汁)]

program test
open(11,file="in.dat")
open(12,file="out.txt")
real a,b
real :: c(100)
read(11,*)a,b
close(11)
do i=1,100
c(i)=a+i**b
write(12,*)c(i)
enddo
close(12)
end

結果out.txt中沒有寫入任何文字，這是什麼原因啊?
找好久找不出原因，請明白的版友指點一下吧!

m(_ _)m

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 125.232.236.219
推 souline:把a b 直接令在程式裡面試試看