/* ---------------------------------- */
/* save as fa.h                      */
/* --------------------------------- */
double M(
double x,
double y)
{
        return( (5*x*y));
}
char  Meq[] =  "(5*x*y)";
/* ---------------------------------- */
double N(
double x,
double y)
{
        return(  (x*x*x));
}
char  Neq[] =  "(x**3)";
/* ---------------------------------- */
/* ---------------------------------- */
double N_x_mns_M_y(
double x,
double y)
{
 return(  (3*x*x)-(5*x));
}
/* --------------------------------- */
char  N_x_mns_M_y_eq[] = "(3*x**2)-(5*x)";
/* ---------------------------------- */
/* ---------------------------------- */
double u(
double y)
{
        return( (y*y));
}
/* ---------------------------------- */
char  ueq[] =   "y**2";
/* ---------------------------------- */
double v(
double y)
{
        return( (2*y));
}
/* ---------------------------------- */
char  veq[] =   "2*y";
/* ---------------------------------- */
/* ---------------------------------- */