作者bluehaerts (5858笨58)
看板Fortran
標題Re: [問題] linux上的指令
時間Thu Dec 4 12:48:18 2008
※ 引述《bluehaerts (5858笨58)》之銘言:
program fun
real x, y
real , external :: f
do while (.true.)
read(*,*) x ! 使用者輸入 x
y = f(x) ! 呼叫f函數計算x2-2x+1
print *, y
end do
end
real function f(x)
! 宣告函數 f 傳回的型態為real
real x
f = x**2-2*x+1
return
end
唉 我輸了 翻書 書上都寫的不清不楚的
然後學校課本用洗鏡光的課本 寫的範例真是讓人覺得XXXX
meteorology大大說的 要宣告主程式
上面這格範例 是我GOOLE上找到的
可是還是有出現
op.f: In program `fun':
op.f:3:
real , external :: f
^
Fortran 90 feature at (^) unsupported
幫我解釋一下 這邊又是哪裡錯了 囧
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.134.140.40
1F:→ noonee:說明說的很清楚啦 這個complier不支持這種格式啊 12/04 12:55
2F:→ noonee:建議你去用 fortran 77的寫法從寫過 12/04 12:55
3F:→ bluehaerts:謝謝你 剛剛gfortran 有過 12/04 13:01
4F:推 meteorology:喔~因為自己習慣在上面打implicit none的指令 12/04 15:04
5F:→ meteorology:所以一看到程式會認為沒有對方程式做宣告的動作 12/04 15:04
6F:→ charlesdc:洗鏡光把細菌都殺光光^^ 12/05 00:13