13#define Pi 3.14159265358979323846264338328
14#define Pih 1.57079632679489661923132169164
15#define Piq 0.78539816339744830961566084582
18#define SWAP(a,b) {double temp=(a);(a)=(b);(b)=temp;}
22double *
dvector (
long nl,
long nh);
23int **
imatrix (
long nrl,
long nrh,
long ncl,
long nch);
24double **
dmatrix (
long nrl,
long nrh,
long ncl,
long nch);
25double ***
d3tensor (
long nrl,
long nrh,
long ncl,
long nch,
long ndl,
29void free_imatrix (
int **m,
long nrl,
long nrh,
long ncl,
long nch);
30void free_dmatrix (
double **m,
long nrl,
long nrh,
long ncl,
long nch);
31void free_d3tensor (
double ***t,
long nrl,
long nrh,
long ncl,
long nch,
38int pow_int (
int mantisse,
int exponent);
42void chder (
double *c,
double *cder,
int n);
43double chebev (
double a,
double b,
double c[],
int m,
double x);
44void fourft (
double *u,
int N,
int inv);
45void fourder (
double u[],
double du[],
int N);
46void fourder2 (
double u[],
double d2u[],
int N);
47double fourev (
double *u,
int N,
double x);
49double norm1 (
double *v,
int n);
50double norm2 (
double *v,
int n);
int minimum3(int i, int j, int k)
void fourft(double *u, int N, int inv)
double norm2(double *v, int n)
double chebev(double a, double b, double c[], int m, double x)
int maximum3(int i, int j, int k)
int maximum2(int i, int j)
double * dvector(long nl, long nh)
void chebft_Extremes(double u[], int n, int inv)
void free_dvector(double *v, long nl, long nh)
double norm1(double *v, int n)
double scalarproduct(double *v, double *w, int n)
void free_ivector(int *v, long nl, long nh)
void chebft_Zeros(double u[], int n, int inv)
void fourder2(double u[], double d2u[], int N)
int minimum2(int i, int j)
void chder(double *c, double *cder, int n)
double *** d3tensor(long nrl, long nrh, long ncl, long nch, long ndl, long ndh)
int * ivector(long nl, long nh)
void nrerror(char error_text[])
void fourder(double u[], double du[], int N)
double fourev(double *u, int N, double x)
double ** dmatrix(long nrl, long nrh, long ncl, long nch)
void free_d3tensor(double ***t, long nrl, long nrh, long ncl, long nch, long ndl, long ndh)
void free_dmatrix(double **m, long nrl, long nrh, long ncl, long nch)
int pow_int(int mantisse, int exponent)
void free_imatrix(int **m, long nrl, long nrh, long ncl, long nch)
int ** imatrix(long nrl, long nrh, long ncl, long nch)
This file contains aliases for making access to the long state vector Q as used eg.