TBCI Numerical high perf. C++ Library 2.8.0
zbesh.c File Reference

complex Bessel functions of third kind (Hankel) More...

#include "tbci/specfun/prototypes.h"
#include "tbci/specfun/prototypes2.h"
Include dependency graph for zbesh.c:

Go to the source code of this file.

Macros

#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

Detailed Description

complex Bessel functions of third kind (Hankel)

Definition in file zbesh.c.

Macro Definition Documentation

◆ diver

#define diver   ((integer *)&equiv_4 + 6)

◆ dmach

#define dmach   ((doublereal *)&equiv_4)

Referenced by d1mach_().

◆ imach

#define imach   ((integer *)&equiv_0)

Referenced by i1mach_().

◆ large

◆ log10

#define log10   ((integer *)&equiv_4 + 8)

Referenced by log10().

◆ output

#define output   ((integer *)&equiv_0 + 3)

Referenced by i1mach_().

◆ right

#define right   ((integer *)&equiv_4 + 4)

◆ small

#define small   ((integer *)&equiv_4)

Function Documentation

◆ d1mach_()

◆ dgamln_()

doublereal dgamln_ ( doublereal * z__,
integer * ierr )
extern

Definition at line 1019 of file zbesh.c.

References abs, c__14, c__4, c__5, d1mach_(), dgamln_(), doublereal, i1mach_(), integer, log(), max, min, and real.

Referenced by dgamln_(), zbknu_(), zmlri_(), and zseri_().

◆ i1mach_()

integer i1mach_ ( const integer * i__)

◆ myzabs_()

◆ xerror_()

int xerror_ ( char * mess,
integer * nmess,
integer * l1,
integer * l2,
ftnlen mess_len )
extern

Definition at line 1895 of file zbesh.c.

References c__1, c__9, do_lio(), e_wsfe(), e_wsle(), integer, min, s_wsfe(), s_wsle(), and xerror_().

Referenced by d1mach_(), and xerror_().

◆ zacai_()

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 )

◆ zacon_()

int zacon_ ( double * zr,
double * zi,
double * fnu,
integer * kode,
integer * mr,
integer * n,
double * yr,
double * yi,
integer * nz,
double * rl,
double * fnul,
double * tol,
double * elim,
double * alim )

Definition at line 2131 of file zbesh.c.

References abs, arg(), ascle, c__1, c__2, cos(), csgni, csgnr, cspni, cspnr, d1mach_(), d_sign(), doublereal, integer, max, min, myzabs_(), pi, real, sin(), zacon_(), zbinu_(), zbknu_(), zmlt_(), and zs1s2_().

Referenced by zacon_(), zbesh_(), and zbesk_().

◆ zasyi_()

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 )

Definition at line 2391 of file zbesh.c.

References abs, arg(), c__1, cos(), d1mach_(), doublereal, integer, min, myzabs_(), pi, real, sin(), sqrt(), zasyi_(), zdiv_(), zexp_(), zmlt_(), and zsqrt_().

Referenced by zacai_(), zasyi_(), and zbinu_().

◆ zbesh_()

int zbesh_ ( doublereal * zr,
doublereal * zi,
doublereal * fnu,
integer * kode,
integer * m,
integer * n,
doublereal * cyr,
doublereal * cyi,
integer * nz,
integer * ierr )

◆ zbinu_()

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 )
extern

Definition at line 2621 of file zbesh.c.

References abs, c__1, c__2, doublereal, integer, max, myzabs_(), real, zasyi_(), zbinu_(), zbuni_(), zmlri_(), zseri_(), zuoik_(), and zwrsk_().

Referenced by zacon_(), zbesi_(), zbesj_(), and zbinu_().

◆ zbknu_()

int zbknu_ ( double * zr,
double * zi,
double * fnu,
integer * kode,
integer * n,
double * yr,
double * yi,
integer * nz,
double * tol,
double * elim,
double * alim )

◆ zbuni_()

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 )
extern

Definition at line 3512 of file zbesh.c.

References abs, ascle, c__1, c__2, d1mach_(), doublereal, integer, max, myzabs_(), real, zbuni_(), zuni1_(), and zuni2_().

Referenced by zbinu_(), and zbuni_().

◆ zbunk_()

int zbunk_ ( double * zr,
double * zi,
double * fnu,
integer * kode,
integer * mr,
integer * n,
double * yr,
double * yi,
integer * nz,
double * tol,
double * elim,
double * alim )

Definition at line 3736 of file zbesh.c.

References abs, doublereal, integer, zbunk_(), zunk1_(), and zunk2_().

Referenced by zbesh_(), zbesk_(), and zbunk_().

◆ zdiv_()

int zdiv_ ( doublereal * ar,
doublereal * ai,
doublereal * br,
doublereal * bi,
doublereal * cr,
doublereal * ci )
extern

Definition at line 3778 of file zbesh.c.

References doublereal, myzabs_(), and zdiv_().

