Mercurial > hg > octave-nkf
diff liboctave/dNDArray.cc @ 4543:79df15d4470c
[project @ 2003-10-18 03:53:52 by jwe]
author | jwe |
---|---|
date | Sat, 18 Oct 2003 03:53:53 +0000 |
parents | 01ee68d18069 |
children | 773a21e4fce8 |
line wrap: on
line diff
--- a/liboctave/dNDArray.cc +++ b/liboctave/dNDArray.cc @@ -36,6 +36,33 @@ #include "ArrayN-inline.h" +NDArray::NDArray (const boolNDArray& a) + : MArrayN<double> (a.dims ()) +{ + for (int i = 0; i < a.length (); i++) + elem (i) = a.elem (i); +} + +NDArray::NDArray (const charNDArray& a) + : MArrayN<double> (a.dims ()) +{ + for (int i = 0; i < a.length (); i++) + elem (i) = a.elem (i); +} + +// unary operations + +boolNDArray +NDArray::operator ! (void) const +{ + boolNDArray b (dims ()); + + for (int i = 0; i < length (); i++) + b.elem (i) = ! elem (i); + + return b; +} + // XXX FIXME XXX -- this is not quite the right thing. boolMatrix @@ -156,6 +183,15 @@ return true; } +NDS_CMP_OPS(NDArray, , double, ) +NDS_BOOL_OPS(NDArray, double, 0.0) + +SND_CMP_OPS(double, , NDArray, ) +SND_BOOL_OPS(double, NDArray, 0.0) + +NDND_CMP_OPS(NDArray, , NDArray, ) +NDND_BOOL_OPS(NDArray, NDArray, 0.0) + /* ;;; Local Variables: *** ;;; mode: C++ ***