/* ---------------------------------- */
/* save as fa.h */
/* ---------------------------------- */
#define LOOP 2*100
/* ---------------------------------- */
double f(
double x,
double y)
{
return( (3.*x + y*y) );
}
char feq[] = "3.*x + y**2";
/* ---------------------------------- */
/* ---------------------------------- */
double v(
double y)
{
return( (y) );
}
char veq[] = "y";
/* ---------------------------------- */
double u(
double y)
{
return( (0) );
}
char ueq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
double by = 1.; char byeq[] = "1";
double ay = 0.; char ayeq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */