Mercurial > octave
annotate test/bug-49904.tst @ 31237:e3016248ca5d
uifigure.m: Call set () only if varargin is not empty (bug #63088)
* uifigure.m: Call set () only if varargin is not empty.
author | John Donoghue <john.donoghue@ieee.org> |
---|---|
date | Wed, 21 Sep 2022 09:55:32 -0400 |
parents | 9080316864bf |
children |
rev | line source |
---|---|
22926
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
1 %!shared A |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
2 %! A = [ ... |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
3 %! 1.00003+0.00000i, -0.68292+0.26406i, -0.57670+0.25291i, 0.34986+0.03335i; |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
4 %! -0.68292-0.26406i, 0.94539+0.00000i, 0.69006-0.03967i, -0.43847+0.38619i; |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
5 %! -0.57670-0.25291i, 0.69006+0.03967i, 0.95260+0.00000i, -0.34734+0.40728i; |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
6 %! 0.34986-0.03335i, -0.43847-0.38619i, -0.34734-0.40728i, 0.98356+0.00000i]; |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
7 %! |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
8 |
30110
9080316864bf
update bug status in test suite
John W. Eaton <jwe@octave.org>
parents:
30109
diff
changeset
|
9 %!test <*49904> |
22926
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
10 %! [Ainv, rcond] = inv (A); |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
11 %! assert (ishermitian (Ainv)); |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
12 %! assert (A * Ainv, eye (4, 'double'), eps ('double') / rcond) |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
13 |
30110
9080316864bf
update bug status in test suite
John W. Eaton <jwe@octave.org>
parents:
30109
diff
changeset
|
14 %!test <*49904> |
22926
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
15 %! [Ainv, rcond] = inv (single (A)); |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
16 %! assert (ishermitian (Ainv)); |
db2a531717b3
fix inv for hermitian matrices (bug introduced in 5ce959c55cc0) (bug #49904)
John W. Eaton <jwe@octave.org>
parents:
diff
changeset
|
17 %! assert (A * Ainv, eye (4, 'single'), eps ('single') / rcond) |