Mathc initiation/Fichiers h : c46fa


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,
double z)
{
        return( y*z);
}
char  feq[] =  "y*z";
/* ---------------------------------- */
/* ---------------------------------- */
double g(
double t)
{
        return(t);
}
char  geq[] =  "t";
/* ---------------------------------- */
double h(
double t)
{
        return(t*t);
}
char  heq[] =  "t**2";
/* ---------------------------------- */
double k(
double t)
{
        return(t*t*t);
}
char  keq[] =  "t**3";
/* ---------------------------------- */
/* ---------------------------------- */
double b = 2.;    char beq[] = "2";
double a = 0.;    char aeq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
fb.h
/* ---------------------------------- */
/* save as fb.h                       */
/* ---------------------------------- */
#define  LOOP  2*50
/* ---------------------------------- */
double f(
double x,
double y,
double z)
{
        return( cos(y*z) );
}
char  feq[] =  "cos(y*z)";
/* ---------------------------------- */
/* ---------------------------------- */
double g(
double t)
{
        return(3*t*t);
}
char  geq[] =  "3*t**2";
/* ---------------------------------- */
double h(
double t)
{
        return(5*t*t);
}
char  heq[] =  "5*t**2";
/* ---------------------------------- */
double k(
double t)
{
        return(2*t*t);
}
char  keq[] =  "2*t**2";
/* ---------------------------------- */
/* ---------------------------------- */
double b = 1.;    char beq[] = "1";
double a = 0.;    char aeq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */
fc.h
/* ---------------------------------- */
/* save as fc.h                       */
/* ---------------------------------- */
#define  LOOP  2*50
/* ---------------------------------- */
double f(
double x,
double y,
double z)
{
        return( cos(x)*sin(z));
}
char  feq[] =  "cos(x)*sin(z)";
/* ---------------------------------- */
/* ---------------------------------- */
double g(
double t)
{
        return( exp(t));
}
char  geq[] =  "exp(t)";
/* ---------------------------------- */
double h(
double t)
{
        return( exp(-t));
}
char  heq[] =  "exp(-t)";
/* ---------------------------------- */
double k(
double t)
{
        return( exp(2*t));
}
char  keq[] =  "exp(2*t)";
/* ---------------------------------- */
/* ---------------------------------- */
double b = 1.;    char beq[] = "1";
double a = 0.;    char aeq[] = "0";
/* ---------------------------------- */
/* ---------------------------------- */