SELLMM/DELLMM/CELLMM/ZELLMM

Ellpack matrix-matrix multiply

 

SUBROUTINE

ZELLMM

 

INTEGER*4

transa, m, n, k, lda, maxnz, ldb, ldc, lwork

 

INTEGER*4

descra(*), indx(*)

 

COMPLEX*16

alpha, beta

 

COMPLEX*16

val(*), b(ldb,*), c(ldc,*), work(*)

 

CALL ZELLMM (transa, m, n, k, alpha, descra, val, lda, indx, maxnz, b,

 

ldb, beta, c, ldc, work, lwork)

 

VECLIB8:

 

 

SUBROUTINE

SELLMM

 

INTEGER*8

transa, m, n, k, lda, maxnz, ldb, ldc, lwork

 

INTEGER*8

descra(*), indx(*)

 

REAL*4

alpha, beta

 

REAL*4

val(*), b(ldb,*), c(ldc,*), work(*)

 

CALL SELLMM (transa, m, n, k, alpha, descra, val, lda, indx, maxnz, b,

 

ldb, beta, c, ldc, work, lwork)

 

SUBROUTINE

DELLMM

 

INTEGER*8

transa, m, n, k, lda, maxnz, ldb, ldc, lwork

 

INTEGER*8

descra(*), indx(*)

 

REAL*8

alpha, beta

 

REAL*8

val(*), b(ldb,*), c(ldc,*), work(*)

 

CALL DELLMM (transa, m, n, k, alpha, descra, val, lda, indx, maxnz, b,

 

ldb, beta, c, ldc, work, lwork)

 

SUBROUTINE

CELLMM

 

INTEGER*8

transa, m, n, k, lda, maxnz, ldb, ldc, lwork

 

INTEGER*8

descra(*), indx(*)

 

COMPLEX*8

alpha, beta

 

COMPLEX*8

val(*), b(ldb,*), c(ldc,*), work(*)

 

CALL CELLMM (transa, m, n, k, alpha, descra, val, lda, indx, maxnz, b,

 

ldb, beta, c, ldc, work, lwork)

 

SUBROUTINE

ZELLMM

 

INTEGER*8

transa, m, n, k, lda, maxnz, ldb, ldc, lwork

 

INTEGER*8

descra(*), indx(*)

 

COMPLEX*16

alpha, beta

 

COMPLEX*16

val(*), b(ldb,*), c(ldc,*), work(*)

 

CALL ZELLMM (transa, m, n, k, alpha, descra, val, lda, indx, maxnz, b,

 

ldb, beta, c, ldc, work, lwork)

Input

transa

Indicates how to operate with the sparse matrix.

 

 

0: Operate with matrix

506HP MLIB User’s Guide