Mercurial > octave
view test/bug-49904.tst @ 31949:1dba35103327
perms.cc: Resequenced output for compatibility (bug #50426)
Previously, perms() was returning results in reverse lexicographic order.
For compatibility, it is required to do that only for inputs in ascending
order. Other inputs carry over that permutation to the results as well. This
edit changes the sort order, changes the docs, and fixes some BISTs to match.
Co-author: "Hendrik Koerner <koerhen@web.de>"
in https://savannah.gnu.org/bugs/index.php?63962#comment18
| author | Arun Giridhar <arungiridhar@gmail.com> |
|---|---|
| date | Fri, 31 Mar 2023 14:36:03 -0400 |
| parents | 9080316864bf |
| children |
line wrap: on
line source
%!shared A %! A = [ ... %! 1.00003+0.00000i, -0.68292+0.26406i, -0.57670+0.25291i, 0.34986+0.03335i; %! -0.68292-0.26406i, 0.94539+0.00000i, 0.69006-0.03967i, -0.43847+0.38619i; %! -0.57670-0.25291i, 0.69006+0.03967i, 0.95260+0.00000i, -0.34734+0.40728i; %! 0.34986-0.03335i, -0.43847-0.38619i, -0.34734-0.40728i, 0.98356+0.00000i]; %! %!test <*49904> %! [Ainv, rcond] = inv (A); %! assert (ishermitian (Ainv)); %! assert (A * Ainv, eye (4, 'double'), eps ('double') / rcond) %!test <*49904> %! [Ainv, rcond] = inv (single (A)); %! assert (ishermitian (Ainv)); %! assert (A * Ainv, eye (4, 'single'), eps ('single') / rcond)