Contenu supprimé Contenu ajouté
petit correction
petit correction
Ligne 241 :
<syntaxhighlight lang="c">
/* ---------------------------------- */
/* --------------------------------- */
double inty_dydzdx(
double (*P_f)(double x, double y, double z),
 
 
 
double x,
double z,
 
double (*Puy)(double x, double z),
double (*Pvy)(double x, double z),
int ny
 
 
)
{
pt3d n;
int i = 0;
double m = 0.;
Ligne 262 ⟶ 267 :
else {m = 4.;}
 
n.x = x;
Mn.y += m * (*P_f)( x, ((*Puy)(x,z)) + i*(((*Pvy)(x,z))-((*Puy)(x,z)))/ny, z);
n.z = z;
 
M += m * (*P_f)( n.x,n.y,n.z);
 
 
}
 
return( ((((*Pvy)(x,z)) -((*Puy)(x,z)))*M) / (3*ny) );
}
/* --------------------------------- */
 
/* ---------------------------------- */
</syntaxhighlight>
Ligne 281 ⟶ 290 :
double x,
double z,
 
double (*P_u)(double x, double z),
double (*P_v)(double x, double z),
Ligne 299 ⟶ 309 :
else {m = 4.;}
 
n.x = x;
n.y = ((*P_u)(x,z)) + i*(((*P_v)(x,z))-((*P_u)(x,z)))/ny;
n.z = z;
 
M += m * (fxyz_x((*P_M),n,h) + fxyz_y((*P_N),n,h) + fxyz_z((*P_P),n,h)) ;
 
M += m * (fxyz_x((*P_M),n,h)+
fxyz_y((*P_N),n,h)+
M += m * (fxyz_x((*P_M),n,h) + fxyz_y((*P_N),n,h) + fxyz_z((*P_P),n,h)) ;
}
 
return( ((((*P_v)(x,z)) -((*P_u)(x,z)))*M) / (3*ny) );
}
/* ---------------------------------- */
 
</syntaxhighlight>
|}