Mercurial > hg > octave-nkf
changeset 5018:1c65a8e44ef9 ss-2-1-59
[project @ 2004-09-22 03:33:29 by jwe]
author | jwe |
---|---|
date | Wed, 22 Sep 2004 03:33:29 +0000 |
parents | 35403c316afd |
children | 3f89170d1247 |
files | scripts/general/flipdim.m scripts/general/rotdim.m |
diffstat | 2 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/general/flipdim.m +++ b/scripts/general/flipdim.m @@ -20,7 +20,7 @@ ## -*- texinfo -*- ## @deftypefn {Function File} {} flipdim (@var{x}, @var{dim}) ## Return a copy of @var{x} flipped about the dimension @var{dim}. -## For exmaple +## For example ## ## @example ## @group
--- a/scripts/general/rotdim.m +++ b/scripts/general/rotdim.m @@ -60,7 +60,7 @@ usage ("rotdim (x, k, plane)"); endif - if (nargin > 1 && !isempty(k)) + if (nargin > 1 && ! isempty(k)) if (imag (k) != 0 || fix (k) != k) error ("rotdim: k must be an integer"); endif @@ -103,7 +103,7 @@ if (k == 0) y = x; elseif (k == 2) - y = flipdim (flipdim (x, plane (1)), plane (2)); + y = flipdim (flipdim (x, plane(1)), plane(2)); elseif (k == 1 || k == 3) perm = 1:nd; perm(plane(1)) = plane(2);