36 #define SCALARV SCALAR
40 #define MATRIXV MATRIX
46 #define OCTAVE_MATRIX CONCAT2(octave_, MATRIX)
47 #define OCTAVE_SCALAR CONCAT2(octave_, SCALAR)
48 #define MATRIX_VALUE CONCAT2(MATRIXV, _value)
49 #define SCALAR_VALUE CONCAT2(SCALARV, _value)
78 return xpow (
v1.MATRIX_VALUE (),
v2.SCALAR_VALUE ());
81 #define SHORT_NAME CONCAT3(MSHORT, _, SSHORT)
82 #define INST_NAME CONCAT3(install_, SHORT_NAME, _ops)
octave_value xpow(const SparseMatrix &a, double b)
#define DEFBINOP(name, t1, t2)
static T gripe_if_zero(T x)
octave_value op_pow(const octave_value &a1, const octave_value &a2)
const octave_base_value const Array< octave_idx_type > &ra_idx octave_int16_scalar & v1
#define CAST_BINOP_ARGS(t1, t2)
octave_value op_div(const octave_value &a1, const octave_value &a2)
#define INSTALL_BINOP(op, t1, t2, f)
const octave_char_matrix & v2
octave_value op_ldiv(const octave_value &a1, const octave_value &a2)
#define DEFNDBINOP_OP(name, t1, t2, e1, e2, op)
octave_value op_mul(const octave_value &a1, const octave_value &a2)
void gripe_divide_by_zero(void)
F77_RET_T const double * x