home *** CD-ROM | disk | FTP | other *** search
- type
- ComplexBase_t=struct{
- floatcmpl_real;
- floatcmpl_imag;
- },
-
- complex=("_cmpl",ComplexBase_t,
- OP_ADD|OP_SUB|OP_MUL|OP_DIV|
- OP_NEG|OP_CPR|OP_PUT|OP_GET);
-
- extern
- cmplInitialize()void,
- cmpl(floatre,im)complex,
- cmplRe(complexc)float,
- cmplIm(complexc)float,
- cmplAbs(complexc)float,
- cmplSqrt(complexn)complex,
- cmplArg(complexn)float,
- cmplNorm(complexn)float,
- cmplConj(complexn)complex,
- cmplExp(complexn)complex,
- cmplLog(complexn)complex,
- cmplSin(complexn)complex,
- cmplCos(complexn)complex,
- cmplTan(complexn)complex,
- /*
- cmplAsin(complexn)complex,
- cmplAcos(complexn)complex,
- */
- cmplAtan(complexn)complex;
-