Mercurial > hg > octave-lojdl
changeset 4782:3dfdf6f36854
[project @ 2004-02-17 16:23:22 by jwe]
author | jwe |
---|---|
date | Tue, 17 Feb 2004 16:23:22 +0000 |
parents | 5f43d12f8287 |
children | 55975a3073be |
files | src/DLD-FUNCTIONS/fft.cc src/DLD-FUNCTIONS/fft2.cc src/DLD-FUNCTIONS/fftn.cc |
diffstat | 3 files changed, 12 insertions(+), 30 deletions(-) [+] |
line wrap: on
line diff
--- a/src/DLD-FUNCTIONS/fft.cc +++ b/src/DLD-FUNCTIONS/fft.cc @@ -35,10 +35,8 @@ #if defined (HAVE_FFTW3) #define FFTSRC "@sc{Fftw}" -#define WISDOM ", fft_wisdom" #else #define FFTSRC "@sc{Fftpack}" -#define WISDOM #endif static octave_value @@ -161,11 +159,9 @@ If called with three agruments, @var{dim} is an integer specifying the\n\ dimension of the matrix along which the FFT is performed\n\ @end deftypefn\n\ -@seealso {ifft, fft2, fftn" -WISDOM -"}") +@seealso {ifft, fft2, fftn, fftw_wisdom}") { - return do_fft(args, "fft", 0); + return do_fft (args, "fft", 0); } @@ -189,11 +185,9 @@ If called with three agruments, @var{dim} is an integer specifying the\n\ dimension of the matrix along which the inverse FFT is performed\n\ @end deftypefn\n\ -@seealso {fft, ifft2, ifftn" -WISDOM -"}") +@seealso {fft, ifft2, ifftn, fftw_wisdom}") { - return do_fft(args, "ifft", 1); + return do_fft (args, "ifft", 1); } /*
--- a/src/DLD-FUNCTIONS/fft2.cc +++ b/src/DLD-FUNCTIONS/fft2.cc @@ -37,10 +37,8 @@ #if defined (HAVE_FFTW3) #define FFTSRC "@sc{Fftw}" -#define WISDOM ", fft_wisdom" #else #define FFTSRC "@sc{Fftpack}" -#define WISDOM #endif static octave_value @@ -151,11 +149,9 @@ If @var{a} is a multi-dimensional matrix, each two-dimensional sub-matrix\n\ of @var{a} is treated seperately\n\ @end deftypefn\n\ -@seealso {ifft2, fft, fftn" -WISDOM -"}") +@seealso {ifft2, fft, fftn fftw_wisdom}") { - return do_fft2(args, "fft2", 0); + return do_fft2 (args, "fft2", 0); } @@ -172,11 +168,9 @@ If @var{a} is a multi-dimensional matrix, each two-dimensional sub-matrix\n\ of @var{a} is treated seperately\n\ @end deftypefn\n\ -@seealso {fft2, ifft, ifftn" -WISDOM -"}") +@seealso {fft2, ifft, ifftn, fftw_wisdom}") { - return do_fft2(args, "ifft2", 1); + return do_fft2 (args, "ifft2", 1); } /*
--- a/src/DLD-FUNCTIONS/fftn.cc +++ b/src/DLD-FUNCTIONS/fftn.cc @@ -36,10 +36,8 @@ #if defined (HAVE_FFTW3) #define FFTSRC "@sc{Fftw}" -#define WISDOM ", fft_wisdom" #else #define FFTSRC "@sc{Fftpack}" -#define WISDOM #endif static octave_value @@ -132,11 +130,9 @@ of @var{siz} is larger than the corresponding dimension @var{a}\n\ is resized and padded with zeros.\n\ @end deftypefn\n\ -@seealso {ifftn, fft, fft2" -WISDOM -"}") +@seealso {ifftn, fft, fft2, fftw_wisdom}") { - return do_fftn(args, "fftn", 0); + return do_fftn (args, "fftn", 0); } DEFUN_DLD (ifftn, args, , @@ -151,11 +147,9 @@ of @var{siz} is larger than the corresponding dimension @var{a}\n\ is resized and padded with zeros.\n\ @end deftypefn\n\ -@seealso {fftn, ifft, ifft2" -WISDOM -"}") +@seealso {fftn, ifft, ifft2, fftw_wisdom}") { - return do_fftn(args, "ifftn", 1); + return do_fftn (args, "ifftn", 1); } /*