toms418_test

toms418_test, a FORTRAN77 code which calls toms418(), which estimates Fourier integrals of the form integral ( a<=x<=b ) f(x) * cos(wx) dx, or integral ( a<=x<=b ) f(x) * sin(wx) dx, by Bo Einarsson. This is a version of ACM toms algorithm 418.

Licensing:

The computer code and data files described and made available on this web page are distributed under the GNU LGPL license.

Related Programs:

toms418, a FORTRAN77 code which estimates Fourier integrals of the form integral ( a<=x<=b ) f(x) * cos(wx) dx, or integral ( a<=x<=b ) f(x) * sin(wx) dx, by Bo Einarsson. This is a version of ACM toms algorithm 418.

Source Code:

• toms418_test.f, a sample calling program.
• toms418_test.sh, commands to compile and run the sample program.
• toms418_test.txt, the output file.