/* ---------------------------------- */
/* save as c17a.c                    */
/* --------------------------------- */
#include  "x_hfile.h"
#include       "fa.h"
/* --------------------------------- */
int main(void)
{
double a,b,n,ny,M;
 
 clrscrn();
 printf(" f : (x,y)-> %s\n\n", feq);
 printf(" u :   (x)-> %s  \n", ueq);
 printf(" v :   (x)-> %s\n\n\n", veq);

 a = 0;     b = 1;
 n = 2*10; ny = 2*10;

 M = simpson_dydx(f, a,b,n, u,v,ny);

 printf(" With the simpson's rule.\n\n");
 printf("    (%.3f  (%s\n", b, veq);
 printf(" int(   int(       %s  dy dx = %.6f\n", feq, M);
 printf("    (%.3f  (%s\n\n\n", a, ueq);

 stop();

 return 0;
}
/* --------------------------------- */