Mercurial > octave-nkf
diff liboctave/CMatrix.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 | 97eac19837dc |
line wrap: on
line diff
--- a/liboctave/CMatrix.cc Thu Apr 06 02:25:28 1995 +0000 +++ b/liboctave/CMatrix.cc Thu Apr 06 02:35:53 1995 +0000 @@ -74,20 +74,12 @@ int F77_FCN (cfftb) (const int*, Complex*, Complex*); } -#define KLUDGE_MATRICES -#define TYPE Complex -#define KL_MAT_TYPE ComplexMatrix -#include "mx-kludge.cc" -#undef KLUDGE_MATRICES -#undef TYPE -#undef KL_MAT_TYPE - /* * Complex Matrix class */ ComplexMatrix::ComplexMatrix (const Matrix& a) - : Array2<Complex> (a.rows (), a.cols ()) + : MArray2<Complex> (a.rows (), a.cols ()) { for (int j = 0; j < cols (); j++) for (int i = 0; i < rows (); i++) @@ -95,14 +87,14 @@ } ComplexMatrix::ComplexMatrix (const DiagMatrix& a) - : Array2<Complex> (a.rows (), a.cols (), 0.0) + : MArray2<Complex> (a.rows (), a.cols (), 0.0) { for (int i = 0; i < a.length (); i++) elem (i, i) = a.elem (i, i); } ComplexMatrix::ComplexMatrix (const ComplexDiagMatrix& a) - : Array2<Complex> (a.rows (), a.cols (), 0.0) + : MArray2<Complex> (a.rows (), a.cols (), 0.0) { for (int i = 0; i < a.length (); i++) elem (i, i) = a.elem (i, i);