Mercurial > octave
changeset 20891:95c0d4c07c56
magic: add tests for magic(2) (bug #46672)
author | Carnë Draug <carandraug@octave.org> |
---|---|
date | Mon, 14 Dec 2015 14:01:36 +0000 |
parents | a88142abca36 |
children | c07bee629973 |
files | scripts/special-matrix/magic.m |
diffstat | 1 files changed, 9 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/special-matrix/magic.m Sun Dec 13 17:40:44 2015 -0500 +++ b/scripts/special-matrix/magic.m Mon Dec 14 14:01:36 2015 +0000 @@ -85,6 +85,15 @@ %! assert (norm(diff([sum(diag(A)),sum(diag(flipud(A))),sum(A),sum(A')])),0); %! endfor +## Not a magic square but we must return something (bug #46672) +## While one day we may change the actual return of magic (2), +## this properties still must be true. +%!test +%! m = magic (2); +%! assert (size (m), [2 2]) +%! assert (unique (m), [1; 2; 3; 4]) + +%!assert (magic (2), [4 3; 1 2]) %!assert (isempty (magic (-1))) %!assert (isempty (magic (0))) %!assert (magic (1), 1)