linalg 1.8.2
A linear algebra library that provides a user-friendly interface to several BLAS and LAPACK routines.
|
Extracts the diagonal from a matrix. More...
Public Member Functions | |
subroutine | getdia (nrow, ncol, job, a, ja, ia, len, diag, idiag, ioff) |
Extracts the diagonal from a matrix.
[in] | nrow | The number of rows. |
[in] | ncol | The number of columns. |
[in] | job | Set to 0 to not alter a , ja , and ia ; else, set to a non-zero value to perform this as an in-place operation. |
[out] | len | The number of non-zero elements found in diag . |
[out] | idiag | An array of length len containing the original positions in the original arrays a and ja of the diagonal elements collected in diagl. |
[in] | ioff | The offset of the wanted diagonal. |
Definition at line 256 of file sparskit.f90.
subroutine sparskit::getdia::getdia | ( | integer(int32), intent(in) | nrow, |
integer(int32), intent(in) | ncol, | ||
integer(int32), intent(in) | job, | ||
real(real64), dimension(*), intent(in) | a, | ||
integer(int32), dimension(*), intent(in) | ja, | ||
integer(int32), dimension(*), intent(in) | ia, | ||
integer(int32), intent(out) | len, | ||
real(real64), dimension(*), intent(out) | diag, | ||
integer(int32), dimension(*), intent(out) | idiag, | ||
integer(int32), intent(in) | ioff ) |
Definition at line 256 of file sparskit.f90.