Mathc gnuplot/0010

Sommaire

Installer ce fichier dans votre répertoire de travail.

	kg.h

/* --------------------------------- */
/* save as kg.h                      */
/* --------------------------------- */
void G_H(
CTRL_G  w,
CTRL_H  h,
double (*P_f1)(double x)
)
{
FILE   *fp;
char    FA[FILENAME_MAX] = "a_h";
double  i;

        fp = fopen("a_main.plt","w");
fprintf(fp," set zeroaxis lt 8\n");
fprintf(fp," set grid\n\n");
fprintf(fp," plot [%0.3f:%0.3f] [%0.3f:%0.3f] \\\n",
             w.xmin,w.xmax,w.ymin,w.ymax);
fprintf(fp," \"%s\" with line lt 7",FA);
fprintf(fp,"\n\n");
fprintf(fp," reset");
             fclose(fp);


        fp = fopen(FA,"w");
 for(i=h.tmin; i<=h.tmax; i+=h.step)

     fprintf(fp," %6.3f   %6.3f\n",i,(*P_f1)(i));

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

---