This function extends FORTRAN's generic function SINH to evaluate the complex hyperbolic sine.
Function Return Value
SINH — Complex function value. (Output)
Required Arguments
Z — Complex number representing the angle in radians for which the complex hyperbolic sine is desired. (Input)
FORTRAN 90 Interface
Generic: SINH (Z)
Specific: The specific interface names are CSINH and ZSINH.
FORTRAN 77 Interface
Complex: CSINH (Z)
Double complex: The double complex function name is ZSINH.
Description
The argument z must satisfy
where ε = AMACH(4) is the machine precision and ℑz is the imaginary part of z.
Example
In this example, sinh(5 − i) is computed and printed.
USE SINH_INT
USE UMACH_INT
IMPLICIT NONE
! Declare variables
INTEGER NOUT
COMPLEX VALUE, Z
! Compute
Z = (5.0, -1.0)
VALUE = SINH(Z)
! Print the results
CALL UMACH (2, NOUT)
WRITE (NOUT,99999) Z, VALUE
99999 FORMAT (' SINH((', F6.3, ',', F6.3, ')) = (',&
F7.3, ',', F7.3, ')')
END
Output
SINH(( 5.000,-1.000)) = ( 40.092,-62.446)
|
PHONE: 713.784.3131 FAX:713.781.9260 |
