Mercurial > hg > octave-nkf
diff scripts/general/shift.m @ 11587:c792872f8942
all script files: untabify and strip trailing whitespace
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 20 Jan 2011 17:35:29 -0500 |
parents | fd0a3ac60b0e |
children | 9493880928c8 |
line wrap: on
line diff
--- a/scripts/general/shift.m +++ b/scripts/general/shift.m @@ -23,7 +23,7 @@ ## the elements of @var{x}. ## ## If @var{x} is a matrix, do the same for each column of @var{x}. -## If the optional @var{dim} argument is given, operate along this +## If the optional @var{dim} argument is given, operate along this ## dimension. ## @end deftypefn @@ -82,10 +82,10 @@ %! a = [1, 2, 3]; %! b = [4, 5, 6]; %! c = [7, 8, 9]; -%! +%! %! r = [a, b, c]; %! m = [a; b; c]; -%! +%! %! assert((shift (r, 3) == [c, a, b] %! && shift (r, -6) == [c, a, b] %! && shift (r, -3) == [b, c, a]