comparison src/OPERATORS/op-cm-cm.cc @ 9607:1be3c73ed7b5

reuse temporary arrays in nested expressions
author Jaroslav Hajek <highegg@gmail.com>
date Thu, 03 Sep 2009 08:48:51 +0200
parents 319e2ab9b8ae
children afcf852256d2
comparison
equal deleted inserted replaced
9606:a04352386a6b 9607:1be3c73ed7b5
68 return octave_value (v.complex_matrix_value().hermitian ()); 68 return octave_value (v.complex_matrix_value().hermitian ());
69 } 69 }
70 70
71 DEFNCUNOP_METHOD (incr, complex_matrix, increment) 71 DEFNCUNOP_METHOD (incr, complex_matrix, increment)
72 DEFNCUNOP_METHOD (decr, complex_matrix, decrement) 72 DEFNCUNOP_METHOD (decr, complex_matrix, decrement)
73 DEFNCUNOP_METHOD (changesign, complex_matrix, changesign)
73 74
74 // complex matrix by complex matrix ops. 75 // complex matrix by complex matrix ops.
75 76
76 DEFNDBINOP_OP (add, complex_matrix, complex_matrix, complex_array, complex_array, +) 77 DEFNDBINOP_OP (add, complex_matrix, complex_matrix, complex_array, complex_array, +)
77 DEFNDBINOP_OP (sub, complex_matrix, complex_matrix, complex_array, complex_array, -) 78 DEFNDBINOP_OP (sub, complex_matrix, complex_matrix, complex_array, complex_array, -)
184 INSTALL_UNOP (op_transpose, octave_complex_matrix, transpose); 185 INSTALL_UNOP (op_transpose, octave_complex_matrix, transpose);
185 INSTALL_UNOP (op_hermitian, octave_complex_matrix, hermitian); 186 INSTALL_UNOP (op_hermitian, octave_complex_matrix, hermitian);
186 187
187 INSTALL_NCUNOP (op_incr, octave_complex_matrix, incr); 188 INSTALL_NCUNOP (op_incr, octave_complex_matrix, incr);
188 INSTALL_NCUNOP (op_decr, octave_complex_matrix, decr); 189 INSTALL_NCUNOP (op_decr, octave_complex_matrix, decr);
190 INSTALL_NCUNOP (op_uminus, octave_complex_matrix, changesign);
189 191
190 INSTALL_BINOP (op_add, octave_complex_matrix, octave_complex_matrix, add); 192 INSTALL_BINOP (op_add, octave_complex_matrix, octave_complex_matrix, add);
191 INSTALL_BINOP (op_sub, octave_complex_matrix, octave_complex_matrix, sub); 193 INSTALL_BINOP (op_sub, octave_complex_matrix, octave_complex_matrix, sub);
192 INSTALL_BINOP (op_mul, octave_complex_matrix, octave_complex_matrix, mul); 194 INSTALL_BINOP (op_mul, octave_complex_matrix, octave_complex_matrix, mul);
193 INSTALL_BINOP (op_div, octave_complex_matrix, octave_complex_matrix, div); 195 INSTALL_BINOP (op_div, octave_complex_matrix, octave_complex_matrix, div);