回 帖 发 新 帖 刷新版面

主题:复数函数定义

请教各位大神:
假如将这个复数函数作为参数传递之前,想先对其定义:
complex function f(x)
inplicit none
real(kind=8)::x
f=(cos(x),sin(x))
return 
end program


像这样定义一个复数函数为什么不行呢!正确的定义格式应该是怎样的呢!
恳请大神们指点迷津!

回复列表 (共2个回复)

沙发

想吧两个实数组合成复数用cmplx
f=cmplx(cos(x),sin(x), kind=8)

板凳

[quote]想吧两个实数组合成复数用cmplx
f=cmplx(cos(x),sin(x), kind=8)[/quote]
貌似实数是常数时就可以
我忘了

我来回复

您尚未登录,请登录后再回复。点此登录或注册