diff options
Diffstat (limited to 'lib/Numeric/GSL/gsl-aux.h')
-rw-r--r-- | lib/Numeric/GSL/gsl-aux.h | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/lib/Numeric/GSL/gsl-aux.h b/lib/Numeric/GSL/gsl-aux.h deleted file mode 100644 index 881d0d0..0000000 --- a/lib/Numeric/GSL/gsl-aux.h +++ /dev/null | |||
@@ -1,40 +0,0 @@ | |||
1 | #include <gsl/gsl_complex.h> | ||
2 | |||
3 | #define RVEC(A) int A##n, double*A##p | ||
4 | #define RMAT(A) int A##r, int A##c, double* A##p | ||
5 | #define KRVEC(A) int A##n, const double*A##p | ||
6 | #define KRMAT(A) int A##r, int A##c, const double* A##p | ||
7 | |||
8 | #define CVEC(A) int A##n, gsl_complex*A##p | ||
9 | #define CMAT(A) int A##r, int A##c, gsl_complex* A##p | ||
10 | #define KCVEC(A) int A##n, const gsl_complex*A##p | ||
11 | #define KCMAT(A) int A##r, int A##c, const gsl_complex* A##p | ||
12 | |||
13 | void no_abort_on_error(); | ||
14 | |||
15 | int toScalarR(int code, KRVEC(x), RVEC(r)); | ||
16 | /* norm2, absdif, maximum, posmax, etc. */ | ||
17 | |||
18 | int mapR(int code, KRVEC(x), RVEC(r)); | ||
19 | int mapC(int code, KCVEC(x), CVEC(r)); | ||
20 | /* sin cos tan etc. */ | ||
21 | |||
22 | int mapValR(int code, double*, KRVEC(x), RVEC(r)); | ||
23 | int mapValC(int code, gsl_complex*, KCVEC(x), CVEC(r)); | ||
24 | |||
25 | int zipR(int code, KRVEC(a), KRVEC(b), RVEC(r)); | ||
26 | int zipC(int code, KCVEC(a), KCVEC(b), CVEC(r)); | ||
27 | |||
28 | |||
29 | int fft(int code, KCVEC(a), CVEC(b)); | ||
30 | |||
31 | int deriv(int code, double f(double, void*), double x, double h, double * result, double * abserr); | ||
32 | |||
33 | int integrate_qng(double f(double, void*), double a, double b, double prec, | ||
34 | double *result, double*error); | ||
35 | |||
36 | int integrate_qags(double f(double,void*), double a, double b, double prec, int w, | ||
37 | double *result, double* error); | ||
38 | |||
39 | int polySolve(KRVEC(a), CVEC(z)); | ||
40 | |||