Mathc initiation/a517
Installer et compiler ces fichiers dans votre répertoire de travail.
c00a.c |
---|
/* --------------------------------- */
/* save as c00a.c */
/* --------------------------------- */
#include "x_afile.h"
#include "fa.h" /* Try fa.h, fb.h, fc.h ... fj.h */
/* --------------------------------- */
int main(void)
{
double M = LT_dt( F, a,b, LOOP, s);
clrscrn();
printf(" Laplace transform of F(t)\n\n\n");
printf(" / oo\n");
printf(" |\n");
printf(" | exp(-s t) F(t) dt = f(s)\n");
printf(" |\n");
printf(" / 0\n\n\n");
printf(" If F(t) : t-> %s then f(s) = %s\n\n\n", Feq, feq);
printf(" Mathematica Code\n\n"
" %s \n\n\n\n", Mathematica_eq);
stop();
clrscrn();
printf(" Laplace transform of F(t)\n\n");
printf(" / oo\n");
printf(" |\n");
printf(" | exp(-s t) F(t) dt = f(s)\n");
printf(" |\n");
printf(" / 0\n\n\n");
printf(" If F(t) : t-> %s then f(s) = %s\n\n", Feq, feq);
printf(" and with s = (%+.3f)\n\n", s);
printf(" / oo\n");
printf(" |\n");
printf(" | exp(-(%+.3f) t) %s dt = %.3f = f(s) = %.3f\n",
s, Feq, M, f(s));
printf(" |\n");
printf(" / 0\n\n");
printf(" Then f(s) s-> %s is Laplace transform of F(t) : t-> %s\n\n",
feq, Feq);
stop();
return 0;
}
/* --------------------------------- */
/* --------------------------------- */
Exemple de sortie écran :
Laplace transform of F(t)
/ oo
|
| exp(-s t) F(t) dt = f(s)
|
/ 0
If F(t) : t-> (1) then f(s) = (1/s)
Mathematica Code
integrate e**(-s*t)*(1) dt from t=0 to infinity
Press return to continue.
Exemple de sortie écran :
Laplace transform of F(t)
/ oo
|
| exp(-s t) F(t) dt = f(s)
|
/ 0
If F(t) : t-> (1) then f(s) = (1/s)
and with s = (+0.500)
/ oo
|
| exp(-(+0.500) t) (1) dt = 2.000 = f(s) = 2.000
|
/ 0
Then f(s) s-> (1/s) is Laplace transform of F(t) : t-> (1)
Press return to continue.