/* ---------------------------------- */
/* save as fa.h */
/* --------------------------------- */
#define LOOP 2*50
/* ---------------------------------- */
double f(
double x,
double y)
{
return( (x + y) );
}
char feq[] = "(x + y)";
/* --------------------------------- */
/* --------------------------------- */
double v(
double x)
{
return( sqrt(x) );
}
char veq[] = "sqrt(x)";
/* --------------------------------- */
double u(
double x)
{
return( ( 0) );
}
char ueq[] = "0.0";
/* --------------------------------- */
/* --------------------------------- */
double xf(
double x,
double y)
{
return( (x)* (x + y) );
}
char xfeq[] = "(x)* (x + y)";
/* --------------------------------- */
double yf(
double x,
double y)
{
return( (y)* (x + y) );
}
char yfeq[] = "(y)* (x + y)";
/* --------------------------------- */
/* --------------------------------- */
double bx = 9.; char bxeq[] = "9";
double ax = 0.; char axeq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */