|
|
◆ ZCsrCoo()
| Sub ZCsrCoo |
( |
M As |
Long, |
|
|
N As |
Long, |
|
|
Val() As |
Complex, |
|
|
Rowptr() As |
Long, |
|
|
Colind() As |
Long, |
|
|
Val2() As |
Complex, |
|
|
Rowind2() As |
Long, |
|
|
Colind2() As |
Long, |
|
|
Optional Info As |
Long, |
|
|
Optional Nnz As |
Long, |
|
|
Optional Base As |
Long = -1, |
|
|
Optional Base2 As |
Long = 0 |
|
) |
| |
CSR -> COO (Complex matrices)
- Purpose
- This function converts the sparse matrix in CSR format to the sparse matrix in COO format. The element order within row is same as reading order.
- Parameters
-
| [in] | M | Number of rows of the matrix. (M >= 0) (If M = 0, returns without computation) |
| [in] | N | Number of columns of the matrix. (N >= 0) (If N = 0, returns without computation) |
| [in] | Val() | Array Val(LVal - 1) (LVal >= Nnz)
Values of nonzero elements of input matrix. |
| [in] | Rowptr() | Array Rowptr(LRowptr - 1) (LRowptr >= M + 1)
Row pointers of input matrix. |
| [in] | Colind() | Array Colind(LColind - 1) (LColind >= Nnz)
Column indices of input matrix. |
| [out] | Val2() | Array Val2(LVal2 - 1) (LVal2 >= Nnz)
Values of nonzero elements of output matrix. |
| [out] | Rowind2() | Array Rowind2(LRowind2 - 1) (LRowind2 >= Nnz)
Row indices of output matrix. |
| [out] | Colind2() | Array Colind2(LColind2 - 1) (LColind2 >= Nnz)
Column indices of output matrix. |
| [out] | Info | (Optional)
= 0: Successful exit.
= i < 0: The (-i)-th argument is invalid. |
| [out] | Nnz | (Optional)
Number of nonzero elements in the matrix. |
| [in] | Base | (Optional)
Indexing of Rowptr() and Colind().
= 0: Zero-based (C style) indexing: Starting index is 0.
= 1: One-based (Fortran style) indexing: Starting index is 1.
(default: Assumes 1 if Rowptr(0) = 1, 0 otherwise) |
| [in] | Base2 | (Optional)
Indexing of Rowind2() and Colind2(). (default = 0)
= 0: Zero-based (C style) indexing: Starting index is 0.
= 1: One-based (Fortran style) indexing: Starting index is 1. |
|