/* ------------------------------ */
/* Save as c12b.c                  */
/* ------------------------------ */
#include      "x_a.h"
/* ------------------------------ */
double f(double x)
{
	 return( pow(x,2.) );
}
/* ------------------------------ */
int main(void)
{
FILE   *fp;                     /* Déclarer un pointeur de fichier.   */
double   a;

  clrscrn();
                                /* Ouvrir le fichier en mode écriture.*/
 fp = fopen("data","w");        /* fp est un pointeur de fichier      */
                                /* qui pointe sur le fichier "data"   */
 for(a = -5.0; a <= 5.0; a+=.2)
 
  fprintf(fp," %6.3f %6.3f\n",  /* Imprimer dans le fichier "data"    */
                a,   f(a));
                
 fclose(fp);                    /* Fermer le fichier "data"           */

 printf(" Dans gnuplot -> plot \"data\" \n\n");
        
 stop(); 
     
 return 0;}