1 #ifndef _numericalRecipes
2 #define _numericalRecipes
11 const float TINY = 1.0e-20;
12 const long NR_END = 1;
20 static float *vector(
long nl,
long nh);
21 static float **matrix(
long nrl,
long nrh,
long ncl,
long nch);
22 static float **convert_matrix(
float *a,
long nrl,
long nrh,
long ncl,
long nch);
23 static double *dvector(
long nl,
long nh);
24 static double **dmatrix(
long nrl,
long nrh,
long ncl,
long nch);
25 static int *ivector(
long nl,
long nh);
26 static int **imatrix(
long nrl,
long nrh,
long ncl,
long nch);
27 static float **submatrix(
float **a,
long oldrl,
long oldrh,
long oldcl,
long oldch,
28 long newrl,
long newcl);
30 static void invertMatrix(
int n,
double **matrix,
double **inverse );
31 static int ludcmp(
double **a,
int n,
int *indx,
double *d);
32 static void lubksb(
double **a,
int n,
int *indx,
double b[]);
33 static void covsrt(
double **covar,
int ma,
int ia[],
int mfit);
34 static void gaussj(
double **a,
int n,
double **b,
int m);
36 static void free_vector(
float *v,
long nl,
long nh);
37 static void free_dvector(
double *v,
long nl,
long nh);
38 static void free_ivector(
int *v,
long nl,
long nh);
39 static void free_matrix(
float **m,
long nrl,
long nrh,
long ncl,
long nch);
40 static void free_dmatrix(
double **m,
long nrl,
long nrh,
long ncl,
long nch);
41 static void free_imatrix(
int **m,
long nrl,
long nrh,
long ncl,
long nch);
42 static void free_submatrix(
float **b,
long nrl,
long nrh,
long ncl,
long nch);
43 static void free_convert_matrix(
float **b,
long nrl,
long nrh,
long ncl,
long nch);
44 static void nrerror(
const char error_text[]);