2
* This file was automatically generated by version 1.7 of cextract.
3
* Manual editing not recommended.
5
* Created: Fri Mar 31 19:17:33 1995
7
extern double acosh ( double x );
8
extern int airy ( double x, double *ai, double *aip, double *bi, double *bip );
9
extern double asin ( double x );
10
extern double acos ( double x );
11
extern double asinh ( double x );
12
extern double atan ( double x );
13
extern double atan2 ( double y, double x );
14
extern double atanh ( double x );
15
extern double bdtrc ( int k, int n, double p );
16
extern double bdtr ( int k, int n, double p );
17
extern double bdtri ( int k, int n, double y );
18
extern double beta ( double a, double b );
19
extern double lbeta ( double a, double b );
20
extern double btdtr ( double a, double b, double x );
21
extern double cbrt ( double x );
22
extern double chbevl ( double x, void *P, int n );
23
extern double chdtrc ( double df, double x );
24
extern double chdtr ( double df, double x );
25
extern double chdtri ( double df, double y );
27
extern void clog ( cmplx *z, cmplx *w );
28
extern void cexp ( cmplx *z, cmplx *w );
29
extern void csin ( cmplx *z, cmplx *w );
30
extern void ccos ( cmplx *z, cmplx *w );
31
extern void ctan ( cmplx *z, cmplx *w );
32
extern void ccot ( cmplx *z, cmplx *w );
33
extern void casin ( cmplx *z, cmplx *w );
34
extern void cacos ( cmplx *z, cmplx *w );
35
extern void catan ( cmplx *z, cmplx *w );
36
extern void cadd ( cmplx *a, cmplx *b, cmplx *c );
37
extern void csub ( cmplx *a, cmplx *b, cmplx *c );
38
extern void cmul ( cmplx *a, cmplx *b, cmplx *c );
39
extern void cdiv ( cmplx *a, cmplx *b, cmplx *c );
40
extern void cmov ( void *a, void *b );
41
extern void cneg ( cmplx *a );
43
/*extern double cabs ( cmplx *z );*/
44
/* extern void csqrt ( cmplx *z, cmplx *w );*/
45
extern double hypot ( double x, double y );
46
extern double cosh ( double x );
47
extern double dawsn ( double xx );
48
extern void eigens ( double A[], double RR[], double E[], int N );
49
extern double ellie ( double phi, double m );
50
extern double ellik ( double phi, double m );
51
extern double ellpe ( double x );
52
extern int ellpj ( double u, double m, double *sn, double *cn, double *dn, double *ph );
53
extern double ellpk ( double x );
54
extern double exp ( double x );
55
extern double exp10 ( double x );
56
extern double exp1m ( double x );
57
extern double exp2 ( double x );
58
extern double expn ( int n, double x );
59
extern double fabs ( double x );
60
extern double fac ( int i );
61
extern double fdtrc ( double a, double b, double x );
62
extern double fdtr ( double a, double b, double x );
63
extern double fdtri ( double a, double b, double y );
65
extern int fftr ( double x[], int m0, double sine[] );
67
extern double ceil ( double x );
68
extern double floor ( double x );
69
extern double frexp ( double x, int *pw2 );
70
extern double ldexp ( double x, int pw2 );
71
/* extern int signbit ( double x );
72
extern int isnan ( double x );
73
extern int isfinite ( double x );
76
extern int cephes_isnan ( double x );
77
#define isnan cephes_isnan
79
extern int fresnl ( double xxa, double *ssa, double *cca );
80
extern double Gamma ( double x );
81
extern double lgam ( double x );
82
extern double gdtr ( double a, double b, double x );
83
extern double gdtrc ( double a, double b, double x );
84
extern int gels ( double A[], double R[], int M, double EPS, double AUX[] );
85
extern double hyp2f1 ( double a, double b, double c, double x );
86
extern double hyperg ( double a, double b, double x );
87
extern double hyp2f0 ( double a, double b, double x, int type, double *err );
88
extern double i0 ( double x );
89
extern double i0e ( double x );
90
extern double i1 ( double x );
91
extern double i1e ( double x );
92
extern double igamc ( double a, double x );
93
extern double igam ( double a, double x );
94
extern double igami ( double a, double y0 );
95
extern double incbet ( double aa, double bb, double xx );
96
extern double incbi ( double aa, double bb, double yy0 );
97
extern double iv ( double v, double x );
98
extern double j0 ( double x );
99
extern double y0 ( double x );
100
extern double j1 ( double x );
101
extern double y1 ( double x );
102
extern double jn ( int n, double x );
103
extern double jv ( double n, double x );
104
extern double k0 ( double x );
105
extern double k0e ( double x );
106
extern double k1 ( double x );
107
extern double k1e ( double x );
108
extern double kn ( int nn, double x );
110
extern int levnsn ( int n, double r[], double a[], double e[], double refl[] );
112
extern double log ( double x );
113
extern double log10 ( double x );
115
extern double log2 ( double x );
117
extern long lrand ( void );
118
extern long lsqrt ( long x );
119
extern int minv ( double A[], double X[], int n, double B[], int IPS[] );
120
extern int mmmpy ( int r, int c, double *A, double *B, double *Y );
121
extern int mtherr ( char *name, int code );
122
extern double polevl ( double x, void *P, int N );
123
extern double p1evl ( double x, void *P, int N );
124
extern void mtransp ( int n, double *A, double *T );
125
extern void mvmpy ( int r, int c, double *A, double *V, double *Y );
126
extern double nbdtrc ( int k, int n, double p );
127
extern double nbdtr ( int k, int n, double p );
128
extern double nbdtri ( int k, int n, double p );
129
extern double ndtr ( double a );
130
extern double erfc ( double a );
131
extern double erf ( double x );
132
extern double ndtri ( double y0 );
133
extern double pdtrc ( int k, double m );
134
extern double pdtr ( int k, double m );
135
extern double pdtri ( int k, double y );
136
extern double pow ( double x, double y );
137
extern double powi ( double x, int nn );
138
extern double psi ( double x );
139
extern void revers ( double y[], double x[], int n );
140
extern double rgamma ( double x );
141
extern double round ( double x );
142
extern int sprec ( void );
143
extern int dprec ( void );
144
extern int ldprec ( void );
145
extern int shichi ( double x, double *si, double *ci );
146
extern int sici ( double x, double *si, double *ci );
147
extern double simpsn ( double f[], double delta );
148
extern int simq ( double A[], double B[], double X[], int n, int flag, int IPS[] );
149
extern double sin ( double x );
150
extern double cos ( double x );
151
extern double radian ( double d, double m, double s );
153
extern void sincos ( double x, double *s, double *c, int flg );
155
extern double sindg ( double x );
156
extern double cosdg ( double x );
157
extern double sinh ( double x );
158
extern double spence ( double x );
159
extern double sqrt ( double x );
160
extern double stdtr ( int k, double t );
161
extern double stdtri ( int k, double p );
162
extern double onef2 ( double a, double b, double c, double x, double *err );
163
extern double threef0 ( double a, double b, double c, double x, double *err );
164
extern double struve ( double v, double x );
165
extern double tan ( double x );
166
extern double cot ( double x );
167
extern double tandg ( double x );
168
extern double cotdg ( double x );
169
extern double tanh ( double x );
170
extern double log1p ( double x );
171
extern double expm1 ( double x );
172
extern double cosm1 ( double x );
173
extern double yn ( int n, double x );
174
extern double zeta ( double x, double q );
175
extern double zetac ( double x );
176
extern int drand ( double *a );
179
extern void polini ( int maxdeg );
180
extern void polprt ( double a[], int na, int d );
181
extern void polclr ( double *a, int n );
182
extern void polmov ( double *a, int na, double *b );
183
extern void polmul ( double a[], int na, double b[], int nb, double c[] );
184
extern void poladd ( double a[], int na, double b[], int nb, double c[] );
185
extern void polsub ( double a[], int na, double b[], int nb, double c[] );
186
extern int poldiv ( double a[], int na, double b[], int nb, double c[] );
187
extern void polsbt ( double a[], int na, double b[], int nb, double c[] );
188
extern double poleva ( double a[], int na, double x );
190
extern void polatn ( double num[], double den[], double ans[], int nn );
191
extern void polsqt ( double pol[], double ans[], int nn );
192
extern void polsin ( double x[], double y[], int nn );
193
extern void polcos ( double x[], double y[], int nn );