23 #if defined (HAVE_CONFIG_H) 27 #include "mx-fm-fcs.h" 28 #include "mx-fcs-fm.h" 29 #include "mx-fnda-fcs.h" 30 #include "mx-fcs-fnda.h" 48 DEFNDBINOP_OP (add, float_matrix, float_complex, float_array, float_complex, +)
49 DEFNDBINOP_OP (sub, float_matrix, float_complex, float_array, float_complex, -)
50 DEFNDBINOP_OP (mul, float_matrix, float_complex, float_array, float_complex, *)
95 DEFNDBINOP_OP (el_mul, float_matrix, float_complex, float_array,
111 DEFNDBINOP_FN (el_pow, float_matrix, float_complex, float_array,
122 DEFNDBINOP_FN (el_and, float_matrix, float_complex, float_array,
124 DEFNDBINOP_FN (el_or, float_matrix, float_complex, float_array,
127 DEFNDCATOP_FN (fm_fcs, float_matrix, float_complex, float_array,
octave_value xpow(const SparseMatrix &a, double b)
#define DEFBINOP(name, t1, t2)
FloatComplexMatrix float_complex_matrix_value(bool=false) const
octave_value op_el_pow(const octave_value &a1, const octave_value &a2)
#define INSTALL_BINOP_TI(ti, op, t1, t2, f)
characters Given a string matrix
octave_value op_eq(const octave_value &a1, const octave_value &a2)
void install_fm_fcs_ops(octave::type_info &ti)
F77_RET_T const F77_REAL const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE &F77_RET_T const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE * f
octave_value op_el_ldiv(const octave_value &a1, const octave_value &a2)
ComplexNDArray concat(NDArray &ra, ComplexNDArray &rb, const Array< octave_idx_type > &ra_idx)
boolMatrix mx_el_le(const boolMatrix &m1, const boolMatrix &m2)
octave_value op_pow(const octave_value &a1, const octave_value &a2)
#define DEFNDBINOP_FN(name, t1, t2, e1, e2, f)
F77_RET_T const F77_REAL const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE &F77_RET_T const F77_DBLE F77_DBLE &F77_RET_T const F77_REAL F77_REAL &F77_RET_T const F77_DBLE const F77_DBLE F77_DBLE * d
const octave_base_value & a2
octave_value op_div(const octave_value &a1, const octave_value &a2)
octave_value op_el_or(const octave_value &a1, const octave_value &a2)
FloatNDArray float_array_value(bool=false) const
boolMatrix mx_el_ge(const boolMatrix &m1, const boolMatrix &m2)
FloatComplex float_complex_value(bool=false) const
Matrix x_el_div(double a, const SparseMatrix &b)
boolMatrix mx_el_gt(const boolMatrix &m1, const boolMatrix &m2)
#define INSTALL_CATOP_TI(ti, t1, t2, f)
FloatMatrix float_matrix_value(bool=false) const
octave_value elem_xpow(double a, const SparseMatrix &b)
octave_value op_el_and(const octave_value &a1, const octave_value &a2)
octave_int< T > pow(const octave_int< T > &a, const octave_int< T > &b)
Matrix xleftdiv(const SparseMatrix &a, const Matrix &b, MatrixType &typ)
boolMatrix mx_el_ne(const boolMatrix &m1, const boolMatrix &m2)
void warn_divide_by_zero(void)
octave_value op_le(const octave_value &a1, const octave_value &a2)
octave_value op_lt(const octave_value &a1, const octave_value &a2)
octave_value op_el_div(const octave_value &a1, const octave_value &a2)
#define INSTALL_ASSIGNCONV_TI(ti, t1, t2, tr)
return octave_value(v1.char_array_value() . concat(v2.char_array_value(), ra_idx),((a1.is_sq_string()||a2.is_sq_string()) ? '\'' :'"'))
const octave_char_matrix & v2
boolMatrix mx_el_or(const boolMatrix &m1, const boolMatrix &m2)
octave_value op_ne(const octave_value &a1, const octave_value &a2)
boolMatrix mx_el_and(const boolMatrix &m1, const boolMatrix &m2)
MatrixType matrix_type(void) const
octave_value op_add(const octave_value &a1, const octave_value &a2)
octave_value op_ldiv(const octave_value &a1, const octave_value &a2)
#define DEFNDCMPLXCMPOP_FN(name, t1, t2, e1, e2, f)
octave_value op_sub(const octave_value &a1, const octave_value &a2)
boolMatrix mx_el_lt(const boolMatrix &m1, const boolMatrix &m2)
std::complex< float > FloatComplex
octave_value op_el_mul(const octave_value &a1, const octave_value &a2)
#define DEFBINOP_FN(name, t1, t2, f)
octave_value op_ge(const octave_value &a1, const octave_value &a2)
#define DEFNDBINOP_OP(name, t1, t2, e1, e2, op)
#define DEFNDCATOP_FN(name, t1, t2, e1, e2, f)
boolMatrix mx_el_eq(const boolMatrix &m1, const boolMatrix &m2)
octave_value op_mul(const octave_value &a1, const octave_value &a2)
octave_value op_gt(const octave_value &a1, const octave_value &a2)