atanh(x) computes the inverse hyperbolic tangent of x.
Fortran 2008 and later
result = atanh(x)
x - The type shall be real or complex.The return value has same type and kind as x. If x is complex, the imaginary part of the result is in radians and lies between .
program test_atanh
real, dimension(3) :: x = (/ -1.0, 0.0, 1.0 /)
write (*,*) atanh(x)
end program
Inverse function: tanh