comparison src/OPERATORS/op-cm-cs.cc @ 4915:c638c144d4da

[project @ 2004-07-23 19:01:22 by jwe]
author jwe
date Fri, 23 Jul 2004 19:01:23 +0000
parents c7ae43dfdea4
children 57077d0ddc8e
comparison
equal deleted inserted replaced
4914:1c0442da75fd 4915:c638c144d4da
99 } 99 }
100 100
101 DEFNDBINOP_FN (el_and, complex_matrix, complex, complex_array, complex, mx_el_and) 101 DEFNDBINOP_FN (el_and, complex_matrix, complex, complex_array, complex, mx_el_and)
102 DEFNDBINOP_FN (el_or, complex_matrix, complex, complex_array, complex, mx_el_or) 102 DEFNDBINOP_FN (el_or, complex_matrix, complex, complex_array, complex, mx_el_or)
103 103
104 DEFNDCATOP_FN (cm_cs, complex_matrix, complex, complex_array, complex_array, concat)
105
104 DEFNDASSIGNOP_FN (assign, complex_matrix, complex, complex_array, assign) 106 DEFNDASSIGNOP_FN (assign, complex_matrix, complex, complex_array, assign)
105 107
106 void 108 void
107 install_cm_cs_ops (void) 109 install_cm_cs_ops (void)
108 { 110 {
123 INSTALL_BINOP (op_el_pow, octave_complex_matrix, octave_complex, el_pow); 125 INSTALL_BINOP (op_el_pow, octave_complex_matrix, octave_complex, el_pow);
124 INSTALL_BINOP (op_el_ldiv, octave_complex_matrix, octave_complex, el_ldiv); 126 INSTALL_BINOP (op_el_ldiv, octave_complex_matrix, octave_complex, el_ldiv);
125 INSTALL_BINOP (op_el_and, octave_complex_matrix, octave_complex, el_and); 127 INSTALL_BINOP (op_el_and, octave_complex_matrix, octave_complex, el_and);
126 INSTALL_BINOP (op_el_or, octave_complex_matrix, octave_complex, el_or); 128 INSTALL_BINOP (op_el_or, octave_complex_matrix, octave_complex, el_or);
127 129
130 INSTALL_CATOP (octave_complex_matrix, octave_complex, cm_cs);
131
128 INSTALL_ASSIGNOP (op_asn_eq, octave_complex_matrix, octave_complex, assign); 132 INSTALL_ASSIGNOP (op_asn_eq, octave_complex_matrix, octave_complex, assign);
129 } 133 }
130 134
131 /* 135 /*
132 ;;; Local Variables: *** 136 ;;; Local Variables: ***