Mathc initiation/a463
Apparence
Installer et compiler ces fichiers dans votre répertoire de travail.
c00a.c |
---|
/* --------------------------------- */
/* save as c00a.c */
/* --------------------------------- */
#include "x_afile.h"
#include "fa.h"
/* --------------------------------- */
int main(void)
{
double m = J_dudv(f, X,Y, ar,br,LOOP, at,bt,LOOP);
clrscrn();
printf(" f : (X,Y)-> %s \t\t\t \n\n",feq);
printf(" X : (r,t)-> %s \t\t\t \n",Xeq);
printf(" Y : (r,t)-> %s \t\t\t \n\n",Yeq);
printf(" br : (t)-> %s \n", breq);
printf(" ar : (t)-> %s \n\n", areq);
printf(" bt = %s \n", bteq);
printf(" at = %s \n\n", ateq);
printf(" (%s (%s \n", bteq, breq);
printf(" int( int( f(X(s,t),Y(s,t)) * J(X,Y) drdt = %.3f \n", m);
printf(" (%s (%s \n\n\n\n", ateq, areq);
stop();
return 0;
}
/* --------------------------------- */
/* --------------------------------- */
Exemple de sortie écran :
f : (X,Y)-> (X**2 + Y**2)**(3/2)
X : (r,t)-> (r*cos(t))
Y : (r,t)-> (r*sin(t))
br : (t)-> 1
ar : (t)-> 0
bt = PI
at = 0
(PI (1
int( int( f(X(s,t),Y(s,t)) * J(X,Y) drdt = 0.628
(0 (0
Press return to continue.