Mathc initiation/a219

Installer ce fichier dans votre répertoire de travail.

	`fa.h`

/* --------------------------------- */
/* save as fa.h                      */
/* --------------------------------- */
double f(
double t)
{
        return( cos(t));
}
char  feq[] =  "cos(t)";
/* --------------------------------- */
double g(
double t)
{
        return( sin(t));
}
char  geq[] =  "sin(t)";
/* --------------------------------- */
/* --------------------------------- */

	`fb.h`

/* --------------------------------- */
/* save as fb.h                      */
/* --------------------------------- */
double f(
double t)
{
        return( 2*cos(t)-cos(2*t) );
}
char  feq[] =  "2*cos(t)-cos(2*t)";
/* --------------------------------- */
double g(
double t)
{
        return( 2*sin(t)-sin(2*t) );
}
char  geq[] =  "2*sin(t)-sin(2*t)";
/* --------------------------------- */
/* --------------------------------- */