Mercurial > octave
comparison liboctave/dDiagMatrix.cc @ 1214:0bf4d2b7def4
[project @ 1995-04-06 02:33:59 by jwe]
author | jwe |
---|---|
date | Thu, 06 Apr 1995 02:35:53 +0000 |
parents | 8302fab9fe24 |
children | f93b7fa5e113 |
comparison
equal
deleted
inserted
replaced
1213:9689615b34f2 | 1214:0bf4d2b7def4 |
---|---|
34 #include "lo-error.h" | 34 #include "lo-error.h" |
35 | 35 |
36 /* | 36 /* |
37 * Diagonal Matrix class. | 37 * Diagonal Matrix class. |
38 */ | 38 */ |
39 | |
40 #define KLUDGE_DIAG_MATRICES | |
41 #define TYPE double | |
42 #define KL_DMAT_TYPE DiagMatrix | |
43 #include "mx-kludge.cc" | |
44 #undef KLUDGE_DIAG_MATRICES | |
45 #undef TYPE | |
46 #undef KL_DMAT_TYPE | |
47 | 39 |
48 int | 40 int |
49 DiagMatrix::operator == (const DiagMatrix& a) const | 41 DiagMatrix::operator == (const DiagMatrix& a) const |
50 { | 42 { |
51 if (rows () != a.rows () || cols () != a.cols ()) | 43 if (rows () != a.rows () || cols () != a.cols ()) |