Mathc initiation/a487

Sommaire

Installer et compiler ces fichiers dans votre répertoire de travail.

	c00g2.c

/* --------------------------------- */
/* save as c00g2.c                   */
/* --------------------------------- */
#include  "x_afile.h"
#include      "fg2.h"
/* --------------------------------- */
int main(void)
{
double M =  J_uwv(              f,
                                X,Y,Z,
                                r0,r1,LOOP,
                                z0,z1,LOOP,
                                k0,k1,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(" r1   k,z   -> %s  \n", r1eq);
 printf(" r0   k,z   -> %s\n\n", r0eq);

 printf(" z1   k     -> %s  \n", z1eq);
 printf(" z0   k     -> %s\n\n", z0eq);

 printf(" k1         -> %s  \n", k1eq); 
 printf(" k0         -> %s\n\n", k0eq);
                          
 printf("        (%s   (%s     (%s    (drdzdk)\n", k1eq,z1eq,r1eq);
 printf(" A = int(    int(   int( f(X,Y,Z) |J| dudwdv = %.6f\n", M);
 printf("        (%s      (%s     (%s\n\n",        k0eq,z0eq,r0eq);
      
 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.
 r1   k,z   -> sqrt(4-z)  
 r0   k,z   -> 0

 z1   k     -> 2  
 z0   k     -> 1

 k1         -> 2*PI  
 k0         -> 0

        (2*PI   (2     (sqrt(4-z)    (drdzdk)
 A = int(    int(   int( f(X,Y,Z) |J| dudwdv = 11.519173
        (0      (1     (0

 Press return to continue.