Mercurial > octave

diff src/OPERATORS/op-scm-cm.cc @ 5429:2042301733ce

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-08-25 12:21:24 by dbateman]
author dbateman
date Thu, 25 Aug 2005 12:21:24 +0000
parents 22994a5730f9
children 8d7162924bd3
line wrap: on
line diff
--- a/src/OPERATORS/op-scm-cm.cc	Tue Aug 23 18:38:28 2005 +0000
+++ b/src/OPERATORS/op-scm-cm.cc	Thu Aug 25 12:21:24 2005 +0000
@@ -43,15 +43,7 @@
 DEFBINOP_OP (add, sparse_complex_matrix, complex_matrix, +)
 DEFBINOP_OP (sub, sparse_complex_matrix, complex_matrix, -)
 
-DEFBINOP (mul, sparse_complex_matrix, complex_matrix)
-{
-  CAST_BINOP_ARGS (const octave_sparse_complex_matrix&, 
-		   const octave_complex_matrix&);
-  
-  ComplexMatrix tmp (v1.complex_matrix_value ());
-
-  return octave_value ( tmp * v2.complex_matrix_value());
-}
+DEFBINOP_OP (mul, sparse_complex_matrix, complex_matrix, *)
 
 DEFBINOP (div, sparse_complex_matrix, complex_matrix)
 {