Mercurial > octave-libgccjit

diff scripts/signal/spectral_adf.m @ 3238:041ea33fbbf4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1999-03-26 17:48:16 by jwe]
author jwe
date Fri, 26 Mar 1999 17:48:35 +0000
parents e4f4b2d26ee9
children 89405d9a9b0b
line wrap: on
line diff
--- a/scripts/signal/spectral_adf.m	Sat Mar 06 07:44:55 1999 +0000
+++ b/scripts/signal/spectral_adf.m	Fri Mar 26 17:48:35 1999 +0000
@@ -50,7 +50,7 @@
   c = c .* w;
   
   retval = 2 * real (fft (c)) - c(1);
-  retval = [zeros (cr, 1) retval];
+  retval = [(zeros (cr, 1)), retval];
   retval(:, 1) = (0 : xr-1)' / xr;
   
 endfunction