source: Sophya/trunk/SigPredictor/numrecipes.h@ 1096

Last change on this file since 1096 was 801, checked in by ansari, 25 years ago

Fichiers au format unix

dominique

File size: 1.9 KB
Line 
1 // Dominique YVON, CEA/DAPNIA/SPP 02/2000
2
3#ifndef Numrecipes_H_
4#define Numrecipes_H_
5
6#include <math.h>
7#ifdef __MWERKS__
8 #include "mwerksmath.h"
9 #include "unixmac.h"
10#endif
11
12
13/* Cree pour encapsuler les fonctions utiles de la Numerical Recipes
14 Actuellement encapsule: nrtil.h, hunt.c, polin2.c polint.c
15*/
16
17class NumRecipes{
18public:
19 NumRecipes() {}
20 ~NumRecipes() {}
21 void nrerror(char error_text[]);
22 float *vector(long nl, long nh);
23 int *ivector(long nl, long nh);
24 unsigned char *cvector(long nl, long nh);
25 unsigned long *lvector(long nl, long nh);
26 double *dvector(long nl, long nh);
27 float **matrix(long nrl, long nrh, long ncl, long nch);
28 double **dmatrix(long nrl, long nrh, long ncl, long nch);
29 int **imatrix(long nrl, long nrh, long ncl, long nch);
30 float **submatrix(float **a, long oldrl, long oldrh, long oldcl, long oldch,
31 long newrl, long newcl);
32 float **convert_matrix(float *a, long nrl, long nrh, long ncl, long nch);
33 float ***f3tensor(long nrl, long nrh, long ncl, long nch, long ndl, long ndh);
34 void free_vector(float *v, long nl, long nh);
35 void free_ivector(int *v, long nl, long nh);
36 void free_cvector(unsigned char *v, long nl, long nh);
37 void free_lvector(unsigned long *v, long nl, long nh);
38 void free_dvector(double *v, long nl, long nh);
39 void free_matrix(float **m, long nrl, long nrh, long ncl, long nch);
40 void free_dmatrix(double **m, long nrl, long nrh, long ncl, long nch);
41 void free_imatrix(int **m, long nrl, long nrh, long ncl, long nch);
42 void free_submatrix(float **b, long nrl, long nrh, long ncl, long nch);
43 void free_convert_matrix(float **b, long nrl, long nrh, long ncl, long nch);
44 void free_f3tensor(float ***t, long nrl, long nrh, long ncl, long nch,
45 long ndl, long ndh);
46
47 void hunt(float xx[], unsigned long n, float x, unsigned long *jlo);
48 void polin2(float *xx,float *yy, float** yaa,int,int,float,float,float*,float*);
49 void polint(float xa[], float ya[], int n, float x, float *y, float *dy);
50 };
51
52 #endif
Note: See TracBrowser for help on using the repository browser.