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