Installer et compiler ces fichiers dans votre répertoire de travail.
 |
c18a2.c' |
|---|
/* ---------------------------------- */
/* save as c18a2.c */
/* ---------------------------------- */
#include "x_hfile.h"
#include "fa.h"
/* ---------------------------------- */
int main(void)
{
double a = 0;
double b = 2*PI;
int n = 2*100;
double m = 0;
/* ---------------------------------- */
clrscrn();
printf(" Evaluate the line integral :\n\n");
printf(" / // \n");
printf(" | || \n");
printf(" O F.T ds = || (curl F).n dS \n");
printf(" | || \n");
printf(" / C // \n");
printf(" S \n\n");
printf(" / / \n");
printf(" | | \n");
printf(" O F.T ds = O F dr \n");
printf(" | | \n");
printf(" / C / C \n\n");
printf(" / \n");
printf(" | \n");
printf(" O M(x,y,z) dx + N(x,y,z) dy + P(x,y,z) dz = \n");
printf(" | \n");
printf(" / C \n\n");
stop();
/* ---------------------------------- */
clrscrn();
m =lineintegral_dx(M,g,h,k,
a,b,n,
H);
m +=lineintegral_dy(N,g,h,k,
a,b,n,
H);
m +=lineintegral_dz(P,g,h,k,
a,b,n,
H);
printf(" Let S be the part of the graph of z = %s with z >= 0. \n", feq);
printf(" Let C be the trace of S on the x-y-plane. \n\n");
printf(" Verify Stokes's theorem for the vector field, \n\n");
printf(" F(x,y,z) = %si %sj %sk\n\n\n",Meq,Neq,Peq);
printf(" if C has the parametrization :\n\n");
printf(" x = %s; y = %s; z = %s; (z = %s) \n\n", geq, heq,keq, feq);
printf(" %.1f < t =< %.1f \n\n",a, b);
printf(" With the line integral you find :\n");
printf(" / \n");
printf(" | \n");
printf(" O (%s) dx + (%s) dy + (%s) dz = %+.3f \n", Meq, Neq, Peq,m);
printf(" | \n");
printf(" / C \n\n");
stop();
return 0;
}
/* ---------------------------------- */
/* ---------------------------------- */
Vérifions le théorème de Stoke partie 2.
Exemple de sortie écran :
Evaluate the line integral :
/ //
| ||
O F.T ds = || (curl F).n dS
| ||
/ C //
S
/ /
| |
O F.T ds = O F dr
| |
/ C / C
/
|
O M(x,y,z) dx + N(x,y,z) dy + P(x,y,z) dz =
|
/ C
Press return to continue.
Exemple de sortie écran :
Let S be the part of the graph of z = 9-x**2-y**2 with z >= 0.
Let C be the trace of S on the x-y-plane.
Verify Stokes's theorem for the vector field,
F(x,y,z) = + 3*zi + 4*xj + 2*yk
if C has the parametrization :
x = 3*cos(t); y = 3*sin(t); z = 0; (z = 9-x**2-y**2)
0.0 < t =< 6.3
With the line integral you find :
/
|
O (+ 3*z) dx + (+ 4*x) dy + ( + 2*y) dz = +113.097
|
/ C
Press return to continue.
Cet article est issu de Wikibooks. Le texte est sous licence Creative Commons - Attribution - Partage dans les Mêmes. Des conditions supplémentaires peuvent s'appliquer aux fichiers multimédias.