/*
 *   This file was automatically generated by version 1.7 of cextract.
 *   Manual editing not recommended.
 *
 *   Created: Fri Feb 23 20:31:13 1996
 *
 *   Modified (anyway) for PalmOS Feb 22, 1997, D.Jeff Dionne
 */

typedef struct {
 float r;
 float i;
}cmplxf;

/* Some useful constants.  */
#define M_E		2.7182818284590452354	/* e */
#define M_LOG2E		1.4426950408889634074	/* log_2 e */
#define M_LOG10E	0.43429448190325182765	/* log_10 e */
#define M_LN2		0.69314718055994530942	/* log_e 2 */
#define M_LN10		2.30258509299404568402	/* log_e 10 */
#define M_PI		3.14159265358979323846	/* pi */
#define M_PI_2		1.57079632679489661923	/* pi/2 */
#define M_PI_4		0.78539816339744830962	/* pi/4 */
#define M_1_PI		0.31830988618379067154	/* 1/pi */
#define M_2_PI		0.63661977236758134308	/* 2/pi */
#define M_2_SQRTPI	1.12837916709551257390	/* 2/sqrt(pi) */
#define M_SQRT2		1.41421356237309504880	/* sqrt(2) */
#define M_SQRT1_2	0.70710678118654752440	/* 1/sqrt(2) */


