Mercurial > octave

comparison libinterp/operators/op-fcm-fcm.cc @ 31318:eba9d6d4cc41

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Backed out changeset 83e47ccf34ac
author Arun Giridhar <arungiridhar@gmail.com>
date Wed, 19 Oct 2022 12:13:57 -0400
parents 83e47ccf34ac
children e88a07dec498
comparison
equal deleted inserted replaced
31317:83e47ccf34ac 31318:eba9d6d4cc41
52 = dynamic_cast<const octave_float_complex_matrix&> (a); 52 = dynamic_cast<const octave_float_complex_matrix&> (a);
53 53
54 if (v.ndims () > 2) 54 if (v.ndims () > 2)
55 error ("transpose not defined for N-D objects"); 55 error ("transpose not defined for N-D objects");
56 56
57 const auto& tmp = v.float_complex_matrix_value (); 57 return octave_value (v.float_complex_matrix_value ().transpose ());
58 const auto& tmp2 = tmp.transpose ();
59 return octave_value (tmp2);
60 } 58 }
61 59
62 DEFUNOP (hermitian, float_complex_matrix) 60 DEFUNOP (hermitian, float_complex_matrix)
63 { 61 {
64 const octave_float_complex_matrix& v 62 const octave_float_complex_matrix& v
65 = dynamic_cast<const octave_float_complex_matrix&> (a); 63 = dynamic_cast<const octave_float_complex_matrix&> (a);
66 64
67 if (v.ndims () > 2) 65 if (v.ndims () > 2)
68 error ("complex-conjugate transpose not defined for N-D objects"); 66 error ("complex-conjugate transpose not defined for N-D objects");
69 67
70 const auto& tmp = v.float_complex_matrix_value (); 68 return octave_value (v.float_complex_matrix_value ().hermitian ());
71 const auto& tmp2 = tmp.hermitian ();
72 return octave_value (tmp2);
73 } 69 }
74 70
75 DEFNCUNOP_METHOD (incr, float_complex_matrix, increment) 71 DEFNCUNOP_METHOD (incr, float_complex_matrix, increment)
76 DEFNCUNOP_METHOD (decr, float_complex_matrix, decrement) 72 DEFNCUNOP_METHOD (decr, float_complex_matrix, decrement)
77 DEFNCUNOP_METHOD (changesign, float_complex_matrix, changesign) 73 DEFNCUNOP_METHOD (changesign, float_complex_matrix, changesign)