|
5164
|
1 /* |
|
|
2 |
|
|
3 Copyright (C) 2004 David Bateman |
|
|
4 Copyright (C) 1998-2004 Andy Adler |
|
|
5 |
|
|
6 Octave is free software; you can redistribute it and/or modify it |
|
|
7 under the terms of the GNU General Public License as published by the |
|
|
8 Free Software Foundation; either version 2, or (at your option) any |
|
|
9 later version. |
|
|
10 |
|
|
11 Octave is distributed in the hope that it will be useful, but WITHOUT |
|
|
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
|
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
|
|
14 for more details. |
|
|
15 |
|
|
16 You should have received a copy of the GNU General Public License |
|
5307
|
17 along with this program; see the file COPYING. If not, write to the |
|
|
18 Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
|
|
19 Boston, MA 02110-1301, USA. |
|
5164
|
20 |
|
|
21 */ |
|
|
22 |
|
|
23 #if !defined (octave_CSparse_h) |
|
|
24 #define octave_CSparse_h 1 |
|
|
25 |
|
|
26 #include "dMatrix.h" |
|
|
27 #include "dNDArray.h" |
|
|
28 #include "CNDArray.h" |
|
|
29 #include "dColVector.h" |
|
|
30 #include "CColVector.h" |
|
|
31 #include "oct-cmplx.h" |
|
|
32 |
|
|
33 #include "CmplxDET.h" |
|
|
34 #include "MSparse.h" |
|
|
35 #include "MSparse-defs.h" |
|
|
36 #include "Sparse-op-defs.h" |
|
5785
|
37 #include "MatrixType.h" |
|
5164
|
38 |
|
|
39 class SparseMatrix; |
|
|
40 class SparseBoolMatrix; |
|
|
41 |
|
|
42 class |
|
6108
|
43 OCTAVE_API |
|
5164
|
44 SparseComplexMatrix : public MSparse<Complex> |
|
|
45 { |
|
|
46 public: |
|
|
47 |
|
|
48 typedef void (*solve_singularity_handler) (double rcond); |
|
|
49 |
|
|
50 SparseComplexMatrix (void) : MSparse<Complex> () { } |
|
|
51 |
|
5275
|
52 SparseComplexMatrix (octave_idx_type r, octave_idx_type c) : MSparse<Complex> (r, c) { } |
|
5164
|
53 |
|
5275
|
54 explicit SparseComplexMatrix (octave_idx_type r, octave_idx_type c, Complex val) |
|
5164
|
55 : MSparse<Complex> (r, c, val) { } |
|
|
56 |
|
5275
|
57 SparseComplexMatrix (octave_idx_type r, octave_idx_type c, double val) |
|
5164
|
58 : MSparse<Complex> (r, c, Complex (val)) { } |
|
|
59 |
|
|
60 SparseComplexMatrix (const SparseComplexMatrix& a) |
|
|
61 : MSparse<Complex> (a) { } |
|
|
62 |
|
|
63 SparseComplexMatrix (const SparseComplexMatrix& a, const dim_vector& dv) |
|
|
64 : MSparse<Complex> (a, dv) { } |
|
|
65 |
|
|
66 SparseComplexMatrix (const MSparse<Complex>& a) : MSparse<Complex> (a) { } |
|
|
67 |
|
|
68 explicit SparseComplexMatrix (const ComplexMatrix& a) |
|
|
69 : MSparse<Complex> (a) { } |
|
|
70 |
|
|
71 explicit SparseComplexMatrix (const ComplexNDArray& a) |
|
|
72 : MSparse<Complex> (a) { } |
|
|
73 |
|
5275
|
74 explicit SparseComplexMatrix (const Array<Complex> a, const Array<octave_idx_type>& r, |
|
|
75 const Array<octave_idx_type>& c, octave_idx_type nr = -1, |
|
|
76 octave_idx_type nc = -1, bool sum_terms = true) |
|
5164
|
77 : MSparse<Complex> (a, r, c, nr, nc, sum_terms) { } |
|
|
78 |
|
|
79 explicit SparseComplexMatrix (const Array<Complex> a, |
|
|
80 const Array<double>& r, |
|
5275
|
81 const Array<double>& c, octave_idx_type nr = -1, |
|
|
82 octave_idx_type nc = -1, bool sum_terms = true) |
|
5164
|
83 : MSparse<Complex> (a, r, c, nr, nc, sum_terms) { } |
|
|
84 |
|
|
85 explicit SparseComplexMatrix (const SparseMatrix& a); |
|
|
86 |
|
|
87 explicit SparseComplexMatrix (const SparseBoolMatrix& a); |
|
|
88 |
|
5275
|
89 SparseComplexMatrix (octave_idx_type r, octave_idx_type c, octave_idx_type num_nz) |
|
5164
|
90 : MSparse<Complex> (r, c, num_nz) { } |
|
|
91 |
|
|
92 SparseComplexMatrix& operator = (const SparseComplexMatrix& a) |
|
|
93 { |
|
|
94 MSparse<Complex>::operator = (a); |
|
|
95 return *this; |
|
|
96 } |
|
|
97 |
|
|
98 bool operator == (const SparseComplexMatrix& a) const; |
|
|
99 bool operator != (const SparseComplexMatrix& a) const; |
|
|
100 |
|
|
101 bool is_hermitian (void) const; |
|
|
102 |
|
|
103 SparseComplexMatrix max (int dim = 0) const; |
|
5275
|
104 SparseComplexMatrix max (Array2<octave_idx_type>& index, int dim = 0) const; |
|
5164
|
105 SparseComplexMatrix min (int dim = 0) const; |
|
5275
|
106 SparseComplexMatrix min (Array2<octave_idx_type>& index, int dim = 0) const; |
|
5164
|
107 |
|
5275
|
108 SparseComplexMatrix& insert (const SparseComplexMatrix& a, octave_idx_type r, octave_idx_type c); |
|
|
109 SparseComplexMatrix& insert (const SparseMatrix& a, octave_idx_type r, octave_idx_type c); |
|
5164
|
110 |
|
|
111 SparseComplexMatrix concat (const SparseComplexMatrix& rb, |
|
5275
|
112 const Array<octave_idx_type>& ra_idx); |
|
5164
|
113 SparseComplexMatrix concat (const SparseMatrix& rb, |
|
5275
|
114 const Array<octave_idx_type>& ra_idx); |
|
5164
|
115 |
|
|
116 ComplexMatrix matrix_value (void) const; |
|
|
117 |
|
|
118 SparseComplexMatrix hermitian (void) const; // complex conjugate transpose |
|
|
119 SparseComplexMatrix transpose (void) const |
|
|
120 { return MSparse<Complex>::transpose (); } |
|
|
121 |
|
|
122 friend SparseComplexMatrix conj (const SparseComplexMatrix& a); |
|
|
123 |
|
5506
|
124 private: |
|
5785
|
125 SparseComplexMatrix dinverse (MatrixType &mattyp, octave_idx_type& info, |
|
5506
|
126 double& rcond, const bool force = false, |
|
|
127 const bool calccond = true) const; |
|
|
128 |
|
5785
|
129 SparseComplexMatrix tinverse (MatrixType &mattyp, octave_idx_type& info, |
|
5506
|
130 double& rcond, const bool force = false, |
|
|
131 const bool calccond = true) const; |
|
|
132 |
|
|
133 public: |
|
5164
|
134 SparseComplexMatrix inverse (void) const; |
|
5785
|
135 SparseComplexMatrix inverse (MatrixType& mattype) const; |
|
|
136 SparseComplexMatrix inverse (MatrixType& mattype, |
|
5506
|
137 octave_idx_type& info) const; |
|
5785
|
138 SparseComplexMatrix inverse (MatrixType& mattype, octave_idx_type& info, |
|
5506
|
139 double& rcond, int force = 0, |
|
5164
|
140 int calc_cond = 1) const; |
|
|
141 |
|
|
142 ComplexDET determinant (void) const; |
|
5275
|
143 ComplexDET determinant (octave_idx_type& info) const; |
|
|
144 ComplexDET determinant (octave_idx_type& info, double& rcond, |
|
5164
|
145 int calc_cond = 1) const; |
|
|
146 |
|
|
147 private: |
|
|
148 // Diagonal matrix solvers |
|
5785
|
149 ComplexMatrix dsolve (MatrixType &typ, const Matrix& b, octave_idx_type& info, |
|
5681
|
150 double& rcond, solve_singularity_handler sing_handler, |
|
|
151 bool calc_cond = false) const; |
|
5164
|
152 |
|
5785
|
153 ComplexMatrix dsolve (MatrixType &typ, const ComplexMatrix& b, |
|
5681
|
154 octave_idx_type& info, double& rcond, |
|
|
155 solve_singularity_handler sing_handler, |
|
|
156 bool calc_cond = false) const; |
|
5164
|
157 |
|
5785
|
158 SparseComplexMatrix dsolve (MatrixType &typ, const SparseMatrix& b, |
|
5681
|
159 octave_idx_type& info, double& rcond, |
|
|
160 solve_singularity_handler sing_handler, |
|
|
161 bool calc_cond = false) const; |
|
5164
|
162 |
|
5785
|
163 SparseComplexMatrix dsolve (MatrixType &typ, const SparseComplexMatrix& b, |
|
5275
|
164 octave_idx_type& info, double& rcond, |
|
5681
|
165 solve_singularity_handler sing_handler, |
|
|
166 bool calc_cond = false) const; |
|
5164
|
167 |
|
|
168 // Upper triangular matrix solvers |
|
5785
|
169 ComplexMatrix utsolve (MatrixType &typ, const Matrix& b, octave_idx_type& info, |
|
5681
|
170 double& rcond, solve_singularity_handler sing_handler, |
|
|
171 bool calc_cond = false) const; |
|
5164
|
172 |
|
5785
|
173 ComplexMatrix utsolve (MatrixType &typ, const ComplexMatrix& b, |
|
5681
|
174 octave_idx_type& info, double& rcond, |
|
|
175 solve_singularity_handler sing_handler, |
|
|
176 bool calc_cond = false) const; |
|
5164
|
177 |
|
5785
|
178 SparseComplexMatrix utsolve (MatrixType &typ, const SparseMatrix& b, |
|
5681
|
179 octave_idx_type& info, double& rcond, |
|
|
180 solve_singularity_handler sing_handler, |
|
|
181 bool calc_cond = false) const; |
|
5164
|
182 |
|
5785
|
183 SparseComplexMatrix utsolve (MatrixType &typ, const SparseComplexMatrix& b, |
|
5275
|
184 octave_idx_type& info, double& rcond, |
|
5681
|
185 solve_singularity_handler sing_handler, |
|
|
186 bool calc_cond = false) const; |
|
5164
|
187 |
|
|
188 // Lower triangular matrix solvers |
|
5785
|
189 ComplexMatrix ltsolve (MatrixType &typ, const Matrix& b, |
|
5681
|
190 octave_idx_type& info, double& rcond, |
|
|
191 solve_singularity_handler sing_handler, |
|
|
192 bool calc_cond = false) const; |
|
5164
|
193 |
|
5785
|
194 ComplexMatrix ltsolve (MatrixType &typ, const ComplexMatrix& b, |
|
5681
|
195 octave_idx_type& info, double& rcond, |
|
|
196 solve_singularity_handler sing_handler, |
|
|
197 bool calc_cond = false) const; |
|
5164
|
198 |
|
5785
|
199 SparseComplexMatrix ltsolve (MatrixType &typ, const SparseMatrix& b, |
|
5681
|
200 octave_idx_type& info, double& rcond, |
|
|
201 solve_singularity_handler sing_handler, |
|
|
202 bool calc_cond = false) const; |
|
5164
|
203 |
|
5785
|
204 SparseComplexMatrix ltsolve (MatrixType &typ, const SparseComplexMatrix& b, |
|
5275
|
205 octave_idx_type& info, double& rcond, |
|
5681
|
206 solve_singularity_handler sing_handler, |
|
|
207 bool calc_cond = false) const; |
|
5164
|
208 |
|
|
209 // Tridiagonal matrix solvers |
|
5785
|
210 ComplexMatrix trisolve (MatrixType &typ, const Matrix& b, |
|
5681
|
211 octave_idx_type& info, double& rcond, |
|
|
212 solve_singularity_handler sing_handler, |
|
|
213 bool calc_cond = false) const; |
|
5164
|
214 |
|
5785
|
215 ComplexMatrix trisolve (MatrixType &typ, const ComplexMatrix& b, |
|
5681
|
216 octave_idx_type& info, double& rcond, |
|
|
217 solve_singularity_handler sing_handler, |
|
|
218 bool calc_cond = false) const; |
|
5164
|
219 |
|
5785
|
220 SparseComplexMatrix trisolve (MatrixType &typ, const SparseMatrix& b, |
|
5681
|
221 octave_idx_type& info, double& rcond, |
|
|
222 solve_singularity_handler sing_handler, |
|
|
223 bool calc_cond = false) const; |
|
5164
|
224 |
|
5785
|
225 SparseComplexMatrix trisolve (MatrixType &typ, const SparseComplexMatrix& b, |
|
5275
|
226 octave_idx_type& info, double& rcond, |
|
5681
|
227 solve_singularity_handler sing_handler, |
|
|
228 bool calc_cond = false) const; |
|
5164
|
229 |
|
|
230 // Banded matrix solvers (umfpack/cholesky) |
|
5785
|
231 ComplexMatrix bsolve (MatrixType &typ, const Matrix& b, octave_idx_type& info, |
|
5681
|
232 double& rcond, solve_singularity_handler sing_handler, |
|
|
233 bool calc_cond = false) const; |
|
5164
|
234 |
|
5785
|
235 ComplexMatrix bsolve (MatrixType &typ, const ComplexMatrix& b, |
|
5681
|
236 octave_idx_type& info, double& rcond, |
|
|
237 solve_singularity_handler sing_handler, |
|
|
238 bool calc_cond = false) const; |
|
5164
|
239 |
|
5785
|
240 SparseComplexMatrix bsolve (MatrixType &typ, const SparseMatrix& b, |
|
5681
|
241 octave_idx_type& info, double& rcond, |
|
|
242 solve_singularity_handler sing_handler, |
|
|
243 bool calc_cond = false) const; |
|
5164
|
244 |
|
5785
|
245 SparseComplexMatrix bsolve (MatrixType &typ, const SparseComplexMatrix& b, |
|
5275
|
246 octave_idx_type& info, double& rcond, |
|
5681
|
247 solve_singularity_handler sing_handler, |
|
|
248 bool calc_cond = false) const; |
|
5164
|
249 |
|
|
250 // Full matrix solvers (umfpack/cholesky) |
|
5681
|
251 void * factorize (octave_idx_type& err, double &rcond, Matrix &Control, |
|
|
252 Matrix &Info, solve_singularity_handler sing_handler, |
|
|
253 bool calc_cond) const; |
|
5164
|
254 |
|
5785
|
255 ComplexMatrix fsolve (MatrixType &typ, const Matrix& b, octave_idx_type& info, |
|
5681
|
256 double& rcond, solve_singularity_handler sing_handler, |
|
|
257 bool calc_cond = false) const; |
|
5164
|
258 |
|
5785
|
259 ComplexMatrix fsolve (MatrixType &typ, const ComplexMatrix& b, |
|
5681
|
260 octave_idx_type& info, double& rcond, |
|
|
261 solve_singularity_handler sing_handler, |
|
|
262 bool calc_cond = false) const; |
|
5164
|
263 |
|
5785
|
264 SparseComplexMatrix fsolve (MatrixType &typ, const SparseMatrix& b, |
|
5681
|
265 octave_idx_type& info, double& rcond, |
|
|
266 solve_singularity_handler sing_handler, |
|
|
267 bool calc_cond = false) const; |
|
5164
|
268 |
|
5785
|
269 SparseComplexMatrix fsolve (MatrixType &typ, const SparseComplexMatrix& b, |
|
5275
|
270 octave_idx_type& info, double& rcond, |
|
5681
|
271 solve_singularity_handler sing_handler, |
|
|
272 bool calc_cond = false) const; |
|
5164
|
273 |
|
|
274 public: |
|
|
275 // Generic interface to solver with no probing of type |
|
5785
|
276 ComplexMatrix solve (MatrixType &typ, const Matrix& b) const; |
|
|
277 ComplexMatrix solve (MatrixType &typ, const Matrix& b, |
|
5697
|
278 octave_idx_type& info) const; |
|
5785
|
279 ComplexMatrix solve (MatrixType &typ, const Matrix& b, octave_idx_type& info, |
|
5697
|
280 double& rcond) const; |
|
5785
|
281 ComplexMatrix solve (MatrixType &typ, const Matrix& b, octave_idx_type& info, |
|
5697
|
282 double& rcond, solve_singularity_handler sing_handler, |
|
|
283 bool singular_fallback = true) const; |
|
5164
|
284 |
|
5785
|
285 ComplexMatrix solve (MatrixType &typ, const ComplexMatrix& b) const; |
|
|
286 ComplexMatrix solve (MatrixType &typ, const ComplexMatrix& b, |
|
5275
|
287 octave_idx_type& info) const; |
|
5785
|
288 ComplexMatrix solve (MatrixType &typ, const ComplexMatrix& b, |
|
5697
|
289 octave_idx_type& info, double& rcond) const; |
|
5785
|
290 ComplexMatrix solve (MatrixType &typ, const ComplexMatrix& b, |
|
5697
|
291 octave_idx_type& info, double& rcond, |
|
|
292 solve_singularity_handler sing_handler, |
|
|
293 bool singular_fallback = true) const; |
|
5164
|
294 |
|
5785
|
295 SparseComplexMatrix solve (MatrixType &typ, const SparseMatrix& b) const; |
|
|
296 SparseComplexMatrix solve (MatrixType &typ, const SparseMatrix& b, |
|
5697
|
297 octave_idx_type& info) const; |
|
5785
|
298 SparseComplexMatrix solve (MatrixType &typ, const SparseMatrix& b, |
|
5697
|
299 octave_idx_type& info, double& rcond) const; |
|
5785
|
300 SparseComplexMatrix solve (MatrixType &typ, const SparseMatrix& b, |
|
5697
|
301 octave_idx_type& info, double& rcond, |
|
|
302 solve_singularity_handler sing_handler, |
|
|
303 bool singular_fallback = true) const; |
|
5164
|
304 |
|
5785
|
305 SparseComplexMatrix solve (MatrixType &typ, |
|
5164
|
306 const SparseComplexMatrix& b) const; |
|
5785
|
307 SparseComplexMatrix solve (MatrixType &typ, const SparseComplexMatrix& b, |
|
5275
|
308 octave_idx_type& info) const; |
|
5785
|
309 SparseComplexMatrix solve (MatrixType &typ, const SparseComplexMatrix& b, |
|
5275
|
310 octave_idx_type& info, double& rcond) const; |
|
5785
|
311 SparseComplexMatrix solve (MatrixType &typ, const SparseComplexMatrix& b, |
|
5697
|
312 octave_idx_type& info, double& rcond, |
|
|
313 solve_singularity_handler sing_handler, |
|
|
314 bool singular_fallback = true) const; |
|
5164
|
315 |
|
5785
|
316 ComplexColumnVector solve (MatrixType &typ, const ColumnVector& b) const; |
|
|
317 ComplexColumnVector solve (MatrixType &typ, const ColumnVector& b, |
|
5697
|
318 octave_idx_type& info) const; |
|
5785
|
319 ComplexColumnVector solve (MatrixType &typ, const ColumnVector& b, |
|
5697
|
320 octave_idx_type& info, double& rcond) const; |
|
5785
|
321 ComplexColumnVector solve (MatrixType &typ, const ColumnVector& b, |
|
5697
|
322 octave_idx_type& info, double& rcond, |
|
|
323 solve_singularity_handler sing_handler) const; |
|
5164
|
324 |
|
5785
|
325 ComplexColumnVector solve (MatrixType &typ, |
|
5164
|
326 const ComplexColumnVector& b) const; |
|
5785
|
327 ComplexColumnVector solve (MatrixType &typ, const ComplexColumnVector& b, |
|
5697
|
328 octave_idx_type& info) const; |
|
5785
|
329 ComplexColumnVector solve (MatrixType &typ, const ComplexColumnVector& b, |
|
5275
|
330 octave_idx_type& info, double& rcond) const; |
|
5785
|
331 ComplexColumnVector solve (MatrixType &typ, const ComplexColumnVector& b, |
|
5275
|
332 octave_idx_type& info, double& rcond, |
|
5164
|
333 solve_singularity_handler sing_handler) const; |
|
|
334 |
|
|
335 // Generic interface to solver with probing of type |
|
|
336 ComplexMatrix solve (const Matrix& b) const; |
|
5275
|
337 ComplexMatrix solve (const Matrix& b, octave_idx_type& info) const; |
|
5697
|
338 ComplexMatrix solve (const Matrix& b, octave_idx_type& info, |
|
|
339 double& rcond) const; |
|
5275
|
340 ComplexMatrix solve (const Matrix& b, octave_idx_type& info, double& rcond, |
|
5164
|
341 solve_singularity_handler sing_handler) const; |
|
|
342 |
|
|
343 ComplexMatrix solve (const ComplexMatrix& b) const; |
|
5275
|
344 ComplexMatrix solve (const ComplexMatrix& b, octave_idx_type& info) const; |
|
|
345 ComplexMatrix solve (const ComplexMatrix& b, octave_idx_type& info, |
|
5164
|
346 double& rcond) const; |
|
5697
|
347 ComplexMatrix solve (const ComplexMatrix& b, octave_idx_type& info, |
|
|
348 double& rcond, solve_singularity_handler sing_handler) const; |
|
5164
|
349 |
|
|
350 SparseComplexMatrix solve (const SparseMatrix& b) const; |
|
5275
|
351 SparseComplexMatrix solve (const SparseMatrix& b, octave_idx_type& info) const; |
|
|
352 SparseComplexMatrix solve (const SparseMatrix& b, octave_idx_type& info, |
|
5164
|
353 double& rcond) const; |
|
5275
|
354 SparseComplexMatrix solve (const SparseMatrix& b, octave_idx_type& info, |
|
5164
|
355 double& rcond, |
|
5697
|
356 solve_singularity_handler sing_handler) const; |
|
5164
|
357 |
|
|
358 SparseComplexMatrix solve (const SparseComplexMatrix& b) const; |
|
5697
|
359 SparseComplexMatrix solve (const SparseComplexMatrix& b, |
|
|
360 octave_idx_type& info) const; |
|
|
361 SparseComplexMatrix solve (const SparseComplexMatrix& b, |
|
|
362 octave_idx_type& info, double& rcond) const; |
|
|
363 SparseComplexMatrix solve (const SparseComplexMatrix& b, |
|
|
364 octave_idx_type& info, double& rcond, |
|
5164
|
365 solve_singularity_handler sing_handler) const; |
|
|
366 |
|
|
367 ComplexColumnVector solve (const ColumnVector& b) const; |
|
5275
|
368 ComplexColumnVector solve (const ColumnVector& b, octave_idx_type& info) const; |
|
|
369 ComplexColumnVector solve (const ColumnVector& b, octave_idx_type& info, |
|
5164
|
370 double& rcond) const; |
|
5697
|
371 ComplexColumnVector solve (const ColumnVector& b, octave_idx_type& info, |
|
|
372 double& rcond, |
|
5164
|
373 solve_singularity_handler sing_handler) const; |
|
|
374 |
|
|
375 ComplexColumnVector solve (const ComplexColumnVector& b) const; |
|
5697
|
376 ComplexColumnVector solve (const ComplexColumnVector& b, |
|
|
377 octave_idx_type& info) const; |
|
5275
|
378 ComplexColumnVector solve (const ComplexColumnVector& b, octave_idx_type& info, |
|
5164
|
379 double& rcond) const; |
|
5275
|
380 ComplexColumnVector solve (const ComplexColumnVector& b, octave_idx_type& info, |
|
5164
|
381 double& rcond, |
|
|
382 solve_singularity_handler sing_handler) const; |
|
|
383 |
|
|
384 SparseComplexMatrix squeeze (void) const; |
|
|
385 |
|
|
386 SparseComplexMatrix index (idx_vector& i, int resize_ok) const; |
|
|
387 |
|
|
388 SparseComplexMatrix index (idx_vector& i, idx_vector& j, int resize_ok) const; |
|
|
389 |
|
|
390 SparseComplexMatrix index (Array<idx_vector>& ra_idx, int resize_ok) const; |
|
|
391 |
|
|
392 SparseComplexMatrix reshape (const dim_vector& new_dims) const; |
|
|
393 |
|
5697
|
394 SparseComplexMatrix permute (const Array<octave_idx_type>& vec, |
|
|
395 bool inv = false) const; |
|
5164
|
396 |
|
5275
|
397 SparseComplexMatrix ipermute (const Array<octave_idx_type>& vec) const; |
|
5164
|
398 |
|
|
399 SparseComplexMatrix map (c_c_Mapper f) const; |
|
|
400 SparseMatrix map (d_c_Mapper f) const; |
|
|
401 SparseBoolMatrix map (b_c_Mapper f) const; |
|
|
402 |
|
|
403 SparseComplexMatrix& apply (c_c_Mapper f); |
|
|
404 |
|
|
405 bool any_element_is_inf_or_nan (void) const; |
|
|
406 bool all_elements_are_real (void) const; |
|
|
407 bool all_integers (double& max_val, double& min_val) const; |
|
|
408 bool too_large_for_float (void) const; |
|
|
409 |
|
|
410 SparseBoolMatrix operator ! (void) const; |
|
|
411 |
|
|
412 SparseBoolMatrix all (int dim = -1) const; |
|
|
413 SparseBoolMatrix any (int dim = -1) const; |
|
|
414 |
|
|
415 SparseComplexMatrix cumprod (int dim = -1) const; |
|
|
416 SparseComplexMatrix cumsum (int dim = -1) const; |
|
|
417 SparseComplexMatrix prod (int dim = -1) const; |
|
|
418 SparseComplexMatrix sum (int dim = -1) const; |
|
|
419 SparseComplexMatrix sumsq (int dim = -1) const; |
|
|
420 SparseMatrix abs (void) const; |
|
|
421 |
|
5275
|
422 SparseComplexMatrix diag (octave_idx_type k = 0) const; |
|
5164
|
423 |
|
|
424 // i/o |
|
6108
|
425 friend OCTAVE_API std::ostream& operator << (std::ostream& os, |
|
5164
|
426 const SparseComplexMatrix& a); |
|
6108
|
427 friend OCTAVE_API std::istream& operator >> (std::istream& is, |
|
5164
|
428 SparseComplexMatrix& a); |
|
|
429 }; |
|
|
430 |
|
6108
|
431 extern OCTAVE_API SparseComplexMatrix operator * (const SparseMatrix&, |
|
5164
|
432 const SparseComplexMatrix&); |
|
6108
|
433 extern OCTAVE_API SparseComplexMatrix operator * (const SparseComplexMatrix&, |
|
5164
|
434 const SparseMatrix&); |
|
6108
|
435 extern OCTAVE_API SparseComplexMatrix operator * (const SparseComplexMatrix&, |
|
5164
|
436 const SparseComplexMatrix&); |
|
|
437 |
|
6108
|
438 extern OCTAVE_API ComplexMatrix operator * (const Matrix&, |
|
5429
|
439 const SparseComplexMatrix&); |
|
6108
|
440 extern OCTAVE_API ComplexMatrix operator * (const ComplexMatrix&, |
|
5429
|
441 const SparseMatrix&); |
|
6108
|
442 extern OCTAVE_API ComplexMatrix operator * (const ComplexMatrix&, |
|
5429
|
443 const SparseComplexMatrix&); |
|
|
444 |
|
6108
|
445 extern OCTAVE_API ComplexMatrix operator * (const SparseMatrix&, |
|
5429
|
446 const ComplexMatrix&); |
|
6108
|
447 extern OCTAVE_API ComplexMatrix operator * (const SparseComplexMatrix&, |
|
5429
|
448 const Matrix&); |
|
6108
|
449 extern OCTAVE_API ComplexMatrix operator * (const SparseComplexMatrix&, |
|
5429
|
450 const ComplexMatrix&); |
|
|
451 |
|
6108
|
452 extern OCTAVE_API SparseComplexMatrix min (const Complex& c, |
|
5164
|
453 const SparseComplexMatrix& m); |
|
6108
|
454 extern OCTAVE_API SparseComplexMatrix min (const SparseComplexMatrix& m, |
|
5164
|
455 const Complex& c); |
|
6108
|
456 extern OCTAVE_API SparseComplexMatrix min (const SparseComplexMatrix& a, |
|
5164
|
457 const SparseComplexMatrix& b); |
|
|
458 |
|
6108
|
459 extern OCTAVE_API SparseComplexMatrix max (const Complex& c, |
|
5164
|
460 const SparseComplexMatrix& m); |
|
6108
|
461 extern OCTAVE_API SparseComplexMatrix max (const SparseComplexMatrix& m, |
|
5164
|
462 const Complex& c); |
|
6108
|
463 extern OCTAVE_API SparseComplexMatrix max (const SparseComplexMatrix& a, |
|
5164
|
464 const SparseComplexMatrix& b); |
|
|
465 |
|
|
466 SPARSE_SMS_CMP_OP_DECLS (SparseComplexMatrix, Complex) |
|
|
467 SPARSE_SMS_BOOL_OP_DECLS (SparseComplexMatrix, Complex) |
|
|
468 |
|
|
469 SPARSE_SSM_CMP_OP_DECLS (Complex, SparseComplexMatrix) |
|
|
470 SPARSE_SSM_BOOL_OP_DECLS (Complex, SparseComplexMatrix) |
|
|
471 |
|
|
472 SPARSE_SMSM_CMP_OP_DECLS (SparseComplexMatrix, SparseComplexMatrix) |
|
|
473 SPARSE_SMSM_BOOL_OP_DECLS (SparseComplexMatrix, SparseComplexMatrix) |
|
|
474 |
|
|
475 SPARSE_FORWARD_DEFS (MSparse, SparseComplexMatrix, ComplexMatrix, Complex) |
|
|
476 |
|
5351
|
477 #ifdef IDX_TYPE_LONG |
|
5322
|
478 #define UMFPACK_ZNAME(name) umfpack_zl_ ## name |
|
|
479 #else |
|
|
480 #define UMFPACK_ZNAME(name) umfpack_zi_ ## name |
|
|
481 #endif |
|
|
482 |
|
5164
|
483 #endif |
|
|
484 |
|
|
485 /* |
|
|
486 ;;; Local Variables: *** |
|
|
487 ;;; mode: C++ *** |
|
|
488 ;;; End: *** |
|
|
489 */ |
