Mercurial > octave-libgccjit
diff scripts/signal/spectral_adf.m @ 3374:89405d9a9b0b
[project @ 1999-12-08 06:58:04 by jwe]
author | jwe |
---|---|
date | Wed, 08 Dec 1999 06:58:05 +0000 |
parents | 041ea33fbbf4 |
children | f8dde1807dee |
line wrap: on
line diff
--- a/scripts/signal/spectral_adf.m Tue Nov 23 20:54:31 1999 +0000 +++ b/scripts/signal/spectral_adf.m Wed Dec 08 06:58:05 1999 +0000 @@ -51,7 +51,7 @@ retval = 2 * real (fft (c)) - c(1); retval = [(zeros (cr, 1)), retval]; - retval(:, 1) = (0 : xr-1)' / xr; + retval(:, 1) = (0 : cr-1)' / cr; endfunction