|
|
◆ ZCsrDense()
| Sub ZCsrDense |
( |
M As |
Long, |
|
|
N As |
Long, |
|
|
Val() As |
Complex, |
|
|
Rowptr() As |
Long, |
|
|
Colind() As |
Long, |
|
|
A() As |
Complex, |
|
|
Optional Info As |
Long, |
|
|
Optional Base As |
Long = -1 |
|
) |
| |
CSR -> dense matrix (Complex matrices)
- Purpose
- This routine converts the sparse matrix in CSR format to the dense matrix.
- 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) (Nnz is the number of nonzero elements of the input matrix)
Values of nonzero elements of the input matrix in CSR format. |
| [in] | Rowptr() | Array Rowptr(LRowptr - 1) (LRowptr >= M + 1)
Row pointers of the input matrix in CSR format. |
| [in] | Colind() | Array Colind(LColind - 1) (LColind >= Nnz)
Column indices of the input matrix in CSR format. |
| [out] | A() | Array A(LA1 - 1, LA2 - 1) (LA1 >= M, LA2 >= N)
Output matrix. |
| [out] | Info | (Optional)
= 0: Successful exit.
= i < 0: The (-i)-th argument is invalid. |
| [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) |
|