Mathc initiation/a427

Sommaire

Installer ce fichier dans votre répertoire de travail.

	fa.h

/* ---------------------------------- */
/* save as fa.h                      */
/* --------------------------------- */
#define  LOOP  2*50
/* --------------------------------- */
double f(
double x,
double y,
double z)
{
 return(       1.);
}
char  feq[] = "1";
/* --------------------------------- */
/* --------------------------------- */
double z1(
double x,
double y)
{
 return(       (+cos(x)*sin(y) + 4));
}
char  z1eq[] = "(+cos(x)*sin(y) + 4)";
/* --------------------------------- */
double z0(
double x,
double y)
{
 return(       (-cos(x)*sin(y) - 4));
}
char  z0eq[] = "(-cos(x)*sin(y) - 4)";
/* --------------------------------- */
/* --------------------------------- */
double y1(
double x)
{
 return(      (+3.));
}
char  y1eq[] = "+3";
/* ---------------------------------- */
double y0(
double x)
{
 return(      (-3.));
}
char  y0eq[] = "-3";
/* --------------------------------- */
/* --------------------------------- */
double x1 = +3.;    char x1eq[] = "+3";
double x0 = -3.;    char x0eq[] = "-3";
/* ---------------------------------- */
/* ---------------------------------- */