2 * This file comes from the cephes math library, which was
3 * released under the GPLV2+ license as a part of the Debian labplot
4 * package (I've included the GPLV2 license reference here to make
5 * this clear) - Keith Packard <keithp@keithp.com>
7 * Cephes Math Library Release 2.0: April, 1987
8 * Copyright 1984, 1987 by Stephen L. Moshier
9 * Direct inquiries to 30 Frost Street, Cambridge, MA 02140
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published by
13 * the Free Software Foundation; version 2 of the License.
15 * This program is distributed in the hope that it will be useful, but
16 * WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * General Public License for more details.
20 * You should have received a copy of the GNU General Public License along
21 * with this program; if not, write to the Free Software Foundation, Inc.,
22 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
25 * Prototypes of Cephes functions
31 /* Variable for error reporting. See mtherr.c. */
35 extern int airy ( double x, double *ai, double *aip, double *bi, double *bip );
36 extern double beta ( double a, double b );
37 extern double lbeta ( double a, double b );
38 extern double chdtrc ( double df, double x );
39 extern double chdtr ( double df, double x );
40 extern double chdtri ( double df, double y );
41 extern double dawsn ( double xx );
42 extern double ellie ( double phi, double m );
43 extern double ellik ( double phi, double m );
44 extern double ellpe ( double x );
45 extern double ellpk ( double x );
46 extern double expn ( int n, double x );
47 extern double fac ( int i );
48 extern double fdtrc ( int ia, int ib, double x );
49 extern double fdtr ( int ia, int ib, double x );
50 extern double fdtri ( int ia, int ib, double y );
51 extern double frexp ( double x, int *pw2 );
52 extern double ldexp ( double x, int pw2 );
53 extern int fresnl ( double xxa, double *ssa, double *cca );
54 extern double gdtr ( double a, double b, double x );
55 extern double gdtrc ( double a, double b, double x );
56 extern double hyp2f0 ( double a, double b, double x, int type, double *err );
57 extern double hyp2f1 ( double a, double b, double c, double x );
58 extern double hyperg ( double a, double b, double x );
60 extern double i0 ( double x );
61 extern double i0e ( double x );
63 extern double i1 ( double x );
64 extern double i1e ( double x );
65 extern double iv ( double v, double x );
66 extern double igamc ( double a, double x );
67 extern double igam ( double a, double x );
68 extern double igami ( double a, double y0_ );
69 extern double incbet ( double aa, double bb, double xx );
70 extern double incbi ( double aa, double bb, double yy0 );
71 extern double jv ( double n, double x );
72 extern double k0 ( double x );
73 extern double k0e ( double x );
74 extern double k1 ( double x );
75 extern double k1e ( double x );
76 extern double kn ( int nn, double x );
77 extern int mtherr ( char *name, int code );
78 extern double ndtr ( double a );
79 extern double ndtri ( double y0_ );
80 extern double pdtrc ( int k, double m );
81 extern double pdtr ( int k, double m );
82 extern double pdtri ( int k, double y );
83 extern double psi ( double x );
84 extern void revers ( double y[], double x[], int n );
85 extern double true_gamma ( double x );
86 extern double rgamma ( double x );
87 extern int shichi ( double x, double *si, double *ci );
88 extern int sici ( double x, double *si, double *ci );
89 extern double spence ( double x );
90 extern double stdtr ( int k, double t );
91 extern double stdtri ( int k, double p );
92 extern double onef2 ( double a, double b, double c, double x, double *err );
93 extern double threef0 ( double a, double b, double c, double x, double *err );
94 extern double struve ( double v, double x );
95 extern double log1p ( double x );
96 extern double expm1 ( double x );
97 extern double cosm1 ( double x );
98 extern double yv ( double v, double x );
99 extern double zeta ( double x, double q );
100 extern double zetac ( double x );
103 extern double chbevl ( double x, void *P, int n );
105 extern double polevl ( double x, void *P, int n );
106 extern double p1evl ( double x, void *P, int n );
109 extern void polini ( int maxdeg );
110 extern void polprt ( double a[], int na, int d );
111 extern void polclr ( double *a, int n );
112 extern void polmov ( double *a, int na, double *b );
113 extern void polmul ( double a[], int na, double b[], int nb, double c[] );
114 extern void poladd ( double a[], int na, double b[], int nb, double c[] );
115 extern void polsub ( double a[], int na, double b[], int nb, double c[] );
116 extern int poldiv ( double a[], int na, double b[], int nb, double c[] );
117 extern void polsbt ( double a[], int na, double b[], int nb, double c[] );
118 extern double poleva ( double a[], int na, double x );
122 #endif /* _CEPHES_H_ */