Mathc initiation/Fichiers h : c17ca
Installer et compiler ces fichiers dans votre répertoire de travail.
![]() |
c17a.c |
---|
/* ---------------------------------- */
/* save as c17a.c */
/* ---------------------------------- */
#include "x_hfile.h"
#include "fa.h"
/* ---------------------------------- */
int main(void)
{
double a,b,n,
ay,by,ny,
Mxy,Myx;
clrscrn();
printf(" f : (x,y)-> %s\n\n\n", feq);
a = 0; ay = 0;
b = 2; by = 3;
n = 2*60; ny = 2*60;
Myx = trapezoid_dydx(f,a, b, n,
ay, by, ny);
Mxy = trapezoid_dxdy(f,a, b, n,
ay, by, ny);
printf(" With the trapezoidal's rule.\n\n");
printf(" (%.3f (%.3f\n", b, by);
printf(" int( int( %s Dy Dx = %.6f\n", feq, Myx);
printf(" (%.3f (%.3f\n\n\n", a, ay);
printf(" (%.3f (%.3f\n", by, b);
printf(" int( int( %s Dx Dy = %.6f\n", feq, Mxy);
printf(" (%.3f (%.3f\n\n\n", ay, a);
stop();
return 0;
}
/* ---------------------------------- */
Vous pouvez vérifier avec Octave version 5.2 :
I = dblquad (f, xa, xb, ya, yb)
>> I = dblquad (@(x, y) 1./5. * sqrt(225-25*x.*x-9*y.*y), 0, 2, 0, 3)
I = 15.282
Exemple de sortie écran :
f : (x,y)-> 1./5. * sqrt(225-25*x**2-9*y**2)
With the trapezoidal's rule.
(2.000 (3.000
int( int( 1./5. * sqrt(225-25*x**2-9*y**2) Dy Dx = 15.282090
(0.000 (0.000
(3.000 (2.000
int( int( 1./5. * sqrt(225-25*x**2-9*y**2) Dx Dy = 15.282090
(0.000 (0.000
Press return to continue.