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;}
21 int *
ivector (
long nl,
long nh);
22 double *
dvector (
long nl,
long nh);
23 int **
imatrix (
long nrl,
long nrh,
long ncl,
long nch);
24 double **
dmatrix (
long nrl,
long nrh,
long ncl,
long nch);
25 double ***
d3tensor (
long nrl,
long nrh,
long ncl,
long nch,
long ndl,
29 void free_imatrix (
int **m,
long nrl,
long nrh,
long ncl,
long nch);
30 void free_dmatrix (
double **m,
long nrl,
long nrh,
long ncl,
long nch);
31 void free_d3tensor (
double ***
t,
long nrl,
long nrh,
long ncl,
long nch,
38 int pow_int (
int mantisse,
int exponent);
42 void chder (
double *
c,
double *cder,
int n);
43 double chebev (
double a,
double b,
double c[],
int m,
double x);
44 void fourft (
double *
u,
int N,
int inv);
45 void fourder (
double u[],
double du[],
int N);
46 void fourder2 (
double u[],
double d2u[],
int N);
47 double fourev (
double *
u,
int N,
double x);
49 double norm1 (
double *
v,
int n);
50 double 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.