Re: [問題] linux上的指令

[bluehaerts (5858笨58)]

※ 引述《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
→ noonee:說明說的很清楚啦  這個complier不支持這種格式啊
→ noonee:建議你去用 fortran 77的寫法從寫過
→ bluehaerts:謝謝你 剛剛gfortran 有過
推 meteorology:喔～因為自己習慣在上面打implicit none的指令
→ meteorology:所以一看到程式會認為沒有對方程式做宣告的動作
→ charlesdc:洗鏡光把細菌都殺光光^^