GEMV Interface

public interface GEMV

Called by

interface~~gemv~~CalledByGraph interface~gemv GEMV proc~mult_butv MULT_BUTV proc~mult_butv->interface~gemv

Module Procedures

private subroutine GEMV_SP(TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: TRANS
integer(kind=JPIM), intent(in) :: M
integer(kind=JPIM), intent(in) :: N
real(kind=JPRM), intent(in) :: ALPHA
real(kind=JPRM), intent(in) :: A(:,:)
integer(kind=JPIM), intent(in) :: LDA
real(kind=JPRM), intent(in) :: X(:)
integer(kind=JPIM), intent(in) :: INCX
real(kind=JPRM), intent(in) :: BETA
real(kind=JPRM), intent(inout) :: Y(:)
integer(kind=JPIM), intent(in) :: INCY

private subroutine GEMV_SP_DP(TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: TRANS
integer(kind=JPIM), intent(in) :: M
integer(kind=JPIM), intent(in) :: N
real(kind=JPRD), intent(in) :: ALPHA
real(kind=JPRM), intent(in) :: A(:,:)
integer(kind=JPIM), intent(in) :: LDA
real(kind=JPRM), intent(in) :: X(:)
integer(kind=JPIM), intent(in) :: INCX
real(kind=JPRD), intent(in) :: BETA
real(kind=JPRM), intent(inout) :: Y(:)
integer(kind=JPIM), intent(in) :: INCY

private subroutine GEMV_SCAL_SP(TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: TRANS
integer(kind=JPIM), intent(in) :: M
integer(kind=JPIM), intent(in) :: N
real(kind=JPRM), intent(in) :: ALPHA
real(kind=JPRM), intent(in) :: A
integer(kind=JPIM), intent(in) :: LDA
real(kind=JPRM), intent(in) :: X
integer(kind=JPIM), intent(in) :: INCX
real(kind=JPRM), intent(in) :: BETA
real(kind=JPRM), intent(inout) :: Y
integer(kind=JPIM), intent(in) :: INCY

private subroutine GEMV_SCAL_SP_DP(TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: TRANS
integer(kind=JPIM), intent(in) :: M
integer(kind=JPIM), intent(in) :: N
real(kind=JPRD), intent(in) :: ALPHA
real(kind=JPRM), intent(in) :: A
integer(kind=JPIM), intent(in) :: LDA
real(kind=JPRM), intent(in) :: X
integer(kind=JPIM), intent(in) :: INCX
real(kind=JPRD), intent(in) :: BETA
real(kind=JPRM), intent(inout) :: Y
integer(kind=JPIM), intent(in) :: INCY

private subroutine GEMV_DP(TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: TRANS
integer(kind=JPIM), intent(in) :: M
integer(kind=JPIM), intent(in) :: N
real(kind=JPRD), intent(in) :: ALPHA
real(kind=JPRD), intent(in) :: A(:,:)
integer(kind=JPIM), intent(in) :: LDA
real(kind=JPRD), intent(in) :: X(:)
integer(kind=JPIM), intent(in) :: INCX
real(kind=JPRD), intent(in) :: BETA
real(kind=JPRD), intent(inout) :: Y(:)
integer(kind=JPIM), intent(in) :: INCY

private subroutine GEMV_DP_SP(TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: TRANS
integer(kind=JPIM), intent(in) :: M
integer(kind=JPIM), intent(in) :: N
real(kind=JPRM), intent(in) :: ALPHA
real(kind=JPRD), intent(in) :: A(:,:)
integer(kind=JPIM), intent(in) :: LDA
real(kind=JPRD), intent(in) :: X(:)
integer(kind=JPIM), intent(in) :: INCX
real(kind=JPRM), intent(in) :: BETA
real(kind=JPRD), intent(inout) :: Y(:)
integer(kind=JPIM), intent(in) :: INCY

private subroutine GEMV_SCAL_DP(TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: TRANS
integer(kind=JPIM), intent(in) :: M
integer(kind=JPIM), intent(in) :: N
real(kind=JPRD), intent(in) :: ALPHA
real(kind=JPRD), intent(in) :: A
integer(kind=JPIM), intent(in) :: LDA
real(kind=JPRD), intent(in) :: X
integer(kind=JPIM), intent(in) :: INCX
real(kind=JPRD), intent(in) :: BETA
real(kind=JPRD), intent(inout) :: Y
integer(kind=JPIM), intent(in) :: INCY

private subroutine GEMV_SCAL_DP_SP(TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: TRANS
integer(kind=JPIM), intent(in) :: M
integer(kind=JPIM), intent(in) :: N
real(kind=JPRM), intent(in) :: ALPHA
real(kind=JPRD), intent(in) :: A
integer(kind=JPIM), intent(in) :: LDA
real(kind=JPRD), intent(in) :: X
integer(kind=JPIM), intent(in) :: INCX
real(kind=JPRM), intent(in) :: BETA
real(kind=JPRD), intent(inout) :: Y
integer(kind=JPIM), intent(in) :: INCY