Mercurial > octave-nkf

changeset 4782:3dfdf6f36854

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[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	Tue Feb 17 15:54:36 2004 +0000
+++ b/src/DLD-FUNCTIONS/fft.cc	Tue Feb 17 16:23:22 2004 +0000
@@ -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	Tue Feb 17 15:54:36 2004 +0000
+++ b/src/DLD-FUNCTIONS/fft2.cc	Tue Feb 17 16:23:22 2004 +0000
@@ -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	Tue Feb 17 15:54:36 2004 +0000
+++ b/src/DLD-FUNCTIONS/fftn.cc	Tue Feb 17 16:23:22 2004 +0000
@@ -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);
 }
 
 /*