Mercurial > hg > octave-lyh

diff scripts/signal/ifftshift.m @ 12676:2783fa95cab7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Use common code idiom for creating cell array for indexing ND-arrays * int2str.m, interpft.m, num2str.m, postpad.m, prepad.m, shift.m, fftshift.m, ifftshift.m, unwrap.m
author Rik <octave@nomad.inbox5.com>
date Sun, 15 May 2011 10:50:30 -0700
parents dd2c70b30f28
children 72c96de7a403
line wrap: on
line diff
--- a/scripts/signal/ifftshift.m
+++ b/scripts/signal/ifftshift.m
@@ -45,10 +45,7 @@
     nd = ndims (x);
     sz = size (x);
     sz2 = floor (sz(dim) / 2);
-    idx = cell ();
-    for i = 1:nd
-      idx{i} = 1:sz(i);
-    endfor
+    idx = repmat ({':'}, nd, 1);
     idx{dim} = [sz2+1:sz(dim), 1:sz2];
     retval = x(idx{:});
   else