Mercurial > octave-nkf

diff scripts/general/circshift.m @ 12351:ca1190196d26

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
PermMatrix.cc (operator*): fix mixed row/column case
author John W. Eaton <jwe@octave.org>
date Sun, 06 Feb 2011 05:50:49 -0500
parents c792872f8942
children d0b799dafede
line wrap: on
line diff
--- a/scripts/general/circshift.m	Sun Feb 06 05:18:43 2011 -0500
+++ b/scripts/general/circshift.m	Sun Feb 06 05:50:49 2011 -0500
@@ -94,3 +94,6 @@
 %!assert (circshift (x, -2), [7, 8, 9; 1, 2, 3; 4, 5, 6])
 %!assert (circshift (x, [0, 1]), [3, 1, 2; 6, 4, 5; 9, 7, 8]);
 %!assert (circshift ([],1), [])
+
+%!assert (full (circshift (eye (3), 1)), circshift (full (eye (3)), 1))
+%!assert (full (circshift (eye (3), 1)), [0,0,1;1,0,0;0,1,0])