#if 1
extern double sin(double);
extern double cos(double);
extern double sqrt(double);
#else
extern float acos ( float x );
extern float acosh ( float xx );
extern int airy ( float xx, float *ai, float *aip, float *bi, float *bip );
extern float asin ( float xx );
extern float asinh ( float xx );
extern float atan2 ( float y, float x );
extern float atan ( float xx );
extern float atanh ( float xx );
extern float bdtrc ( int k, int n, float pp );
extern float bdtr ( int k, int n, float pp );
extern float bdtri ( int k, int n, float yy );
extern float beta ( float aa, float bb );
extern float cabs ( cmplxf *z );
extern void cacos ( cmplxf *z, cmplxf *w );
extern void cadd ( cmplxf *a, cmplxf *b, cmplxf *c );
extern void casin ( cmplxf *z, cmplxf *w );
extern void catan ( cmplxf *z, cmplxf *w );
extern float cbrt ( float xx );
extern void cchsh ( float xx, float *c, float *s );
extern void ccos ( cmplxf *z, cmplxf *w );
extern void ccot ( cmplxf *z, cmplxf *w );
extern void cdiv ( cmplxf *a, cmplxf *b, cmplxf *c );
extern float ceil ( float x );
extern void cexp ( cmplxf *z, cmplxf *w );
extern float chbevl ( float x, float *array, int n );
extern float chdtrc ( float dff, float xx );
extern float chdtr ( float dff, float xx );
extern float chdtri ( float dff, float yy );
extern void clog ( cmplxf *z, cmplxf *w );
extern void cmov ( short *a, short *b );
extern void cmul ( cmplxf *a, cmplxf *b, cmplxf *c );
extern void cneg ( cmplxf *a );
extern float cosdg ( float xx );
extern float cos ( float xx );
extern float cosh ( float xx );
extern float cotdg ( float x );
extern float cot ( float x );
extern void csin ( cmplxf *z, cmplxf *w );
extern void csqrt ( cmplxf *z, cmplxf *w );
extern void csub ( cmplxf *a, cmplxf *b, cmplxf *c );
extern void ctan ( cmplxf *z, cmplxf *w );
extern float ctans ( cmplxf *z );
extern float dawsn ( float xxx );
extern int dprec ( void );
extern float ellie ( float phia, float ma );
extern float ellik ( float phia, float ma );
extern float ellpe ( float xx );
extern int ellpj ( float uu, float mm, float *sn, float *cn, float *dn, float *ph );
extern float ellpk ( float xx );
extern float erfc ( float aa );
extern float erf ( float xx );
extern float exp10 ( float xx );
extern float exp2 ( float xx );
extern float exp ( float xx );
extern float expn ( int n, float xx );
extern float fac ( int i );
extern float fdtrc ( int ia, int ib, float xx );
extern float fdtr ( int ia, int ib, int xx );
extern float fdtri ( int ia, int ib, float yy );
extern float floor ( float x );
extern void fresnl ( float xxa, float *ssa, float *cca );
extern float frexp ( float x, int *pw2 );
extern float gamma ( float xx );
extern float gdtrc ( float aa, float bb, float xx );
extern float gdtr ( float aa, float bb, float xx );
extern float hyp2f0 ( float aa, float bb, float xx, int type, float *err );
extern float hyp2f1 ( float aa, float bb, float cc, float xx );
extern float hyperg ( float aa, float bb, float xx );
extern float i0e ( float x );
extern float i0 ( float x );
extern float i1e ( float xx );
extern float i1 ( float xx );
extern float igamc ( float aa, float xx );
extern float igam ( float aa, float xx );
extern float igami ( float aa, float yy0 );
extern float incbet ( float aaa, float bbb, float xxx );
extern float incbi ( float aaa, float bbb, float yyy0 );
extern float incbps ( float aa, float bb, float xx );
extern float iv ( float v, float x );
extern float j0 ( float xx );
extern float j1 ( float xx );
extern float jn ( int n, float xx );
extern float jv ( float nn, float xx );
extern float k0e ( float xx );
extern float k0 ( float xx );
extern float k1e ( float xx );
extern float k1 ( float xx );
extern float kn ( int nnn, float xx );
extern float ldexp ( float x, int pw2 );
extern int ldprec ( void );
extern float lgam ( float xx );
extern float log10 ( float xx );
extern float log2 ( float xx );
extern float log ( float xx );
/* extern int mtherr ( char *name, int code ); */
extern float nbdtrc ( int k, int n, float pp );
extern float nbdtr ( int k, int n, float pp );
extern float ndtr ( float aa );
extern float ndtri ( float yy0 );
extern float onef2 ( float aa, float bb, float cc, float xx, float *err );
extern float p1evl ( float xx, float *coef, int N );
extern float pdtrc ( int k, float mm );
extern float pdtr ( int k, float mm );
extern float pdtri ( int k, float yy );
extern void poladd ( float a[], int na, float b[], int nb, float c[] );
extern void polclr ( float *a, int n );
extern int poldiv ( float a[], int na, float b[], int nb, float c[] );
extern float poleva ( float *a, int na, float xx );
extern float polevl ( float xx, float *coef, int N );
extern void polini ( int maxdeg );
extern void polmov ( float *a, int na, float *b );
extern void polmul ( float a[], int na, float b[], int nb, float c[] );
extern void polprt ( float *a, int na, int d );
extern void polsbt ( float a[], int na, float b[], int nb, float c[] );
extern void polsub ( float a[], int na, float b[], int nb, float c[] );
extern float pow ( float x, float y );
extern float powi ( float x, int nn );
extern float psi ( float xx );
extern float redupi ( float xx );
extern float rgamma ( float xx );
extern int shichi ( float xx, float *si, float *ci );
extern int sici ( float xx, float *si, float *ci );
extern float sindg ( float xx );
extern float sin ( float xx );
extern float sinh ( float xx );
extern float spence ( float xx );
extern int sprec ( void );
extern float sqrt ( float xx );
extern float stdtr ( int k, float tt );
extern float struve ( float vv, float xx );
extern float tandg ( float x );
extern float tan ( float x );
extern float tanh ( float xx );
extern float threef0 ( float aa, float bb, float cc, float xx, float *err );
extern float y0 ( float xx );
extern float y1 ( float xx );
extern float yn ( int nn, float xx );
extern float yv ( float vv, float xx );
extern float zetac ( float xx );
extern float zeta ( float xx, float qq );
#endif