|
Defines |
| #define | log10 ((integer *)&equiv_4 + 8) |
| #define | dmach ((doublereal *)&equiv_4) |
| #define | large ((integer *)&equiv_4 + 2) |
| #define | small ((integer *)&equiv_4) |
| #define | diver ((integer *)&equiv_4 + 6) |
| #define | right ((integer *)&equiv_4 + 4) |
| #define | imach ((integer *)&equiv_0) |
| #define | output ((integer *)&equiv_0 + 3) |
Functions |
| int | zuchk_ (doublereal *yr, doublereal *yi, integer *nz, doublereal *ascle, doublereal *tol) |
| int | zunhj_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *ipmtr, doublereal *tol, doublereal *phir, doublereal *phii, doublereal *argr, doublereal *argi, doublereal *zeta1r, doublereal *zeta1i, doublereal *zeta2r, doublereal *zeta2i, doublereal *asumr, doublereal *asumi, doublereal *bsumr, doublereal *bsumi) |
| int | zuoik_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *ikflg, integer *n, doublereal *yr, doublereal *yi, integer *nuf, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zacon_ (double *, double *, double *, integer *, integer *, integer *, double *, double *, integer *, double *, double *, double *, double *, double *) |
| int | zbknu_ (double *, double *, double *, integer *, integer *, double *, double *, integer *, double *, double *, double *) |
| int | zbunk_ (double *, double *, double *, integer *, integer *, integer *, double *, double *, integer *, double *, double *, double *) |
| doublereal | d1mach_ (const integer *) |
| integer | i1mach_ (const integer *) |
| doublereal | myzabs_ (const doublereal *, const doublereal *) |
| int | zs1s2_ (doublereal *zrr, doublereal *zri, doublereal *s1r, doublereal *s1i, doublereal *s2r, doublereal *s2i, integer *nz, doublereal *ascle, doublereal *alim, integer *iuf) |
| int | zseri_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *n, doublereal *yr, doublereal *yi, integer *nz, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zmlri_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *n, doublereal *yr, doublereal *yi, integer *nz, doublereal *tol) |
| int | zasyi_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *n, doublereal *yr, doublereal *yi, integer *nz, doublereal *rl, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zbinu_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *n, doublereal *cyr, doublereal *cyi, integer *nz, doublereal *rl, doublereal *fnul, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zshch_ (doublereal *zr, doublereal *zi, doublereal *cshr, doublereal *cshi, doublereal *cchr, doublereal *cchi) |
| int | zkscl_ (doublereal *zrr, doublereal *zri, doublereal *fnu, integer *n, doublereal *yr, doublereal *yi, integer *nz, doublereal *rzr, doublereal *rzi, doublereal *ascle, doublereal *tol, doublereal *elim) |
| int | zsqrt_ (const doublereal *ar, const doublereal *ai, doublereal *br, doublereal *bi) |
| int | zlog_ (doublereal *ar, doublereal *ai, doublereal *br, doublereal *bi, integer *ierr) |
| int | zdiv_ (doublereal *ar, doublereal *ai, doublereal *br, doublereal *bi, doublereal *cr, doublereal *ci) |
| int | zexp_ (const doublereal *ar, const doublereal *ai, doublereal *br, doublereal *bi) |
| int | zmlt_ (doublereal *ar, doublereal *ai, doublereal *br, doublereal *bi, doublereal *cr, doublereal *ci) |
| doublereal | dgamln_ (doublereal *z__, integer *ierr) |
| int | zbuni_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *n, doublereal *yr, doublereal *yi, integer *nz, integer *nui, integer *nlast, doublereal *fnul, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zwrsk_ (doublereal *zrr, doublereal *zri, doublereal *fnu, integer *kode, integer *n, doublereal *yr, doublereal *yi, integer *nz, doublereal *cwr, doublereal *cwi, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zuni1_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *n, doublereal *yr, doublereal *yi, integer *nz, integer *nlast, doublereal *fnul, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zuni2_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *n, doublereal *yr, doublereal *yi, integer *nz, integer *nlast, doublereal *fnul, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | xerror_ (char *mess, integer *nmess, integer *l1, integer *l2, ftnlen mess_len) |
| int | zunk1_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *mr, integer *n, doublereal *yr, doublereal *yi, integer *nz, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zunk2_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *mr, integer *n, doublereal *yr, doublereal *yi, integer *nz, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zunik_ (doublereal *zrr, doublereal *zri, doublereal *fnu, integer *ikflg, integer *ipmtr, doublereal *tol, integer *init, doublereal *phir, doublereal *phii, doublereal *zeta1r, doublereal *zeta1i, doublereal *zeta2r, doublereal *zeta2i, doublereal *sumr, doublereal *sumi, doublereal *cwrkr, doublereal *cwrki) |
| int | zbesh_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *m, integer *n, doublereal *cyr, doublereal *cyi, integer *nz, integer *ierr) |
| int | zacai_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *kode, integer *mr, integer *n, doublereal *yr, doublereal *yi, integer *nz, doublereal *rl, doublereal *tol, doublereal *elim, doublereal *alim) |
| int | zrati_ (doublereal *zr, doublereal *zi, doublereal *fnu, integer *n, doublereal *cyr, doublereal *cyi, doublereal *tol) |
Variables |
| static integer | c__4 = 4 |
| static integer | c__15 = 15 |
| static integer | c__16 = 16 |
| static integer | c__5 = 5 |
| static integer | c__14 = 14 |
| static integer | c__9 = 9 |
| static integer | c__1 = 1 |
| static integer | c__2 = 2 |
| static integer | c__25 = 25 |
| static doublereal | c_b147 = .5 |
| static doublereal | c_b148 = 0. |
| static integer | c__0 = 0 |
| static doublereal | ascle |
| static doublereal | csgni |
| static doublereal | csgnr |
| static doublereal | cspni |
| static doublereal | cspnr |