Mercurial > octave-nkf
annotate src/ov-re-mat.h @ 7740:39930366b709
implement builtin log2
author | Jaroslav Hajek <highegg@gmail.com> |
---|---|
date | Wed, 30 Apr 2008 03:30:34 -0400 |
parents | 2df457529cfa |
children | 82be108cc558 |
rev | line source |
---|---|
2376 | 1 /* |
2 | |
7017 | 3 Copyright (C) 1996, 1997, 1998, 2000, 2002, 2003, 2004, 2005, 2006, |
4 2007 John W. Eaton | |
2376 | 5 |
6 This file is part of Octave. | |
7 | |
8 Octave is free software; you can redistribute it and/or modify it | |
9 under the terms of the GNU General Public License as published by the | |
7016 | 10 Free Software Foundation; either version 3 of the License, or (at your |
11 option) any later version. | |
2376 | 12 |
13 Octave is distributed in the hope that it will be useful, but WITHOUT | |
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
16 for more details. | |
17 | |
18 You should have received a copy of the GNU General Public License | |
7016 | 19 along with Octave; see the file COPYING. If not, see |
20 <http://www.gnu.org/licenses/>. | |
2376 | 21 |
22 */ | |
23 | |
24 #if !defined (octave_matrix_h) | |
25 #define octave_matrix_h 1 | |
26 | |
27 #include <cstdlib> | |
28 | |
3503 | 29 #include <iostream> |
2376 | 30 #include <string> |
31 | |
32 #include "mx-base.h" | |
2477 | 33 #include "oct-alloc.h" |
4649 | 34 #include "so-array.h" |
2376 | 35 #include "str-vec.h" |
36 | |
37 #include "error.h" | |
4944 | 38 #include "oct-stream.h" |
2376 | 39 #include "ov-base.h" |
3219 | 40 #include "ov-base-mat.h" |
2376 | 41 #include "ov-typeinfo.h" |
42 | |
5785 | 43 #include "MatrixType.h" |
44 | |
2376 | 45 class Octave_map; |
46 class octave_value_list; | |
47 | |
48 class tree_walker; | |
49 | |
50 // Real matrix values. | |
51 | |
52 class | |
6153 | 53 OCTINTERP_API |
4513 | 54 octave_matrix : public octave_base_matrix<NDArray> |
2376 | 55 { |
56 public: | |
57 | |
58 octave_matrix (void) | |
4513 | 59 : octave_base_matrix<NDArray> () { } |
2376 | 60 |
61 octave_matrix (const Matrix& m) | |
4513 | 62 : octave_base_matrix<NDArray> (m) { } |
63 | |
5785 | 64 octave_matrix (const Matrix& m, const MatrixType& t) |
65 : octave_base_matrix<NDArray> (m, t) { } | |
66 | |
4513 | 67 octave_matrix (const NDArray& nda) |
68 : octave_base_matrix<NDArray> (nda) { } | |
2376 | 69 |
4911 | 70 octave_matrix (const ArrayN<double>& m) |
71 : octave_base_matrix<NDArray> (NDArray (m)) { } | |
72 | |
2376 | 73 octave_matrix (const DiagMatrix& d) |
4513 | 74 : octave_base_matrix<NDArray> (Matrix (d)) { } |
2376 | 75 |
3418 | 76 octave_matrix (const RowVector& v) |
4513 | 77 : octave_base_matrix<NDArray> (Matrix (v)) { } |
2376 | 78 |
3418 | 79 octave_matrix (const ColumnVector& v) |
4513 | 80 : octave_base_matrix<NDArray> (Matrix (v)) { } |
2376 | 81 |
82 octave_matrix (const octave_matrix& m) | |
4513 | 83 : octave_base_matrix<NDArray> (m) { } |
2376 | 84 |
85 ~octave_matrix (void) { } | |
86 | |
5759 | 87 octave_base_value *clone (void) const { return new octave_matrix (*this); } |
88 octave_base_value *empty_clone (void) const { return new octave_matrix (); } | |
2376 | 89 |
5759 | 90 octave_base_value *try_narrowing_conversion (void); |
2410 | 91 |
4650 | 92 idx_vector index_vector (void) const { return idx_vector (matrix); } |
2376 | 93 |
94 bool is_real_matrix (void) const { return true; } | |
95 | |
96 bool is_real_type (void) const { return true; } | |
97 | |
5895 | 98 bool is_double_type (void) const { return true; } |
99 | |
7576 | 100 bool is_float_type (void) const { return true; } |
101 | |
2376 | 102 bool valid_as_scalar_index (void) const; |
103 | |
5533 | 104 int8NDArray |
105 int8_array_value (void) const { return int8NDArray (matrix); } | |
106 | |
107 int16NDArray | |
108 int16_array_value (void) const { return int16NDArray (matrix); } | |
109 | |
110 int32NDArray | |
111 int32_array_value (void) const { return int32NDArray (matrix); } | |
112 | |
113 int64NDArray | |
114 int64_array_value (void) const { return int64NDArray (matrix); } | |
115 | |
116 uint8NDArray | |
117 uint8_array_value (void) const { return uint8NDArray (matrix); } | |
118 | |
119 uint16NDArray | |
120 uint16_array_value (void) const { return uint16NDArray (matrix); } | |
121 | |
122 uint32NDArray | |
123 uint32_array_value (void) const { return uint32NDArray (matrix); } | |
124 | |
125 uint64NDArray | |
126 uint64_array_value (void) const { return uint64NDArray (matrix); } | |
127 | |
2376 | 128 double double_value (bool = false) const; |
129 | |
3145 | 130 double scalar_value (bool frc_str_conv = false) const |
131 { return double_value (frc_str_conv); } | |
2916 | 132 |
4513 | 133 Matrix matrix_value (bool = false) const; |
2376 | 134 |
135 Complex complex_value (bool = false) const; | |
136 | |
4513 | 137 ComplexMatrix complex_matrix_value (bool = false) const; |
2376 | 138 |
4699 | 139 ComplexNDArray complex_array_value (bool = false) const; |
4758 | 140 |
5943 | 141 boolNDArray bool_array_value (bool warn = false) const; |
5898 | 142 |
4758 | 143 charNDArray char_array_value (bool = false) const; |
144 | |
4550 | 145 NDArray array_value (bool = false) const { return matrix; } |
4505 | 146 |
5164 | 147 SparseMatrix sparse_matrix_value (bool = false) const; |
148 | |
149 SparseComplexMatrix sparse_complex_matrix_value (bool = false) const; | |
150 | |
4645 | 151 streamoff_array streamoff_array_value (void) const; |
152 | |
2376 | 153 void increment (void) { matrix += 1.0; } |
154 | |
155 void decrement (void) { matrix -= 1.0; } | |
156 | |
5279 | 157 octave_value convert_to_str_internal (bool pad, bool force, char type) const; |
2376 | 158 |
4643 | 159 void print_raw (std::ostream& os, bool pr_as_read_syntax = false) const; |
160 | |
6974 | 161 bool save_ascii (std::ostream& os); |
4687 | 162 |
163 bool load_ascii (std::istream& is); | |
164 | |
165 bool save_binary (std::ostream& os, bool& save_as_floats); | |
166 | |
167 bool load_binary (std::istream& is, bool swap, | |
168 oct_mach_info::float_format fmt); | |
169 | |
170 #if defined (HAVE_HDF5) | |
171 bool save_hdf5 (hid_t loc_id, const char *name, bool save_as_floats); | |
172 | |
173 bool load_hdf5 (hid_t loc_id, const char *name, bool have_h5giterate_bug); | |
174 #endif | |
175 | |
4944 | 176 int write (octave_stream& os, int block_size, |
177 oct_data_conv::data_type output_type, int skip, | |
178 oct_mach_info::float_format flt_fmt) const | |
179 { return os.write (matrix, block_size, output_type, skip, flt_fmt); } | |
180 | |
5900 | 181 mxArray *as_mxArray (void) const; |
182 | |
7503
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
183 octave_value erf (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
184 octave_value erfc (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
185 octave_value gamma (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
186 octave_value lgamma (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
187 octave_value abs (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
188 octave_value acos (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
189 octave_value acosh (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
190 octave_value angle (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
191 octave_value arg (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
192 octave_value asin (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
193 octave_value asinh (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
194 octave_value atan (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
195 octave_value atanh (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
196 octave_value ceil (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
197 octave_value conj (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
198 octave_value cos (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
199 octave_value cosh (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
200 octave_value exp (void) const; |
7638
2df457529cfa
implement expm1 and log1p functions
Jaroslav Hajek <highegg@gmail.com>
parents:
7636
diff
changeset
|
201 octave_value expm1 (void) const; |
7503
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
202 octave_value fix (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
203 octave_value floor (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
204 octave_value imag (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
205 octave_value log (void) const; |
7740 | 206 octave_value log2 (void) const; |
7503
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
207 octave_value log10 (void) const; |
7638
2df457529cfa
implement expm1 and log1p functions
Jaroslav Hajek <highegg@gmail.com>
parents:
7636
diff
changeset
|
208 octave_value log1p (void) const; |
7503
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
209 octave_value real (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
210 octave_value round (void) const; |
7636
99c410f7f0b0
implement mapper function for banker's rounding
Jaroslav Hajek <highegg@gmail.com>
parents:
7576
diff
changeset
|
211 octave_value roundb (void) const; |
7503
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
212 octave_value signum (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
213 octave_value sin (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
214 octave_value sinh (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
215 octave_value sqrt (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
216 octave_value tan (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
217 octave_value tanh (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
218 octave_value finite (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
219 octave_value isinf (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
220 octave_value isna (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
221 octave_value isnan (void) const; |
8c32f95c2639
convert mapper functions to new format
David Bateman <dbateman@free.fr>
parents:
7017
diff
changeset
|
222 |
2376 | 223 private: |
3219 | 224 DECLARE_OCTAVE_ALLOCATOR |
2477 | 225 |
3219 | 226 DECLARE_OV_TYPEID_FUNCTIONS_AND_DATA |
2376 | 227 }; |
228 | |
229 #endif | |
230 | |
231 /* | |
232 ;;; Local Variables: *** | |
233 ;;; mode: C++ *** | |
234 ;;; End: *** | |
235 */ |