SCOOMM/DCOOMM/CCOOMM/ZCOOMM | Coordinate | |
| SUBROUTINE | ZCOOMM |
| INTEGER*4 | transa, m, n, k, nnz, ldb, ldc, lwork |
| INTEGER*4 | descra(*), indx(*), jndx(*) |
| COMPLEX*16 | alpha, beta |
| COMPLEX*16 | val(*), b(ldb,*), c(ldc,*), work(*) |
| CALL ZCOOMM (transa, m, n, k, alpha, descra, val, indx, jndx, nnz, b, | |
| ldb, beta, c, ldc, work, lwork) | |
| VECLIB8: |
|
| SUBROUTINE | SCOOMM |
| INTEGER*8 | transa, m, n, k, nnz, ldb, ldc, lwork |
| INTEGER*8 | descra(*), indx(*), jndx(*) |
| REAL*4 | alpha, beta |
| REAL*4 | val(*), b(ldb,*), c(ldc,*), work(*) |
| CALL SCOOMM (transa, m, n, k, alpha, descra, val, indx, jndx, nnz, b, | |
| ldb, beta, c, ldc, work, lwork) | |
| SUBROUTINE | DCOOMM |
| INTEGER*8 | transa, m, n, k, nnz, ldb, ldc, lwork |
| INTEGER*8 | descra(*), indx(*), jndx(*) |
| REAL*8 | alpha, beta |
| REAL*8 | val(*), b(ldb,*), c(ldc,*), work(*) |
| CALL DCOOMM (transa, m, n, k, alpha, descra, val, indx, jndx, nnz, b, | |
| ldb, beta, c, ldc, work, lwork) | |
| SUBROUTINE | CCOOMM |
| INTEGER*8 | transa, m, n, k, nnz, ldb, ldc, lwork |
| INTEGER*8 | descra(*), indx(*), jndx(*) |
| COMPLEX*8 | alpha, beta |
| COMPLEX*8 | val(*), b(ldb,*), c(ldc,*), work(*) |
| CALL CCOOMM (transa, m, n, k, alpha, descra, val, indx, jndx, nnz, b, | |
| ldb, beta, c, ldc, work, lwork) | |
| SUBROUTINE | ZCOOMM |
| INTEGER*8 | transa, m, n, k, nnz, ldb, ldc, lwork |
| INTEGER*8 | descra(*), indx(*), jndx(*) |
| COMPLEX*16 | alpha, beta |
| COMPLEX*16 | val(*), b(ldb,*), c(ldc,*), work(*) |
| CALL ZCOOMM (transa, m, n, k, alpha, descra, val, indx, jndx, nnz, b, | |
| ldb, beta, c, ldc, work, lwork) | |
Input | transa | Indicates how to operate with the sparse matrix. |
|
| 0: Operate with matrix |
478HP MLIB User’s Guide