Mathc initiation/Fichiers h : c65a5

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.


Texte de la légende
fa.h
/* ---------------------------------- */
/* save as fa.h                       */
/* ---------------------------------- */
#define  LOOP  2*100
/* ---------------------------------- */
double f(
double x,
double y)
{
      return( (3.*x + y*y) );
}
char  feq[] = "3.*x + y**2";
/* ---------------------------------- */
/* ---------------------------------- */
double v(
double y)
{
 return(      (y) );
}
char  veq[] = "y";
/* ---------------------------------- */
double u(
double y)
{
 return(      (0) );
}
char  ueq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
double by = 1.;    char byeq[] = "1";
double ay = 0.;    char ayeq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
fb.h
/* ---------------------------------- */
/* save as fb.h                       */
/* ---------------------------------- */
#define  LOOP  2*100
/* ---------------------------------- */
double f(
double x,
double y)
{
      return( (x*x + y) );
}
char  feq[] = "x**2 + y";
/* ---------------------------------- */
/* ---------------------------------- */
double v(
double y)
{
 return(      (1) );
}
char  veq[] = "1";
/* ---------------------------------- */
double u(
double y)
{
 return(      (0) );
}
char  ueq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
double by = +1.;    char byeq[] = "+1";
double ay = -1.;    char ayeq[] = "-1";
/* ---------------------------------- */
/* ---------------------------------- */
fc.h
/* ---------------------------------- */
/* save as fc.h                       */
/* ---------------------------------- */
#define  LOOP  2*100
/* ---------------------------------- */
double f(
double x,
double y)
{
      return( (4-x*x-y*y) );
}
char  feq[] = "4-x**2-y**2";
/* ---------------------------------- */
/* ---------------------------------- */
double v(
double x)
{
 return( sqrt(4-x*x) );
}
char  veq[] = "sqrt(4-x**2)";
/* ---------------------------------- */
double u(
double x)
{
 return( ( 0) );
}
char  ueq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
double bx = 2.;    char bxeq[] = "2";
double ax = 0.;    char axeq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
fd.h
/* ---------------------------------- */
/* save as fd.h                       */
/* ---------------------------------- */
#define  LOOP  2*100
/* ---------------------------------- */
double f(
double x,
double y)
{
      return( (y + 1./2.*x*x) );
}
char  feq[] = "y + 1./2.*x**2";
/* ---------------------------------- */
/* ---------------------------------- */
double v(
double x)
{
 return(       1 );
}
char  veq[] = "1";
/* ---------------------------------- */
double u(
double x)
{
 return(      (0) );
}
char  ueq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
double bx = 1.;    char bxeq[] = "1";
double ax = 0.;    char axeq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */