Mathc initiation/002x

Application

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

	c00d1.c

/* --------------------------------- */
/* save as c00d1.c                   */
/* --------------------------------- */
#include  "x_hfile.h"
#include      "fd1.h"
/* --------------------------------- */
int main(void)
{
double  M =  simpson_dydzdx(f,
                            Y0, Y1, LOOP,
                            z0, z1, LOOP,
                            x0, x1, 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(" z1 : x    -> %s  \n", z1eq);
 printf(" z0 : x    -> %s\n\n", z0eq);
  
 printf(" x1 :      -> %s  \n", x1eq);
 printf(" x0 :      -> %s\n\n", x0eq);
 
 printf("        (%s     (%s      (%s    \n",  x1eq, z1eq, y1eq);
 printf(" A = int(   int(    int(      %s  dy dz dx = %.6f\n",feq, M);
 printf("        (%s     (%s      (%s\n\n\n",  x0eq, z0eq, y0eq);

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

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

Exemple de sortie écran :

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

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

 z1 : x    -> 6  
 z0 : x    -> 0

 x1 :      -> 5  
 x0 :      -> 0

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


 Code Mathematica : 

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

 Press return to continue.