Mathc initiation/a423
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 vz(
double x,
double y)
{
return( (+cos(x)*sin(y) + 4));
}
char veq[] = "(+cos(x)*sin(y) + 4)";
/* --------------------------------- */
double uz(
double x,
double y)
{
return( 0);
}
char ueq[] = "0";
/* --------------------------------- */
/* --------------------------------- */
double ty(
double x)
{
return( (+3.));
}
char teq[] = "+3";
/* ---------------------------------- */
double sy(
double x)
{
return( (-3.));
}
char seq[] = "-3";
/* --------------------------------- */
/* --------------------------------- */
double bx = +3.; char bxeq[] = "+3";
double ax = -3.; char axeq[] = "-3";
/* ---------------------------------- */
/* ---------------------------------- */
----