Aller au contenu

Mathc initiation/c57ba

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*50
/* ---------------------------------- */
double f(
double x,
double y)
{
 return(      (x + y) );
}
char  feq[] = "(x + y)";
/* --------------------------------- */
/* --------------------------------- */
double v(
double x)
{
 return(      sqrt(x) );
}
char  veq[] = "sqrt(x)";
/* --------------------------------- */
double u(
double x)
{
 return( ( 0) );
}
char  ueq[] = "0.0";
/* --------------------------------- */
/* --------------------------------- */
double xf(
double x,
double y)
{
 return(        (x)* (x + y) );
}
char  xfeq[] = "(x)* (x + y)";
/* --------------------------------- */
double yf(
double x,
double y)
{
 return(        (y)* (x + y) );
}
char  yfeq[] = "(y)* (x + y)";
/* --------------------------------- */
/* --------------------------------- */
double bx = 9.;    char bxeq[] = "9";
double ax = 0.;    char axeq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
fb.h
/* --------------------------------- */
/* save as fb.h                      */
/* --------------------------------- */
#define  LOOP  2*50
/* ---------------------------------- */
double f(
double x,
double y)
{
 return( x );
}
char  feq[] = "x";
/* --------------------------------- */
/* --------------------------------- */
double v(
double x)
{
 return(        exp(x));
}
char  veq[] =  "exp(x)";
/* --------------------------------- */
double u(
double x)
{
 return(       log(x));
}
char  ueq[] = "log(x)";
/* --------------------------------- */
/* --------------------------------- */
double xf(
double x,
double y)
{
 return(        (x)* (x));
}
char  xfeq[] = "(x)* (x)";
/* --------------------------------- */
double yf(
double x,
double y)
{
 return(        (y)* (x) );
}
char  yfeq[] = "(y)* (x)";
/* --------------------------------- */
/* --------------------------------- */
double bx = 2.;    char bxeq[] = "2";
double ax = 1.;    char axeq[] = "1";
/* ---------------------------------- */
/* ---------------------------------- */
fc.h
/* ---------------------------------- */
/* save as fc.h                       */
/* ---------------------------------- */
#define  LOOP  2*50
/* ---------------------------------- */
double f(
double x,
double y)
{
 return(      (4) );
}
char  feq[] = "4";
/* --------------------------------- */
/* --------------------------------- */
double v(
double x)
{
 return(      1/cos(x) );
}
char  veq[] = "1/cos(x)";
/* --------------------------------- */
double u(
double x)
{
 return(      (1./2.) );
}
char  ueq[] = "1./2.";
/* --------------------------------- */
/* --------------------------------- */
double xf(
double x,
double y)
{
 return(       (x)* (4) );
}
char  xfeq[] = "(x)* (4)";
/* --------------------------------- */
double yf(
double x,
double y)
{
 return(       (y)* (4) );
}
char  yfeq[] = "(y)* (4)";
/* --------------------------------- */
/* --------------------------------- */
double bx = +PI/4.;    char bxeq[] = "+PI/4";
double ax = -PI/4.;    char axeq[] = "-PI/4";
/* ---------------------------------- */
/* ---------------------------------- */