Mathc initiation/a327

Sommaire

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

	c00c.c

/* ---------------------------------- */
/* save as c00c.c                     */
/* ---------------------------------- */
#include "x_hfile.h"
#include      "fc.h"
/* ---------------------------------- */
int main(void)
{
double W = 0;

 clrscrn();

 printf(" Evaluate the work (W) done by F along C,\n\n");
 printf(" With :\n\n");
 printf(" F (x,y) -> %si %sj \n\n", Meq, Neq);
 printf(" and C has the parametrization :\n\n");
 printf(" x = %s;     y = %s;   %.1f < t =< %.1f \n\n",
          geq, heq,  a, b);

 printf("        (\n");
 printf(" W = int( F.dr\n");
 printf("        (C\n\n");
 printf(" Where r = xi + yj  and then dr = dxi + dyj \n\n");
 printf("                   (\n");
 printf(" These give W = int( F.(dxi + dyj )\n");
 printf("                   (C\n\n");
 getchar();

 clrscrn();
 printf(" Evaluate :\n\n");
 printf("        (\n");
 printf(" W = int(  (%si %sj).(dxi + dyj )\n", Meq, Neq);
 printf("        (C\n\n");
 printf("        (\n");
 printf(" W = int(   %s dx  %s dy  \n", Meq, Neq);
 printf("        (C\n\n\n");
 printf(" if C has the parametrization :\n\n");
 printf(" x = %s;     y = %s;       %.1f < t =< %.1f \n\n\n",
          geq, heq, a, b);

  W  = lint2d_ds(M,
                 g,h,
                 a,b,LOOP);

  W += lint2d_ds(N,
                 g,h,
                 a,b,LOOP);


 printf("        (\n");
 printf(" W = int(   F.dr =  %+.3f\n",  W);
 printf("        (C\n\n");

 printf("\n Press return to continue");
 getchar();

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

Exemple de sortie écran :

 Evaluate the work (W) done by F along C,

 With :

 F (x,y) -> +x*y**2i +x**2*yj 

 and C has the parametrization :

 x = (t);     y = (3*t**2);   0.0 < t =< 1.0 

        (
 W = int( F.dr
        (C

 Where r = xi + yj  and then dr = dxi + dyj 

                   (
 These give W = int( F.(dxi + dyj )
                   (C

Exemple de sortie écran :

 Evaluate :

        (
 W = int(  (+x*y**2i +x**2*yj).(dxi + dyj )
        (C

        (
 W = int(   +x*y**2 dx  +x**2*y dy  
        (C


 if C has the parametrization :

 x = (t);     y = (3*t**2);       0.0 < t =< 1.0 


        (
 W = int(   F.dr =  +10.924
        (C


 Press return to continue