Mathc initiation/a26

Sommaire

Installer ce fichier dans votre répertoire de travail.

	fa.h

/* ---------------------------------- */
/* save as fa.h                       */
/* ---------------------------------- */
double f(
double x)
{
         return(sqrt(x));
}
char  feq[] =  "x**(1./2.)";
/* ---------------------------------- */
double g(
double x)
{
         return(x*x);
}
char  geq[] =  "x**2";
/* ---------------------------------- */
double h(
double x)
{
         return(x);
}
char  heq[] =  "x";
/* ---------------------------------- */
double VCylindricalShell(
double x)
{
/*
 Volume of a cylindrical shell = 2Pi(average radius)(altitude)(thickness)
*/

        return( 2 * PI * h(x) * ( (f(x)) - (g(x)) ) );
}
/* ---------------------------------- */
/* ---------------------------------- */