Mathc initiation/a481
Installer et compiler ces fichiers dans votre répertoire de travail.
c00d2.c |
---|
/* --------------------------------- */
/* save as c00d2.c */
/* --------------------------------- */
#include "x_afile.h"
#include "f_d2.h"
/* --------------------------------- */
int main(void)
{
double M = J_vuw( f,
X,Y,Z,
u,v,LOOP,
s,t,LOOP,
a,b,LOOP);
clrscrn();
printf(" f : x,y,z -> %s\n\n", feq);
printf(" The change of variables.\n");
printf(" X : r,k,z -> %s \t\t\t \n",Xeq);
printf(" Y : r,k,z -> %s \t\t\t \n",Yeq);
printf(" Z : r,k,z -> %s \t\t\t \n\n",Zeq);
printf(" The cylindrical coordinates.\n");
printf(" k = v : r,z -> %s \n", veq);
printf(" k = u : r,z -> %s\n\n", ueq);
printf(" r = t : z -> %s \n", teq);
printf(" r = s : z > %s\n\n", seq);
printf(" z = b : -> %s \n", beq);
printf(" z = a : -> %s\n\n", aeq);
printf(" (z=b (r=t(z) (k=v(r,z) \n");
printf(" m = int( int( int( f(X,Y,Z) * J(X,Y,Z) dkdrdz = %.6f\n",M);
printf(" (z=a (r=s(z) (k=u(r,z) \n\n");
stop();
return 0;
}
/* --------------------------------- */
/* --------------------------------- */
Exemple de sortie écran :
f : x,y,z -> z
The change of variables.
X : r,k,z -> (r*cos(k))
Y : r,k,z -> (r*sin(k))
Z : r,k,z -> (z)
The cylindrical coordinates.
k = v : r,z -> 2*PI
k = u : r,z -> 0
r = t : z -> 2
r = s : z > 0
z = b : -> 1
z = a : -> 0
(z=b (r=t(z) (k=v(r,z)
m = int( int( int( f(X,Y,Z) * J(X,Y,Z) dkdrdz = 6.283185
(z=a (r=s(z) (k=u(r,z)
Press return to continue.