23 #if defined (HAVE_CONFIG_H)
34 #if defined (DEFINENULLASSIGNCONV)
38 #if ! defined (LDMATRIX)
39 # define LDMATRIX LMATRIX
42 #define OCTAVE_LMATRIX CONCAT2(octave_, LMATRIX)
43 #define OCTAVE_LDMATRIX CONCAT2(octave_, LDMATRIX)
44 #define OCTAVE_RMATRIX CONCAT2(octave_, RMATRIX)
46 # define LMATRIX_VALUE perm_matrix_value
47 # define RMATRIX_VALUE CONCAT2(RMATRIX, _value)
49 # define LMATRIX_VALUE CONCAT2(LMATRIX, _value)
50 # define RMATRIX_VALUE perm_matrix_value
58 return v1.LMATRIX_VALUE () * v2.RMATRIX_VALUE ();
67 return v1.perm_matrix_value ().inverse () * v2.RMATRIX_VALUE ();
75 return v1.LMATRIX_VALUE () * v2.perm_matrix_value ().inverse ();
79 #define SHORT_NAME CONCAT3(LSHORT, _, RSHORT)
80 #define INST_NAME CONCAT3(install_, SHORT_NAME, _ops)
91 #if defined (DEFINENULLASSIGNCONV)
#define DEFBINOP(name, t1, t2)
const octave_base_value & a2
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 INSTALL_ASSIGNCONV(t1, t2, tr)
octave_value op_mul(const octave_value &a1, const octave_value &a2)