/* --------------------------------- */
/* 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)";
/* --------------------------------- */
double h(
double t)
{
return( t);
}
char heq[] = "t";
/* --------------------------------- */
/* --------------------------------- */