Aller au contenu

Mathc initiation/a113

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.


Les fonctions f
fa.h
/* --------------------------------- */
/* save as fa.h                      */
/* --------------------------------- */
double f(
double t)
{
        return( cos(t));
}
char  feq[] =  "cos(t)";
/* --------------------------------- */
double g(
double t)
{
        return( sin(t));
}
char  geq[] =  "sin(t)";
/* --------------------------------- */
double h(
double t)
{
        return( t);
}
char  heq[] =  "t";
/* --------------------------------- */
/* --------------------------------- */
void axe_3d(void)
{
FILE *fp;

   fp = fopen("draw_axe","w");

   fprintf(fp,"\n");
   fprintf(fp,"    1.000   0.000   0.000\n");
   fprintf(fp,"   -1.000   0.000   0.000\n");
   fprintf(fp,"    0.000   0.000   0.000\n");
   fprintf(fp,"    0.000   1.000   0.000\n");
   fprintf(fp,"    0.000  -1.000   0.000\n");
   fprintf(fp,"    0.000   0.000   0.000\n");
   fprintf(fp,"    0.000   0.000   1.000\n");
   fprintf(fp,"    0.000   0.000  -1.000 \n");
   fprintf(fp,"\n");

   fclose(fp);
}
/* --------------------------------- */
/* --------------------------------- */
fb.h
/* --------------------------------- */
/* save as fb.h                      */
/* --------------------------------- */
double f(
double t)
{
        return( exp(sin(2*t)*sin(2*t)) );
}
char  feq[] =  "exp(sin(2*t)**2)";
/* --------------------------------- */
double g(
double t)
{
        return( exp(-cos(t)) );
}
char  geq[] =  "exp(-cos(t))";
/* --------------------------------- */
double h(
double t)
{
        return( sin(t));
}
char  heq[] =  "sin(t)";
/* --------------------------------- */
/* --------------------------------- */
void axe_3d(void)
{
FILE *fp;

   fp = fopen("draw_axe","w");

   fprintf(fp,"\n");
   fprintf(fp,"    1.000   0.000   0.000\n");
   fprintf(fp,"   -1.000   0.000   0.000\n");
   fprintf(fp,"    0.000   0.000   0.000\n");
   fprintf(fp,"    0.000   1.000   0.000\n");
   fprintf(fp,"    0.000  -1.000   0.000\n");
   fprintf(fp,"    0.000   0.000   0.000\n");
   fprintf(fp,"    0.000   0.000   1.000\n");
   fprintf(fp,"    0.000   0.000  -1.000 \n");
   fprintf(fp,"\n");

   fclose(fp);
}
/* --------------------------------- */
/* --------------------------------- */