Mathc initiation/a457

Sommaire

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

	c00b.c

/* ---------------------------------- */
/* save as c00b.c                     */
/* ---------------------------------- */
#include "x_afile.h"
#include      "fb.h"
/* ---------------------------------- */
int main(void)
{
double M = parametricFS_st( Rx,Ry,Rz, 
                            fi,fj,fk,
                            u, v, LOOP, 
                            at,bt,LOOP);
                           
 clrscrn();
 
 printf(" Find the flux of the vector field F \n"
        " over the surface area defined parametrically by :\n\n");
        
 printf(" R : (s,t)-> %si %sj %sk\n\n", Rxeq,Ryeq,Rzeq);
  
 printf(" F : (x,y,z)-> %sk\n\n", fkeq);
 printf(" v :   (t)-> %s     \n", veq);
 printf(" u :   (t)-> %s   \n\n", ueq);
 printf(" b =    %s\n a =    %s\n\n",bteq,ateq);
 
 printf("    (b     (v(t)\n");
 printf(" int(   int(    F(Rx(s,t), Ry(s,t), Rz(s,t)) ." 
            " |R_s x R_t|  dsdt = %.3f\n", M);
 printf("    (a     (u(t)\n\n");
 stop();

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

Exemple de sortie écran :

 Find the flux of the vector field F 
 over the surface area defined parametrically by :

 R : (s,t)-> +(sin(s)*cos(t))i +(sin(s)*sin(t))j +(cos(s))k

 F : (x,y,z)-> (z)k

 v :   (t)-> PI     
 u :   (t)-> 0   

 b =    2.*PI
 a =    0

    (b     (v(t)
 int(   int(    F(Rx(s,t), Ry(s,t), Rz(s,t)) . |R_s x R_t|  dsdt = 4.189
    (a     (u(t)

 Press return to continue.