HP 3000 Manuals

Compiler Library/XL Reference Manual

CTANH (or CTANH') 

CTANH calculates the hyperbolic tangent of a complex number.

Declaration 

Complex numbers in HP FORTRAN 77/XL programs are represented as an
ordered pair of real numbers:  one for the real part a and one for the
imaginary part b.  Thus, complex numbers occupy eight bytes.

        TYPE complex=RECORD
                      realpart:REAL;
                      imagpart:REAL;
                     END;

        FUNCTION CTANH(VAR x:complex):complex; EXTERNAL;

Accuracy 

Depends on the accuracy of SIN, COS, COSH, and SINH.

Attributes 

Parameter:                A complex number.

Result:                   A complex number.

HP FORTRAN 77/XL:         Callable as a system intrinsic:  Y=CTANH(X).

Error:                    See SIN, COS, SINH, and COSH error
                          descriptions.

MPE/iX 5.0 Documentation