< Mathc initiation


Sommaire


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


c17e.c
'
/* ---------------------------------- */
/* save as c17e.c                    */
/* --------------------------------- */
#include  "x_hfile.h"
#include       "fe.h"
/* --------------------------------- */
int main(void)
{
double ay,by,n,ny,M;
 
 clrscrn();
 printf(" f : (x,y)-> %s\n\n\n", feq);
 printf(" v :   (y)-> %s    \n", veq);
 printf(" u :   (y)-> %s  \n\n", ueq);


 ay = 0;   by = 1;
 n = 2*5; ny = 2*5;
 
  M = simpson_dxdy(f, u,v,n, ay,by,ny);

 printf(" With the simpson's rule.\n\n");
 printf("    (%.3f  (%s\n", by, veq);
 printf(" int(   int(       %s  dx dy = %.6f\n", feq, M);
 printf("    (%.3f  (%s\n\n\n", ay, ueq);

 stop();

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


Vous pouvez vérifier le résultat avec Octave version 5.2 :

>> I = dblquad (@(x, y) sin(cos(x.*y)), 1, 0, .5, 0)

I = 0.41688


Exemple de sortie écran :

 f : (x,y)-> sin(cos(x*y))


 v :   (y)-> .5    
 u :   (y)-> 0  

 With the simpson's rule.

    (1.000  (.5
 int(   int(       sin(cos(x*y))  dx dy = 0.416884
    (0.000  (0


 Press return to continue.
Cet article est issu de Wikibooks. Le texte est sous licence Creative Commons - Attribution - Partage dans les Mêmes. Des conditions supplémentaires peuvent s'appliquer aux fichiers multimédias.