Compiler Library/XL Reference Manual (32650-90029)

2- 10
Attributes
Parameter: Any complex number representable in two real
numbers: one for a and one for b .
Result: A complex number.
HP FORTRAN 77/XL: Intrinsic function: Y=CSQRT(X).
Error: If any part of the argument is a NaN, there are
two cases. If the INVALID trap is enabled, the
message "COMPLEX SQRT: ANY PART OF THE ARGUMENT
= NaN" occurs. Otherwise, the INVALID flag is
set. In either case, a quiet NaN is returned
to both the real and imaginary part.
CTAN (or CTAN')
CTAN calculates the 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 CTAN(VAR x:complex):complex; EXTERNAL;
Accuracy
Depends on the accuracy of SIN, COS, SINH, and COSH.
Attributes
Parameter: A complex number.
Result: A complex number.
HP FORTRAN 77/XL: Intrinsic function: Y=CTAN(X).
Error: See SIN, COS, SINH, and COSH error
descriptions.
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.