Aller au contenu

Mathc initiation/004h

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,
double z)
{
 return(       1.);
}
char  feq[] = "1";
/* --------------------------------- */
/* ---- The function of density ---- */
double R(
double x,
double y,
double z)
{
 return(       (x * y*y));
}
char  Req[] = "(x * y**2)";
/* --------------------------------- */
/* -------- The moment Mxy --------- */
double xR(
double x,
double y,
double z)
{
 return(       (x)*(x * y*y) );
}
char xReq[] = "(x)*(x * y**2)";
/* -------- The moment Mzx --------- */
double yR(
double x,
double y,
double z)
{
 return(       (y)*(x * y*y) );
}
char yReq[] = "(y)*(x * y**2)";
/* -------- The moment Mzy --------- */
double zR(
double x,
double y,
double z)
{
 return(       (z)*(x * y*y) );
}
char zReq[] = "(z)*(x * y**2)";
/* --------------------------------- */
/* --------------------------------- */
double z1(
double x,
double y)
{
 return(        (+cos(x)*sin(y) + 4));
}
char  z1eq[] = "(+cos(x)*sin(y) + 4)";
/* --------------------------------- */
double z0(
double x,
double y)
{
 return(        (-cos(x)*sin(y) - 4));
}
char  z0eq[] = "(-cos(x)*sin(y) - 4)";
/* --------------------------------- */
/* --------------------------------- */
double y1(
double x)
{
 return(       (+3.));
}
char  y1eq[] = "+3";
/* ---------------------------------- */
double y0(
double x)
{
 return(       (-0.));
}
char  y0eq[] = "-0";
/* --------------------------------- */
/* --------------------------------- */
double x1 = +3.;    char x1eq[] = "+3";
double x0 = -0.;    char x0eq[] = "-0";
/* ---------------------------------- */
/* ---------------------------------- */
.
fb.h
/* --------------------------------- */
/* save as fb.h                      */
/* --------------------------------- */
#define  LOOP  2*50
#define    RO  1
/* --------------------------------- */
double f(
double x,
double y,
double z)
{
 return(       1.);
}
char  feq[] = "1";
/* --------------------------------- */
/* ---- The function of density ---- */
double R(
double x,
double y,
double z)
{
 return(       (RO));
}
char  Req[] = "(1)";
/* --------------------------------- */
/* -------- The moment Mxy --------- */
double xR(
double x,
double y,
double z)
{
 return(       (x)*(RO) );
}
char xReq[] = "(x)*";
/* -------- The moment Mzx --------- */
double yR(
double x,
double y,
double z)
{
 return(       (y)*(RO) );
}
char yReq[] = "(y)*";
/* -------- The moment Mzy --------- */
double zR(
double x,
double y,
double z)
{
 return(       (z)*(RO) );
}
char zReq[] = "(z)*";
/* --------------------------------- */
/* --------------------------------- */
double z1(
double x,
double y)
{
 return(       (+cos(x)*sin(y) + 4));
}
char  z1eq[] = "(+cos(x)*sin(y) + 4)";
/* --------------------------------- */
double z0(
double x,
double y)
{
 return(       (+cos(x)*sin(y) - 4));
}
char  z0eq[] = "(+cos(x)*sin(y) - 4)";
/* --------------------------------- */
/* --------------------------------- */
double y1(
double x)
{
 return(      (+3.));
}
char  y1eq[] = "+3";
/* ---------------------------------- */
double y0(
double x)
{
 return(      (-0.));
}
char  y0eq[] = "-0";
/* --------------------------------- */
/* --------------------------------- */
double x1 = +3.;    char x1eq[] = "+3";
double x0 = -0.;    char x0eq[] = "-0";
/* ---------------------------------- */
/* ---------------------------------- */
fc.h
/* --------------------------------- */
/* save as fc.h                      */
/* --------------------------------- */
#define  LOOP  2*50
/* --------------------------------- */
double f(
double x,
double y,
double z)
{
 return(       1.);
}
char  feq[] = "1";
/* --------------------------------- */
/* ---- The function of density ---- */
double R(
double x,
double y,
double z)
{
 return(       (x * y*y));
}
char  Req[] = "(x * y**2)";
/* --------------------------------- */
/* --- The Moments of inertia Ix --- */
double yzR(
double x,
double y,
double z)
{
 return(         (y*y + z*z)  * (x * y*y));
}
char yzReq[] = "(y**2 + z**2) * (x * y**2)";
/* --- The Moments of inertia Iy --- */
double xzR(
double x,
double y,
double z)
{
 return(         (x*x + z*z)  * (x * y*y) );
}
char xzReq[] = "(x**2 + z**2) * (x * y**2)";
/* --- The Moments of inertia Iz --- */
double xyR(
double x,
double y,
double z)
{
 return(        (x*x + y*y)   * (x * y*y));
}
char xyReq[] = "(x**2 + y**2) * (x * y**2)";
/* --------------------------------- */
/* --------------------------------- */
double z1(
double x,
double y)
{
 return(        (+cos(x)*sin(y) + 4));
}
char  z1eq[] = "(+cos(x)*sin(y) + 4)";
/* --------------------------------- */
double z0(
double x,
double y)
{
 return(        (+cos(x)*sin(y) - 4));
}
char  z0eq[] = "(+cos(x)*sin(y) - 4)";
/* --------------------------------- */
/* --------------------------------- */
double y1(
double x)
{
 return(       (+3.));
}
char  y1eq[] = "+3";
/* ---------------------------------- */
double y0(
double x)
{
 return(       (-0.));
}
char  y0eq[] = "-0";
/* --------------------------------- */
/* --------------------------------- */
double x1 = +3.;    char x1eq[] = "+3";
double x0 = -0.;    char x0eq[] = "-0";
/* ---------------------------------- */
/* ---------------------------------- */

