Mercurial > octave-nkf

diff src/OPERATORS/op-cm-m.cc @ 3766:df962bbf1788

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2001-01-29 14:33:07 by jwe]
author jwe
date Mon, 29 Jan 2001 14:33:08 +0000
parents 0ff7323dab8b
children 7690958e7726
line wrap: on
line diff
--- a/src/OPERATORS/op-cm-m.cc	Wed Jan 17 18:41:30 2001 +0000
+++ b/src/OPERATORS/op-cm-m.cc	Mon Jan 29 14:33:08 2001 +0000
@@ -45,13 +45,7 @@
 DEFBINOP_OP (add, complex_matrix, matrix, +)
 DEFBINOP_OP (sub, complex_matrix, matrix, -)
 DEFBINOP_OP (mul, complex_matrix, matrix, *)
-
-DEFBINOP (div, complex_matrix, matrix)
-{
-  CAST_BINOP_ARGS (const octave_complex_matrix&, const octave_matrix&);
-
-  return xdiv (v1.complex_matrix_value (), v2.matrix_value ());
-}
+DEFBINOP_FN (div, complex_matrix, matrix, xdiv)
 
 DEFBINOPX (pow, complex_matrix, matrix)
 {