185 lines
7.4 KiB
C
185 lines
7.4 KiB
C
|
/*
|
||
|
* This file was automatically generated by version 1.7 of cextract.
|
||
|
* Manual editing not recommended.
|
||
|
*
|
||
|
* Created: Fri Mar 31 19:17:33 1995
|
||
|
*/
|
||
|
extern double acosh ( double x );
|
||
|
extern int airy ( double, double *, double *, double *, double * );
|
||
|
extern double asin ( double );
|
||
|
extern double acos ( double );
|
||
|
extern double asinh ( double x );
|
||
|
extern double atan ( double );
|
||
|
extern double atan2 ( double y, double x );
|
||
|
extern double atanh ( double );
|
||
|
extern double bdtrc ( int k, int n, double p );
|
||
|
extern double bdtr ( int k, int n, double p );
|
||
|
extern double bdtri ( int k, int n, double y );
|
||
|
extern double beta ( double a, double b );
|
||
|
extern double lbeta ( double a, double b );
|
||
|
extern double btdtr ( double a, double b, double x );
|
||
|
extern double cbrt ( double );
|
||
|
extern double chbevl ( double, void *, int );
|
||
|
extern double chdtrc ( double df, double x );
|
||
|
extern double chdtr ( double df, double x );
|
||
|
extern double chdtri ( double df, double y );
|
||
|
//extern void clog ( cmplx *z, cmplx *w );
|
||
|
//extern void cexp ( cmplx *z, cmplx *w );
|
||
|
//extern void csin ( cmplx *z, cmplx *w );
|
||
|
//extern void ccos ( cmplx *z, cmplx *w );
|
||
|
//extern void ctan ( cmplx *z, cmplx *w );
|
||
|
extern void ccot ( cmplx *z, cmplx *w );
|
||
|
//extern void casin ( cmplx *z, cmplx *w );
|
||
|
//extern void cacos ( cmplx *z, cmplx *w );
|
||
|
//extern void catan ( cmplx *z, cmplx *w );
|
||
|
extern void cadd ( cmplx *a, cmplx *b, cmplx *c );
|
||
|
extern void csub ( cmplx *a, cmplx *b, cmplx *c );
|
||
|
extern void cmul ( cmplx *a, cmplx *b, cmplx *c );
|
||
|
extern void cdiv ( cmplx *a, cmplx *b, cmplx *c );
|
||
|
extern void cmov ( void *a, void *b );
|
||
|
extern void cneg ( cmplx *a );
|
||
|
//extern double cabs ( cmplx *z );
|
||
|
//extern void csqrt ( cmplx *z, cmplx *w );
|
||
|
extern double hypot ( double, double );
|
||
|
extern double cosh ( double );
|
||
|
extern double dawsn ( double xx );
|
||
|
extern void eigens ( double A[], double RR[], double E[], int N );
|
||
|
extern double ellie ( double, double );
|
||
|
extern double ellik ( double, double );
|
||
|
extern double ellpe ( double );
|
||
|
extern int ellpj ( double u, double m, double *sn, double *cn, double *dn, double *ph );
|
||
|
extern double ellpk ( double );
|
||
|
extern double exp10 ( double );
|
||
|
extern double exp1m ( double );
|
||
|
extern double exp2 ( double );
|
||
|
extern double expn ( int n, double x );
|
||
|
extern double fac ( int i );
|
||
|
extern double fdtrc ( int ia, int ib, double x );
|
||
|
extern double fdtr ( int ia, int ib, double x );
|
||
|
extern double fdtri ( int ia, int ib, double y );
|
||
|
extern int fftr ( double x[], int m0, double sine[] );
|
||
|
extern double ceil ( double x );
|
||
|
extern double fabs ( double );
|
||
|
extern double floor ( double );
|
||
|
extern double frexp ( double, int * );
|
||
|
extern double ldexp ( double, int );
|
||
|
extern int signbit ( double );
|
||
|
extern int isnan ( double );
|
||
|
extern int isfinite ( double );
|
||
|
extern double polevl ( double, void *, int );
|
||
|
extern double p1evl ( double, void *, int );
|
||
|
extern double exp ( double );
|
||
|
extern double log ( double );
|
||
|
extern double sin ( double );
|
||
|
extern double cos ( double );
|
||
|
extern double sqrt ( double );
|
||
|
extern int fresnl ( double xxa, double *ssa, double *cca );
|
||
|
extern double gamma ( double );
|
||
|
extern double lgam ( double );
|
||
|
extern double gdtr ( double a, double b, double x );
|
||
|
extern double gdtrc ( double a, double b, double x );
|
||
|
extern int gels ( double A[], double R[], int M, double EPS, double AUX[] );
|
||
|
extern double hyp2f1 ( double a, double b, double c, double x );
|
||
|
extern double hyperg ( double, double, double );
|
||
|
extern double hyp2f0 ( double a, double b, double x, int type, double *err );
|
||
|
extern double i0 ( double );
|
||
|
extern double i0e ( double x );
|
||
|
extern double i1 ( double );
|
||
|
extern double i1e ( double x );
|
||
|
extern double igamc ( double, double );
|
||
|
extern double igam ( double, double );
|
||
|
extern double igami ( double, double );
|
||
|
extern double incbet ( double, double, double );
|
||
|
extern double incbi ( double, double, double );
|
||
|
extern double iv ( double v, double x );
|
||
|
extern double j0 ( double );
|
||
|
extern double y0 ( double );
|
||
|
extern double j1 ( double );
|
||
|
extern double y1 ( double );
|
||
|
extern double jn ( int n, double x );
|
||
|
extern double jv ( double, double );
|
||
|
extern double k0 ( double x );
|
||
|
extern double k0e ( double x );
|
||
|
extern double k1 ( double x );
|
||
|
extern double k1e ( double x );
|
||
|
extern double kn ( int nn, double x );
|
||
|
extern int levnsn ( int n, double r[], double a[], double e[], double refl[] );
|
||
|
extern double log10 ( double );
|
||
|
extern double log2 ( double );
|
||
|
extern long lrand ( void );
|
||
|
extern long lsqrt ( long x );
|
||
|
extern int minv ( double A[], double X[], int n, double B[], int IPS[] );
|
||
|
extern int mmmpy ( int r, int c, double *A, double *B, double *Y );
|
||
|
extern int mtherr ( char *name, int code );
|
||
|
extern int mtransp ( int n, double *A, double *T );
|
||
|
extern int mvmpy ( int r, int c, double *A, double *V, double *Y );
|
||
|
extern double nbdtrc ( int k, int n, double p );
|
||
|
extern double nbdtr ( int k, int n, double p );
|
||
|
extern double nbdtri ( int k, int n, double p );
|
||
|
extern double ndtr ( double a );
|
||
|
extern double erfc ( double );
|
||
|
extern double erf ( double );
|
||
|
extern double ndtri ( double );
|
||
|
extern double pdtrc ( int k, double m );
|
||
|
extern double pdtr ( int k, double m );
|
||
|
extern double pdtri ( int k, double y );
|
||
|
extern double pow ( double, double );
|
||
|
extern double powi ( double, int );
|
||
|
extern double psi ( double );
|
||
|
extern void revers ( double y[], double x[], int n );
|
||
|
extern double rgamma ( double x );
|
||
|
extern double round ( double );
|
||
|
extern int sprec ( void );
|
||
|
extern int dprec ( void );
|
||
|
extern int ldprec ( void );
|
||
|
extern int shichi ( double x, double *si, double *ci );
|
||
|
extern int sici ( double x, double *si, double *ci );
|
||
|
extern double simpsn ( double f[], double delta );
|
||
|
extern int simq ( double A[], double B[], double X[], int n, int flag, int IPS[] );
|
||
|
extern double radian ( double d, double m, double s );
|
||
|
/*
|
||
|
extern int sincos ( double x, double *s, double *c, int flg );
|
||
|
*/
|
||
|
extern double sindg ( double x );
|
||
|
extern double cosdg ( double x );
|
||
|
extern double sinh ( double );
|
||
|
extern double spence ( double );
|
||
|
extern double stdtr ( int k, double t );
|
||
|
extern double stdtri ( int k, double p );
|
||
|
extern double onef2 ( double a, double b, double c, double x, double *err );
|
||
|
extern double threef0 ( double a, double b, double c, double x, double *err );
|
||
|
extern double struve ( double v, double x );
|
||
|
extern double tan ( double );
|
||
|
extern double cot ( double );
|
||
|
extern double tandg ( double x );
|
||
|
extern double cotdg ( double x );
|
||
|
extern double tanh ( double );
|
||
|
extern double log1p ( double );
|
||
|
extern double exmp1 ( double );
|
||
|
extern double cosm1 ( double x );
|
||
|
extern double yn ( int, double );
|
||
|
extern double zeta ( double x, double q );
|
||
|
extern double zetac ( double );
|
||
|
extern int drand ( double *a );
|
||
|
double smirnov ( int, double );
|
||
|
double smirnovi ( int, double );
|
||
|
double kolmogorov ( double );
|
||
|
double kolmogi ( double );
|
||
|
|
||
|
/* polyn.c */
|
||
|
extern void polini ( int maxdeg );
|
||
|
extern void polprt ( double a[], int na, int d );
|
||
|
extern void polclr ( double *a, int n );
|
||
|
extern void polmov ( double *a, int na, double *b );
|
||
|
extern void polmul ( double a[], int na, double b[], int nb, double c[] );
|
||
|
extern void poladd ( double a[], int na, double b[], int nb, double c[] );
|
||
|
extern void polsub ( double a[], int na, double b[], int nb, double c[] );
|
||
|
extern int poldiv ( double a[], int na, double b[], int nb, double c[] );
|
||
|
extern void polsbt ( double a[], int na, double b[], int nb, double c[] );
|
||
|
extern double poleva ( double a[], int na, double x );
|
||
|
/* polmisc.c */
|
||
|
extern void polatn ( double num[], double den[], double ans[], int nn );
|
||
|
extern void polsqt ( double pol[], double ans[], int nn );
|
||
|
extern void polsin ( double x[], double y[], int nn );
|
||
|
extern void polcos ( double x[], double y[], int nn );
|