作者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