Mercurial > hg > octave-lyh
annotate liboctave/chNDArray.h @ 9812:f80c566bc751
improve unary mapper system
| author | Jaroslav Hajek <highegg@gmail.com> |
|---|---|
| date | Thu, 12 Nov 2009 15:47:58 +0100 |
| parents | b4fdfee405b5 |
| children | fd262afea1d1 |
| rev | line source |
|---|---|
| 4514 | 1 /* |
| 2 | |
| 8920 | 3 Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009 John W. Eaton |
| 4514 | 4 |
| 5 This file is part of Octave. | |
| 6 | |
| 7 Octave is free software; you can redistribute it and/or modify it | |
| 8 under the terms of the GNU General Public License as published by the | |
| 7016 | 9 Free Software Foundation; either version 3 of the License, or (at your |
| 10 option) any later version. | |
| 4514 | 11 |
| 12 Octave is distributed in the hope that it will be useful, but WITHOUT | |
| 13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
| 14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
| 15 for more details. | |
| 16 | |
| 17 You should have received a copy of the GNU General Public License | |
| 7016 | 18 along with Octave; see the file COPYING. If not, see |
| 19 <http://www.gnu.org/licenses/>. | |
| 4514 | 20 |
| 21 */ | |
| 22 | |
| 23 #if !defined (octave_charNDArray_h) | |
| 24 #define octave_charNDArray_h 1 | |
| 25 | |
| 26 #include "MArrayN.h" | |
| 27 #include "chMatrix.h" | |
| 28 | |
| 29 #include "mx-defs.h" | |
|
8774
b756ce0002db
split implementation and interface in mx-op-defs and MArray-defs
Jaroslav Hajek <highegg@gmail.com>
parents:
8626
diff
changeset
|
30 #include "mx-op-decl.h" |
| 4514 | 31 |
| 32 class | |
| 6108 | 33 OCTAVE_API |
| 4514 | 34 charNDArray : public MArrayN<char> |
| 35 { | |
| 36 public: | |
| 5523 | 37 |
|
9656
b29504415a2e
provide NDArray->Matrix->Vector typedef mappers
Jaroslav Hajek <highegg@gmail.com>
parents:
8920
diff
changeset
|
38 typedef charMatrix matrix_type; |
|
b29504415a2e
provide NDArray->Matrix->Vector typedef mappers
Jaroslav Hajek <highegg@gmail.com>
parents:
8920
diff
changeset
|
39 |
| 4514 | 40 charNDArray (void) : MArrayN<char> () { } |
| 41 | |
| 6979 | 42 charNDArray (const dim_vector& dv) : MArrayN<char> (dv) { } |
| 4514 | 43 |
| 6979 | 44 charNDArray (const dim_vector& dv, char val) : MArrayN<char> (dv, val) { } |
| 4514 | 45 |
| 46 charNDArray (const charNDArray& a) : MArrayN<char> (a) { } | |
| 47 | |
| 48 charNDArray (const charMatrix& a) : MArrayN<char> (a) { } | |
| 49 | |
| 50 charNDArray (char c) : MArrayN<char> (charMatrix (c)) { } | |
| 51 | |
| 52 charNDArray (const char *s) : MArrayN<char> (charMatrix (s)) { } | |
| 53 | |
| 54 charNDArray (const std::string& s) : MArrayN<char> (charMatrix (s)) { } | |
| 55 | |
| 56 charNDArray (const string_vector& s) : MArrayN<char> (charMatrix (s)) { } | |
| 57 | |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9656
diff
changeset
|
58 charNDArray (const Array<char>& a) : MArrayN<char> (a) { } |
| 4514 | 59 |
| 60 charNDArray& operator = (const charNDArray& a) | |
| 61 { | |
| 62 MArrayN<char>::operator = (a); | |
| 63 return *this; | |
| 64 } | |
| 65 | |
|
8626
1dce30ab0e72
don't convert NaN to logical in bool expressions
John W. Eaton <jwe@octave.org>
parents:
7620
diff
changeset
|
66 bool any_element_is_nan (void) const { return false; } |
|
1dce30ab0e72
don't convert NaN to logical in bool expressions
John W. Eaton <jwe@octave.org>
parents:
7620
diff
changeset
|
67 |
| 5775 | 68 // FIXME -- this is not quite the right thing. |
| 4514 | 69 |
| 4556 | 70 boolNDArray all (int dim = -1) const; |
| 71 boolNDArray any (int dim = -1) const; | |
| 5275 | 72 charNDArray concat (const charNDArray& rb, const Array<octave_idx_type>& ra_idx); |
| 73 charNDArray concat (const NDArray& rb, const Array<octave_idx_type>& ra_idx); | |
| 4915 | 74 |
| 5275 | 75 charNDArray& insert (const charNDArray& a, octave_idx_type r, octave_idx_type c); |
| 76 charNDArray& insert (const charNDArray& a, const Array<octave_idx_type>& ra_idx); | |
| 4915 | 77 |
| 4514 | 78 charMatrix matrix_value (void) const; |
| 79 | |
|
9732
b4fdfee405b5
remove ArrayN<T> + fix nonhom. diag-scalar ops
Jaroslav Hajek <highegg@gmail.com>
parents:
9656
diff
changeset
|
80 charNDArray squeeze (void) const { return Array<char>::squeeze (); } |
| 4532 | 81 |
| 5275 | 82 static void increment_index (Array<octave_idx_type>& ra_idx, |
| 4532 | 83 const dim_vector& dimensions, |
| 84 int start_dimension = 0); | |
| 85 | |
| 5275 | 86 static octave_idx_type compute_index (Array<octave_idx_type>& ra_idx, |
| 4556 | 87 const dim_vector& dimensions); |
| 88 | |
| 4514 | 89 // i/o |
| 90 | |
| 91 // friend std::ostream& operator << (std::ostream& os, const charNDArray& a); | |
| 92 // friend std::istream& operator >> (std::istream& is, charNDArray& a); | |
| 93 | |
| 94 static char resize_fill_value (void) { return '\0'; } | |
| 95 | |
|
7620
36594d5bbe13
Move diag function into the octave_value class
David Bateman <dbateman@free.fr>
parents:
7503
diff
changeset
|
96 charNDArray diag (octave_idx_type k = 0) const; |
|
36594d5bbe13
Move diag function into the octave_value class
David Bateman <dbateman@free.fr>
parents:
7503
diff
changeset
|
97 |
| 4514 | 98 private: |
| 99 | |
| 4587 | 100 charNDArray (char *d, dim_vector& dv) : MArrayN<char> (d, dv) { } |
| 4514 | 101 }; |
| 102 | |
| 6708 | 103 NDS_CMP_OP_DECLS (charNDArray, char, OCTAVE_API) |
| 104 NDS_BOOL_OP_DECLS (charNDArray, char, OCTAVE_API) | |
| 6456 | 105 |
| 6708 | 106 SND_CMP_OP_DECLS (char, charNDArray, OCTAVE_API) |
| 107 SND_BOOL_OP_DECLS (char, charNDArray, OCTAVE_API) | |
| 6456 | 108 |
| 6708 | 109 NDND_CMP_OP_DECLS (charNDArray, charNDArray, OCTAVE_API) |
| 110 NDND_BOOL_OP_DECLS (charNDArray, charNDArray, OCTAVE_API) | |
| 6456 | 111 |
| 4514 | 112 MARRAY_FORWARD_DEFS (MArrayN, charNDArray, char) |
| 113 | |
| 114 #endif | |
| 115 | |
| 116 /* | |
| 117 ;;; Local Variables: *** | |
| 118 ;;; mode: C++ *** | |
| 119 ;;; End: *** | |
| 120 */ |