Mathc initiation/001M

Sommaire

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

	c00a.c

/* --------------------------------- */
/* save as c00a.c                    */
/* --------------------------------- */
#include  "x_hfile.h"
#include       "fa.h"
/* --------------------------------- */
int main(void)
{
double M = 5 * simpson_dydx(f, ay,by,LOOP, ax,bx,LOOP);
double N =     simpson_dydx(g, ay,by,LOOP, ax,bx,LOOP);
 
 clrscrn();
 printf("First property of linearity                 \n\n" 
 
        "        (b (d                (b (d            \n"
        " (A) int(  f(x,y) dydx = int( (A) f(x,y) dydx \n"
        "        (a (c                (a (c        \n\n\n");
        
 stop();
 
 clrscrn();  
 
 printf(" I multiply int(f(x,y)dxdy by 5 \n\n");
 
 printf(" f  : (x,y)-> %s                          \n\n",  feq);
 
 printf("         (%.3f  (%s                         \n", bx,byeq);
 printf(" (5)*[int(    int(       (%s)  dydx] = %.6f \n", feq,  M);
 printf("         (%.3f  (%s                   \n\n\n\n", ax,ayeq);


 printf(" I multiply f(x,y) by 5 \n\n");
 
 printf(" g  : (x,y)-> %s                    \n\n", geq);
 
 printf("      (%.3f  (%s                      \n", bx,byeq);
 printf("   int(    int(      %s  dydx  = %.6f \n", geq, N);
 printf("      (%.3f  (%s                  \n\n\n", ax,ayeq);
 stop();

 return 0;
}

Verifier avec mathematica : Free: wolframalpha.com

integral (5)*(x**2+y**2+1) dy dx from 0 to 1 from 0 to (2-2*x)

Exemple de sortie écran :

First property of linearity                 

        (b (d                (b (d            
 (A) int(  f(x,y) dydx = int( (A) f(x,y) dydx 
        (a (c                (a (c        


 Press return to continue. 


 I multiply int(f(x,y)dxdy by 5 

 f  : (x,y)-> x**2+y**2+1                          

         (1.000  (2-2*x                         
 (5)*[int(    int(       (x**2+y**2+1)  dydx] = 9.166667 
         (0.000  (0                   



 I multiply f(x,y) by 5 

 g  : (x,y)-> (5)*(x**2+y**2+1)                    

      (1.000  (2-2*x                      
   int(    int(      (5)*(x**2+y**2+1)  dydx  = 9.166667 
      (0.000  (0                  


 Press return to continue.