Block sparse column format triangular solve |
| SBSCSM/DBSCSM/CBSCSM/ZBSCSM | |
Name | SBSCSM/DBSCSM/CBSCSM/ZBSCSM |
| |
| Block sparse column format triangular solve |
| |
Purpose | Block sparse column format triangular solve. Given a scalar α, an upper- or | ||
| |||
| subprograms compute either of the matrix solutions | ||
| |||
| may be replaced by | ||
| is the | ||
| the result matrix C or optionally may be added to or subtracted from it. This is | ||
| handled in a convenient, but general way by two scalar arguments, α and β, | ||
| which are used as multipliers of the solution matrix and the result matrix. | ||
| Specifically, these subprograms compute matrix solutions of the form | ||
| C ← | C ← | C ← |
| C ← | C ← | |
| C ← | C ← | |
Usage | VECLIB: |
|
|
| SUBROUTINE | SBSCSM |
|
| INTEGER*4 | transa, mb, n, unitd, blda, lb, ldb, ldc, lwork | |
| INTEGER*4 | descra(*), bindx(*), bpntrb(*), bpntre(*) | |
| REAL*4 | alpha, beta |
|
| REAL*4 | val(*), b(ldb,*), c(ldc,*), work(*) |
CALL SBSCSM (transa, mb, n, unitd, dv, alpha, descra, val, bindx, bpntrb, bpntre, lb, b, ldb, beta, c, ldc, work, lwork)
SUBROUTINE | DBSCSM |
INTEGER*4 | transa, mb, n, unitd, blda, lb, ldb, ldc, lwork |
INTEGER*4 | descra(*), bindx(*), bpntrb(*), bpntre(*) |
REAL*8 | alpha, beta |
REAL*8 | val(*), b(ldb,*), c(ldc,*), work(*) |
CALL DBSCSM (transa, mb, n, unitd, dv, alpha, descra, val, bindx, bpntrb, bpntre, lb, b, ldb, beta, c, ldc, work, lwork)
SUBROUTINE | CBSCSM |
INTEGER*4 | transa, mb, n, unitd, blda, lb, ldb, ldc, lwork |
INTEGER*4 | descra(*), bindx(*), bpntrb(*), bpntre(*) |
COMPLEX*8 | alpha, beta |
COMPLEX*8 | val(*), b(ldb,*), c(ldc,*), work(*) |
CALL CBSCSM (transa, mb, n, unitd, dv, alpha, descra, val, bindx, bpntrb, bpntre, lb, b, ldb, beta, c, ldc, work, lwork)
Chapter 4 Sparse BLAS Operations 465