/* ---------------------------------- */
/* save as fa.h                       */
/* --------------------------------- */
double f(
double x,
double y)
{
 return(      (x + y) );
}
/* --------------------------------- */
char  feq[] = "x + y";
/* --------------------------------- */
/* --------------------------------- */
double u(
double x)
{
 return( ( 0) );
}
/* --------------------------------- */
char  ueq[] = "0";
/* --------------------------------- */
/* --------------------------------- */
double v(
double x)
{
 return(      sqrt(x) );
}
/* --------------------------------- */
char  veq[] = "sqrt(x)";
/* --------------------------------- */
/* --------------------------------- */
double g(
double x,
double y)
{
 return(       x*   (x + y) );
}
/* --------------------------------- */
char  geq[] = "x*   (x + y)";
/* --------------------------------- */
/* --------------------------------- */
double h(
double x,
double y)
{
 return(       y*   (x + y) );
}
/* --------------------------------- */
char  heq[] = "y*   (x + y)";
/* --------------------------------- */
/* --------------------------------- */