Aller au contenu

Mathc initiation/a366

Un livre de Wikilivres.


Sommaire


Installer ce fichier dans votre répertoire de travail.

g_an.h
/* ------------------------------------ */
/*  Save as :   g_an.h                  */
/* ------------------------------------ */
void G_a_n(
CTRL_splot w,
tvalue n,
double (*P_a_n)(int n)
)
{
FILE   *fp = fopen("a_main.plt","w");
        
fprintf(fp," set zeroaxis lt 8\n"
           " set grid\n"
           " plot [%0.3f:%0.3f] [%0.3f:%0.3f]\\\n" 
           " \"a_n\" with point lt 7 ps 1      \n", 
             w.xmin,w.xmax,w.ymin,w.ymax);
 fclose(fp);

 fp = fopen("a_n","w");        
   for(n.value=n.min; n.value<=n.max; ++n.value)   
      fprintf(fp," %0.0f   %6.3f\n",n.value,(*P_a_n)(n.value));     
 fclose(fp);
}
/* ------------------------------------ */
/* ------------------------------------ */


Déclaration des fichiers h.