Mercurial > hg > octave-lyh
diff src/xdiv.cc @ 164:e2c950dd96d2
[project @ 1993-10-18 19:32:00 by jwe]
| author | jwe |
|---|---|
| date | Mon, 18 Oct 1993 19:32:00 +0000 |
| parents | 78fd87e624cb |
| children | a99f28f5e351 |
line wrap: on
line diff
--- a/src/xdiv.cc +++ b/src/xdiv.cc @@ -26,8 +26,12 @@ #endif #include <assert.h> +#include <Complex.h> + +#include "xdiv.h" +#include "Matrix.h" +#include "tree-const.h" #include "error.h" -#include "xdiv.h" static inline int result_ok (int info, double rcond, int warn = 1) @@ -80,7 +84,7 @@ /* 1 */ tree_constant -xdiv (Matrix& a, Matrix& b) +xdiv (const Matrix& a, const Matrix& b) { if (! mx_div_conform (b.rows (), b.columns (), a.columns ())) return tree_constant (); @@ -105,7 +109,7 @@ /* 2 */ tree_constant -xdiv (Matrix& a, ComplexMatrix& b) +xdiv (const Matrix& a, const ComplexMatrix& b) { if (! mx_div_conform (b.rows (), b.columns (), a.columns ())) return tree_constant (); @@ -130,7 +134,7 @@ /* 3 */ tree_constant -xdiv (ComplexMatrix& a, Matrix& b) +xdiv (const ComplexMatrix& a, const Matrix& b) { if (! mx_div_conform (b.rows (), b.columns (), a.columns ())) return tree_constant (); @@ -155,7 +159,7 @@ /* 4 */ tree_constant -xdiv (ComplexMatrix& a, ComplexMatrix& b) +xdiv (const ComplexMatrix& a, const ComplexMatrix& b) { if (! mx_div_conform (b.rows (), b.columns (), a.columns ())) return tree_constant (); @@ -190,7 +194,7 @@ */ tree_constant -x_el_div (double a, Matrix& b) +x_el_div (double a, const Matrix& b) { int nr = b.rows (); int nc = b.columns (); @@ -205,7 +209,7 @@ } tree_constant -x_el_div (double a, ComplexMatrix& b) +x_el_div (double a, const ComplexMatrix& b) { int nr = b.rows (); int nc = b.columns (); @@ -220,7 +224,7 @@ } tree_constant -x_el_div (Complex a, Matrix& b) +x_el_div (const Complex a, const Matrix& b) { int nr = b.rows (); int nc = b.columns (); @@ -235,7 +239,7 @@ } tree_constant -x_el_div (Complex a, ComplexMatrix& b) +x_el_div (const Complex a, const ComplexMatrix& b) { int nr = b.rows (); int nc = b.columns (); @@ -262,7 +266,7 @@ /* 1 */ tree_constant -xleftdiv (Matrix& a, Matrix& b) +xleftdiv (const Matrix& a, const Matrix& b) { if (! mx_leftdiv_conform (a.rows (), a.columns (), b.rows ())) return tree_constant (); @@ -284,7 +288,7 @@ /* 2 */ tree_constant -xleftdiv (Matrix& a, ComplexMatrix& b) +xleftdiv (const Matrix& a, const ComplexMatrix& b) { if (! mx_leftdiv_conform (a.rows (), a.columns (), b.rows ())) return tree_constant (); @@ -306,7 +310,7 @@ /* 3 */ tree_constant -xleftdiv (ComplexMatrix& a, Matrix& b) +xleftdiv (const ComplexMatrix& a, const Matrix& b) { if (! mx_leftdiv_conform (a.rows (), a.columns (), b.rows ())) return tree_constant (); @@ -328,7 +332,7 @@ /* 4 */ tree_constant -xleftdiv (ComplexMatrix& a, ComplexMatrix& b) +xleftdiv (const ComplexMatrix& a, const ComplexMatrix& b) { if (! mx_leftdiv_conform (a.rows (), a.columns (), b.rows ())) return tree_constant ();