00001 #ifndef _NRUTIL_H 00002 #define _NRUTIL_H 00003 00004 void nrerror(char error_text[]); 00005 float *vector(long nl, long nh); 00006 int *ivector(long nl, long nh); 00007 unsigned char *cvector(long nl, long nh); 00008 unsigned long *lvector(long nl, long nh); 00009 double *dvector(long nl, long nh); 00010 float **matrix(long nrl, long nrh, long ncl, long nch); 00011 double **dmatrix(long nrl, long nrh, long ncl, long nch); 00012 int **imatrix(long nrl, long nrh, long ncl, long nch); 00013 float **submatrix(float **a, long oldrl, long oldrh, long oldcl, long oldch, 00014 long newrl, long newcl); 00015 float **convert_matrix(float *a, long nrl, long nrh, long ncl, long nch); 00016 float ***f3tensor(long nrl, long nrh, long ncl, long nch, long ndl, long ndh); 00017 void free_vector(float *v, long nl, long nh); 00018 void free_ivector(int *v, long nl, long nh); 00019 void free_cvector(unsigned char *v, long nl, long nh); 00020 void free_lvector(unsigned long *v, long nl, long nh); 00021 void free_dvector(double *v, long nl, long nh); 00022 void free_matrix(float **m, long nrl, long nrh, long ncl, long nch); 00023 void free_dmatrix(double **m, long nrl, long nrh, long ncl, long nch); 00024 void free_imatrix(int **m, long nrl, long nrh, long ncl, long nch); 00025 void free_submatrix(float **b, long nrl, long nrh, long ncl, long nch); 00026 void free_convert_matrix(float **b, long nrl, long nrh, long ncl, long nch); 00027 void free_f3tensor(float ***t, long nrl, long nrh, long ncl, long nch,long ndl, long ndh); 00028 00029 #endif