Mercurial > octave
diff src/OPERATORS/op-cs-m.cc @ 3766:df962bbf1788
[project @ 2001-01-29 14:33:07 by jwe]
author | jwe |
---|---|
date | Mon, 29 Jan 2001 14:33:08 +0000 |
parents | 6741bef26719 |
children | 7690958e7726 |
line wrap: on
line diff
--- a/src/OPERATORS/op-cs-m.cc Wed Jan 17 18:41:30 2001 +0000 +++ b/src/OPERATORS/op-cs-m.cc Mon Jan 29 14:33:08 2001 +0000 @@ -49,7 +49,12 @@ DEFBINOP (div, complex, matrix) { - BINOP_NONCONFORMANT ("operator /"); + CAST_BINOP_ARGS (const octave_complex&, const octave_matrix&); + + ComplexMatrix m1 = v1.complex_matrix_value (); + Matrix m2 = v2.matrix_value (); + + return octave_value (xdiv (m1, m2)); } DEFBINOP_FN (pow, complex, matrix, xpow)