Mathc initiation/a438

Sommaire

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

	c0a4.c

/* --------------------------------- */
/* save as c0a4.c                    */
/* --------------------------------- */
#include   "x_afile.h"
#include        "fa.h"
/* --------------------------------- */
int main(void)
{
double  Mxy =  simpson_dzdydx( zR, uz,vz,LOOP, sy,ty,LOOP, ax,bx,LOOP);
double  Mzx =  simpson_dzdydx( yR, uz,vz,LOOP, sy,ty,LOOP, ax,bx,LOOP);
double  Mzy =  simpson_dzdydx( xR, uz,vz,LOOP, sy,ty,LOOP, ax,bx,LOOP);
 
 clrscrn();
 printf(" The function of density is :\n\n"
        " R : x,y,z -> %s\n\n", Req);

 printf(" The volume is :\n\n");
 printf(" v : x,y   -> %s  \n", veq);
 printf(" u : x,y   -> %s\n\n", ueq);
  
 printf(" t : x     -> %s  \n", teq);
 printf(" s : x     -> %s\n\n", seq);

 printf(" b :       -> %s  \n", bxeq); 
 printf(" a :       -> %s\n\n", axeq);

 stop();

 clrscrn();
 
 printf(" The moments are :\n\n\n");
 printf("          (%+.1f  (%s     (%s    \n",   bx, teq, veq);
 printf(" Mxy = int(   int(    int(      %s  dz dy dx = %.2f\n",zReq,Mxy);
 printf("          (%+.1f  (%s     (%s\n\n\n", ax, seq, ueq);

 printf("          (%+.1f  (%s     (%s    \n",   bx, teq, veq);
 printf(" Mzx = int(   int(    int(      %s  dz dy dx = %.2f\n",yReq,Mzx);
 printf("          (%+.1f  (%s     (%s\n\n\n", ax, seq, ueq);

 printf("          (%+.1f  (%s     (%s    \n",   bx, teq, veq);
 printf(" Mzy = int(   int(    int(      %s  dz dy dx = %.2f\n",xReq,Mzy);
 printf("          (%+.1f  (%s     (%s\n\n\n", ax, seq, ueq);
 stop();

 return 0;
}
/* --------------------------------- */
/* --------------------------------- */

Exemple de sortie écran :

 The moments are :


          (+3.0  (+3     ((+cos(x)*sin(y) + 4)    
 Mxy = int(   int(    int(      (z)*(x*y*y*z)  dz dy dx = 753.45
          (-0.0  (-0     (0


          (+3.0  (+3     ((+cos(x)*sin(y) + 4)    
 Mzx = int(   int(    int(      (y)*(x*y*y*z)  dz dy dx = 663.19
          (-0.0  (-0     (0


          (+3.0  (+3     ((+cos(x)*sin(y) + 4)    
 Mzy = int(   int(    int(      (x)*(x*y*y*z)  dz dy dx = 543.69
          (-0.0  (-0     (0


 Press return to continue.