.

fd.h
/* --------------------------------- */
/* save as fd.h                      */
/* --------------------------------- */
#define  LOOP  2*50
#define    RO  1
/* --------------------------------- */
double f(
double x,
double y,
double z)
{
 return(       1.);
}
char  feq[] = "1";
/* --------------------------------- */
/* ---- The function of density ---- */
double R(
double x,
double y,
double z)
{
 return(       (RO));
}
char  Req[] =  "1";
/* --------------------------------- */
/* --- The Moments of inertia Ix --- */
double yzR(
double x,
double y,
double z)
{
 return(         (y*y + z*z)*(RO));
}
char yzReq[] = "(y**2 + z**2)*";
/* --- The Moments of inertia Iy --- */
double xzR(
double x,
double y,
double z)
{
 return(         (x*x + z*z)*(RO) );
}
char xzReq[] = "(x**2 + z**2)*";
/* --- The Moments of inertia Iz --- */
double xyR(
double x,
double y,
double z)
{
 return(         (x*x + y*y)*(RO));
}
char xyReq[] = "(x**2 + y**2)*";
/* --------------------------------- */
/* --------------------------------- */
double z1(
double x,
double y)
{
 return(       (+cos(x)*sin(y) + 4));
}
char  z1eq[] = "(+cos(x)*sin(y) + 4)";
/* --------------------------------- */
double z0(
double x,
double y)
{
 return(        (+cos(x)*sin(y) - 4));
}
char  z0eq[] = "(+cos(x)*sin(y) - 4)";
/* --------------------------------- */
/* --------------------------------- */
double y1(
double x)
{
 return(      (+3.));
}
char  y1eq[] = "+3";
/* ---------------------------------- */
double y0(
double x)
{
 return(      (-0.));
}
char  y0eq[] = "-0";
/* --------------------------------- */
/* --------------------------------- */
double x1 = +3.;    char x1eq[] = "+3";
double x0 = -0.;    char x0eq[] = "-0";
/* ---------------------------------- */
/* ---------------------------------- */