tanh(x) computes the hyperbolic tangent of
x = tanh(x)
x- The type shall be
The return value has same type and kind as
x is complex, the imaginary part of the result is in radians. If
real, the return value lies in the range
- 1 \\leq tanh(x) \\leq 1.
program test_tanh real(8) :: x = 2.1_8 x = tanh(x) end program test_tanh