Aller au contenu

Mathc initiation/0032

Un livre de Wikilivres.

Application

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

c00e2.c
/* --------------------------------- */
/* save as c00e2.c                   */
/* --------------------------------- */
#include  "x_hfile.h"
#include      "fe2.h"
/* --------------------------------- */
int main(void)
{
double  M = J_wvu(f,
                  X,Y,Z,
                  w0, w1, LOOP,
                  v0, v1, LOOP,
                  u0, u1, LOOP);                        
 
 clrscrn();
 printf(" f : x,y,z -> %s      f(X,Y,Z) = (u+v+w)\n\n", feq);
 
 printf(" u = (3x-y)/3     ...      X : u,v,w -> %s  \n", Xeq);
 printf(" v = (y/3)        ...      Y : u,v,w -> %s  \n", Yeq);
 printf(" w = (z/5)        ...      Z : u,v,w -> %s\n\n", Zeq);
 
 printf(" w1 : u,v  -> %s  \n", w1eq);
 printf(" w0 : u,v  -> %s\n\n", w0eq);

 printf(" v1 : u    -> %s  \n", v1eq);
 printf(" v0 : u    -> %s\n\n", v0eq);
 
 printf(" u1 :      -> %s  \n", u1eq);
 printf(" u0 :      -> %s\n\n", u0eq);

 printf("        (%+.1f (%s   (%s    \n", u1, v1eq, w1eq);
 printf(" A = int(  int( int( f(X,Y,Z) |J| dw dv du = %.6f\n", M);
 printf("        (%+.1f (%s   (%s\n\n\n", u0, u0eq, w0eq);

 stop();

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

Exemple de sortie écran :

 f : x,y,z -> z+x/5      f(X,Y,Z) = (u+v+w)

 u = (3x-y)/3     ...      X : u,v,w -> (5 w)  
 v = (y/3)        ...      Y : u,v,w -> (3 v)  
 w = (z/5)        ...      Z : u,v,w -> (u+v)

 u1 : v,w  -> 1  
 u0 : v,w  -> 0

 v1 : w    -> 2  
 v0 : w    -> 0

 w1 :      -> 1  
 w0 :      -> 0

        (+1.0 (2   (1    
 A = int(  int( int( f(X,Y,Z) |J| dw dv du = 60.000000
        (+0.0 (0   (0


 Press return to continue.