ffts0.c

徐士良写的《数值分析与算法》

  #include "stdio.h"
  #include "ffts.c"
  main()
  { double a,b,eps,t,fftsf();
    a=0.0; b=1.0; eps=0.000001;
    t=ffts(a,b,eps,fftsf);
    printf("\n");
    printf("t=%e\n",t);
    printf("\n");
  }

  #include "math.h"
  double fftsf(x)
  double x;
  { double y;
    y=exp(-x*x);
    return(y);
  }