Referenced by zasyi_(), zbknu_(), zdiv_(), zrati_(), zseri_(), zunhj_(), and zunik_().

◆ zexp_()

int zexp_ ( const doublereal * ar,
const doublereal * ai,
doublereal * br,
doublereal * bi )
extern

Definition at line 3799 of file zbesh.c.

References cos(), doublereal, exp(), sin(), and zexp_().

Referenced by zairy_(), zasyi_(), zbknu_(), zexp_(), zmlri_(), and zs1s2_().

◆ zkscl_()

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 )
extern

Definition at line 3821 of file zbesh.c.

References ascle, cos(), doublereal, exp(), integer, log(), min, myzabs_(), sin(), zkscl_(), zlog_(), and zuchk_().

Referenced by zbknu_(), and zkscl_().

◆ zlog_()

int zlog_ ( doublereal * ar,
doublereal * ai,
doublereal * br,
doublereal * bi,
integer * ierr )
extern

Definition at line 3993 of file zbesh.c.

References abs, atan(), doublereal, integer, log(), myzabs_(), and zlog_().

Referenced by zbknu_(), zkscl_(), zlog_(), zmlri_(), zs1s2_(), zseri_(), zunhj_(), zunik_(), and zuoik_().

◆ zmlri_()

int zmlri_ ( doublereal * zr,
doublereal * zi,
doublereal * fnu,
integer * kode,
integer * n,
doublereal * yr,
doublereal * yi,
integer * nz,
doublereal * tol )
extern

Definition at line 4064 of file zbesh.c.

References c__1, d1mach_(), dgamln_(), doublereal, exp(), integer, max, min, myzabs_(), real, sqrt(), zexp_(), zlog_(), zmlri_(), and zmlt_().

Referenced by zacai_(), zbinu_(), and zmlri_().

◆ zmlt_()

int zmlt_ ( doublereal * ar,
doublereal * ai,
doublereal * br,
doublereal * bi,
doublereal * cr,
doublereal * ci )

Definition at line 4328 of file zbesh.c.

References doublereal, and zmlt_().

Referenced by zacon_(), zasyi_(), zbknu_(), zmlri_(), zmlt_(), and zseri_().

◆ zrati_()

int zrati_ ( doublereal * zr,
doublereal * zi,
doublereal * fnu,
integer * n,
doublereal * cyr,
doublereal * cyi,
doublereal * tol )

Definition at line 4346 of file zbesh.c.

References arg(), doublereal, integer, max, min, myzabs_(), real, sqrt(), zdiv_(), and zrati_().

Referenced by zrati_(), and zwrsk_().

◆ zs1s2_()

int zs1s2_ ( doublereal * zrr,
doublereal * zri,
doublereal * s1r,
doublereal * s1i,
doublereal * s2r,
doublereal * s2i,
integer * nz,
doublereal * ascle,
doublereal * alim,
integer * iuf )
extern

Definition at line 4524 of file zbesh.c.

References ascle, doublereal, integer, log(), max, myzabs_(), zexp_(), zlog_(), and zs1s2_().

Referenced by zacai_(), zacon_(), zs1s2_(), zunk1_(), and zunk2_().

◆ zseri_()

int zseri_ ( doublereal * zr,
doublereal * zi,
doublereal * fnu,
integer * kode,
integer * n,
doublereal * yr,
doublereal * yi,
integer * nz,
doublereal * tol,
doublereal * elim,
doublereal * alim )

Definition at line 4591 of file zbesh.c.

References ascle, c__1, cos(), d1mach_(), dgamln_(), doublereal, exp(), integer, min, myzabs_(), real, sin(), sqrt(), zdiv_(), zlog_(), zmlt_(), zseri_(), and zuchk_().

Referenced by zacai_(), zbinu_(), and zseri_().

◆ zshch_()

int zshch_ ( doublereal * zr,
doublereal * zi,
doublereal * cshr,
doublereal * cshi,
doublereal * cchr,
doublereal * cchi )
extern

Definition at line 4864 of file zbesh.c.

References cos(), cosh(), doublereal, sin(), sinh(), and zshch_().

Referenced by zbknu_(), and zshch_().

◆ zsqrt_()

int zsqrt_ ( const doublereal * ar,
const doublereal * ai,
doublereal * br,
doublereal * bi )
extern

Definition at line 4891 of file zbesh.c.

References abs, atan(), cos(), doublereal, myzabs_(), sin(), sqrt(), and zsqrt_().

Referenced by zairy_(), zasyi_(), zbknu_(), zbknu_(), zsqrt_(), zunhj_(), and zunik_().

◆ zuchk_()

int zuchk_ ( doublereal * yr,
doublereal * yi,
integer * nz,
doublereal * ascle,
doublereal * tol )

Definition at line 4965 of file zbesh.c.

References abs, ascle, doublereal, integer, max, min, and zuchk_().

