Mathc initiation/Fichiers h : c32a3
Installer ce fichier dans votre répertoire de travail.
x_dxdy.h |
---|
/* ---------------------------------- */
/* save as x_dxdy.h */
/* ---------------------------------- */
double int_dx(
double (*P_f)(double x, double y),
double ax,
double bx,
int nx,
double y
)
{
int i = 0;
double m = 0.;
double M = 0.;
for(i = 0; i <= nx; i++)
{
if(i ==0 || i== nx){m = 1.;}
else if(fmod(i,2) == 0 ){m = 2.;}
else {m = 4.;}
M += m * (*P_f)(ax+i*(bx-ax)/nx, y);
}
return( ((bx-ax)*M) / (3*nx) );
}
/* ---------------------------------- */
double simpson_dxdy(
double (*P_f)(double x, double y),
double ax,
double bx,
int nx,
double ay,
double by,
int ny
)
{
int i = 0;
double m = 0.;
double M = 0.;
for(i = 0; i <= ny; i++)
{
if(i ==0 || i== ny){m = 1.;}
else if(fmod(i,2) == 0){m = 2.;}
else {m = 4.;}
M += m * int_dx((*P_f), ax,bx,nx, (ay+i*(by-ay)/ny));
}
return( ((by-ay)*M) / (3*ny) );
}
/* ---------------------------------- */
/* ---------------------------------- */
Les fonctions pour calculer les intégrales de la forme dxdy.