英特尔Fortran用复杂的参数计算hyerbolic函数

Question

如官方文件所示： COSH

英特尔Fortran不允许用户将复杂参数输入到双曲余弦函数中。那么另外一种方法是什么呢？

Answer 1

Fortran 2008允许复杂的论证。一些编译器已经允许这样做。如果您没有（例如，ifort 15.0），请使用exp()计算它。

cosh(x) = ( exp(x) + exp(-x) ) / 2

或使用身份

cosh(x+iy) = cosh(x) * cos(y) + i * sinh(x) * sin(y)