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)

Visual Numerics, Inc. Visual Numerics - Developers of IMSL and PV-WAVE http://www.vni.com/ PHONE: 713.784.3131 FAX:713.781.9260