Mathc initiation/002t

Application

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

	c00c1.c

/* --------------------------------- */
/* save as c00c1.c                   */
/* --------------------------------- */
#include  "x_hfile.h"
#include      "fc1.h"
/* --------------------------------- */
int main(void)
{
double  M =  simpson_dydxdz(f,
                            Y0, Y1, LOOP,
                            x0, x1, LOOP,
                            z0, z1, LOOP);
 
 clrscrn();
 printf(" f : x,y,z -> %s\n\n", feq);

 printf(" y1 : x,z  -> %s  \n", y1eq);
 printf(" y0 : x,z  -> %s\n\n", y0eq);
 
 printf(" x1 : z    -> %s  \n", x1eq);
 printf(" x0 : z    -> %s\n\n", x0eq);
  
 printf(" z1 :      -> %s  \n", z1eq);
 printf(" z0 :      -> %s\n\n", z0eq);
 
 printf("        (%s     (%s      (%s    \n", z1eq,  x1eq, y1eq);
 printf(" A = int(   int(    int(      %s  dy dx dz = %.6f\n",feq, M);
 printf("        (%s     (%s      (%s\n\n\n", z0eq,  x0eq, y0eq);

 printf(" Code Mathematica : \n\n"
        " integral (y+z/5)   dy dx dz"
        " from (x/3) to (x/3+1)  from 0 to 5 from 0 to 6\n\n");
 stop();

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

Exemple de sortie écran :

 f : x,y,z ->  (y+z/5)

 y1 : x,z  -> x/3+1  
 y0 : x,z  -> x/3 

 x1 : z    -> 6  
 x0 : z    -> 0

 z1 :      -> 5  
 z0 :      -> 0

        (5     (6      (x/3+1    
 A = int(   int(    int(       (y+z/5)  dy dx dz = 60.000000
        (0     (0      (x/3 


 Code Mathematica : 

 integral (y+z/5)   dy dx dz from (x/3) to (x/3+1)  from 0 to 5 from 0 to 6

 Press return to continue.