Listing 5

/********************************************
**                                         **
**  File CMPLX.H                           **
**                                         **
**  Complex Function Include File          **
**                                         **
**  Maynard A. Wright, P. E. 4-16-90       **
**                                         **
********************************************/

#ifndef struct cmplx_nmbr

struct cmplx_nmbr

{   double rea
   double imag;

} arg, arg1, arg2, answer;

#endif

 /*  Function Prototypes */

struct cmplx_nmbr csinh(struct cmplx_nmbr);
struct cmplx_nmbr ccosh(struct cmplx_nmbr);
struct cmplx_nmbr ctanh(struct cmplx_nmbr);
struct cmplx_nmbr catnh(struct cmplx_nmbr);
struct cmplx_nmbr csin(struct cmplx_nmbr);
struct cmplx_nmbr ccos(struct cmplx_nmbr);
struct cmplx_nmbr ctan(struct cmplx_nmbr);
struct cmplx_nmbr catn(struct cmplx_nmbr);
struct cmplx_nmbr cloge(struct cmplx_nmbr);
struct cmplx_nmbr clog10(struct cmplx_nmbr);
struct cmplx_nmbr cexp(struct cmplx_nmbr);
struct cmplx_nmbr cten2x(struct cmplx_nmbr);
struct cmplx nmbr cmplxinv(struct cmplx_nmbr);
struct cmplx_nmbr cmplxadd(struct cmplx_nmbr,
                      struct cmplx_nmbr);
struct cmplx_nmbr cmplxsub(struct cmplx_nmbr,
                      struct cmplx_nmbr);
struct cmplx_nmbr cmplxmul(struct cmplx_nmbr,
                      struct cmplx_nmbr);
struct cmplx_nmbr cmplxdiv(struct cmplx_nmbr,
                      struct cmplx_nmbr);