COSH(3) - [MATHEMATICS:TRIGONOMETRIC] Hyperbolic cosine function
result = cosh(x)
elemental TYPE(kind=KIND) function cosh(x)TYPE(kind=KIND),intent(in) :: x
o TYPE may be real or complex of any kind. o The returned value will be of the same type and kind as the argument.
COSH(3) computes the hyperbolic cosine of X.
If X is of type complex its imaginary part is regarded as a value in radians.
o X : the value to compute the hyperbolic cosine of
If X is complex, the imaginary part of the result is in radians.
If X is real, the return value has a lower bound of one, COSH(X) >= 1.
Sample program:
program demo_cosh use, intrinsic :: iso_fortran_env, only : real32, real64, real128 implicit none real(kind=real64) :: x = 1.0_real64 write(*,*)X=,x,COSH(X=),cosh(x) end program demo_coshResults:
> X= 1.00000000000000 COSH(X=) 1.54308063481524
FORTRAN 77 , for a complex argument - Fortran 2008
Inverse function: ACOSH(3)
Fortran intrinsic descriptions
o Wikipedia:hyperbolic functions
Nemo Release 3.1 | cosh (3fortran) | November 02, 2024 |