Referenced by zbknu_(), zkscl_(), zseri_(), zuchk_(), zuni1_(), zuni2_(), zunk1_(), zunk2_(), and zuoik_().

◆ zunhj_()

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 )

Definition at line 4999 of file zbesh.c.

References abs, ac, atan(), c__1, cos(), d1mach_(), doublereal, integer, log(), myzabs_(), pi, pow_dd(), sin(), sqrt(), zdiv_(), zlog_(), zsqrt_(), and zunhj_().

Referenced by zunhj_(), zuni2_(), zunk2_(), and zuoik_().

◆ zuni1_()

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 )
extern

Definition at line 5691 of file zbesh.c.

References abs, ascle, c__0, c__1, c__2, cos(), d1mach_(), doublereal, exp(), integer, log(), max, min, myzabs_(), real, sin(), zuchk_(), zuni1_(), zunik_(), and zuoik_().

Referenced by zbuni_(), and zuni1_().

◆ zuni2_()

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 )

Definition at line 5969 of file zbesh.c.

References abs, ascle, c__0, c__1, c__2, cos(), d1mach_(), doublereal, exp(), integer, log(), max, min, myzabs_(), real, sin(), zairy_(), zuchk_(), zunhj_(), zuni2_(), and zuoik_().

Referenced by zbuni_(), and zuni2_().

◆ zunik_()

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 )
extern

Definition at line 6318 of file zbesh.c.

References abs, ac, c__1, d1mach_(), doublereal, integer, log(), zdiv_(), zlog_(), zsqrt_(), and zunik_().

Referenced by zuni1_(), zunik_(), zunk1_(), and zuoik_().

◆ zunk1_()

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 )
extern

Definition at line 6529 of file zbesh.c.

References abs, ascle, c__0, c__1, c__2, cos(), csgni, cspni, cspnr, d1mach_(), d_sign(), doublereal, exp(), integer, log(), max, myzabs_(), pi, real, sin(), zs1s2_(), zuchk_(), zunik_(), and zunk1_().

Referenced by zbunk_(), and zunk1_().

◆ zunk2_()

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 )

Definition at line 7100 of file zbesh.c.

References abs, ascle, c__0, c__1, c__2, cos(), csgni, cspni, cspnr, d1mach_(), d_sign(), doublereal, exp(), integer, log(), max, myzabs_(), pi, real, sin(), zairy_(), zs1s2_(), zuchk_(), zunhj_(), and zunk2_().

Referenced by zbunk_(), and zunk2_().

◆ zuoik_()

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 )

◆ zwrsk_()

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 )

Definition at line 8035 of file zbesh.c.

References ascle, c__1, c__2, cos(), d1mach_(), doublereal, integer, myzabs_(), sin(), zbknu_(), zrati_(), and zwrsk_().

Referenced by zbinu_(), and zwrsk_().

Variable Documentation

◆ ascle

◆ c__0

integer c__0 = 0
static

Definition at line 27 of file zbesh.c.

Referenced by zuni1_(), zuni2_(), zunk1_(), and zunk2_().

◆ c__1

integer c__1 = 1
static

Definition at line 22 of file zbesh.c.

◆ c__14

integer c__14 = 14
static

Definition at line 20 of file zbesh.c.

◆ c__15

integer c__15 = 15
static

Definition at line 17 of file zbesh.c.

◆ c__16

integer c__16 = 16
static

Definition at line 18 of file zbesh.c.

◆ c__2

integer c__2 = 2
static

Definition at line 23 of file zbesh.c.

◆ c__25

integer c__25 = 25
static

Definition at line 24 of file zbesh.c.

Referenced by d1mach_().

◆ c__4

integer c__4 = 4
static

Definition at line 16 of file zbesh.c.

◆ c__5

integer c__5 = 5
static

Definition at line 19 of file zbesh.c.

◆ c__9

integer c__9 = 9
static

Definition at line 21 of file zbesh.c.

◆ c_b147

doublereal c_b147 = .5
static

Definition at line 25 of file zbesh.c.

Referenced by zbknu_().

◆ c_b148

doublereal c_b148 = 0.
static

Definition at line 26 of file zbesh.c.

Referenced by zbknu_().

◆ csgni

doublereal csgni
static

Definition at line 51 of file zbesh.c.

Referenced by zacai_(), zacon_(), zbesh_(), zbesi_(), zbesj_(), zunk1_(), and zunk2_().

◆ csgnr

doublereal csgnr
static

Definition at line 51 of file zbesh.c.

Referenced by zacai_(), zacon_(), zbesh_(), zbesi_(), and zbesj_().

◆ cspni

doublereal cspni
static

Definition at line 51 of file zbesh.c.

Referenced by zacai_(), zacon_(), zunk1_(), and zunk2_().

◆ cspnr

doublereal cspnr
static

Definition at line 51 of file zbesh.c.

Referenced by zacai_(), zacon_(), zunk1_(), and zunk2_().