Mercurial > hg > octave-lyh

diff scripts/signal/ifftshift.m @ 7208:a730e47fda4d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-28 02:32:41 by jwe]
author jwe
date Wed, 28 Nov 2007 02:32:42 +0000
parents a1dbe9d80eee
children cadc73247d65
line wrap: on
line diff
--- a/scripts/signal/ifftshift.m
+++ b/scripts/signal/ifftshift.m
@@ -39,7 +39,7 @@
   endif
 
   if (nargin == 2)
-    if (!isscalar (dim))
+    if (! isscalar (dim))
       error ("ifftshift: dimension must be an integer scalar");
     endif
     nd = ndims (V);
@@ -47,9 +47,9 @@
     sz2 = floor (sz(dim) / 2);
     idx = cell ();
     for i=1:nd
-      idx {i} = 1:sz(i);
+      idx{i} = 1:sz(i);
     endfor
-    idx {dim} = [sz2+1:sz(dim), 1:sz2];
+    idx{dim} = [sz2+1:sz(dim), 1:sz2];
     retval = V (idx{:});
   else
     if (isvector (V))