Mercurial > octave

comparison liboctave/CColVector.cc @ 1214:0bf4d2b7def4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 1995-04-06 02:33:59 by jwe]
author jwe
date Thu, 06 Apr 1995 02:35:53 +0000
parents 8302fab9fe24
children 97eac19837dc
comparison
equal deleted inserted replaced
1213:9689615b34f2 1214:0bf4d2b7def4
46 46
47 /* 47 /*
48 * Complex Column Vector class 48 * Complex Column Vector class
49 */ 49 */
50 50
51 #define KLUDGE_VECTORS
52 #define TYPE Complex
53 #define KL_VEC_TYPE ComplexColumnVector
54 #include "mx-kludge.cc"
55 #undef KLUDGE_VECTORS
56 #undef TYPE
57 #undef KL_VEC_TYPE
58
59 ComplexColumnVector::ComplexColumnVector (const ColumnVector& a) 51 ComplexColumnVector::ComplexColumnVector (const ColumnVector& a)
60 : Array<Complex> (a.length ()) 52 : MArray<Complex> (a.length ())
61 { 53 {
62 for (int i = 0; i < length (); i++) 54 for (int i = 0; i < length (); i++)
63 elem (i) = a.elem (i); 55 elem (i) = a.elem (i);
64 } 56 }
65 57