blas_gemv Interface

private interface blas_gemv

explicit interface for BLAS GEMV routines

Usage: call blas_gemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

This is not a public interface, it is used internally by pic_gemv

Called by

interface~~blas_gemv~~CalledByGraph interface~blas_gemv blas_gemv proc~pic_dgemv pic_dgemv proc~pic_dgemv->interface~blas_gemv proc~pic_sgemv pic_sgemv proc~pic_sgemv->interface~blas_gemv interface~pic_gemv pic_gemv interface~pic_gemv->proc~pic_dgemv interface~pic_gemv->proc~pic_sgemv

Subroutines

private pure subroutine cgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: trans
integer(kind=default_int), intent(in) :: m
integer(kind=default_int), intent(in) :: n
complex(kind=sp), intent(in) :: alpha
complex(kind=sp), intent(in) :: a(lda,*)
integer(kind=default_int), intent(in) :: lda
complex(kind=sp), intent(in) :: x(*)
integer(kind=default_int), intent(in) :: incx
complex(kind=sp), intent(in) :: beta
complex(kind=sp), intent(inout) :: y(*)
integer(kind=default_int), intent(in) :: incy

private pure subroutine dgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: trans
integer(kind=default_int), intent(in) :: m
integer(kind=default_int), intent(in) :: n
real(kind=dp), intent(in) :: alpha
real(kind=dp), intent(in) :: a(lda,*)
integer(kind=default_int), intent(in) :: lda
real(kind=dp), intent(in) :: x(*)
integer(kind=default_int), intent(in) :: incx
real(kind=dp), intent(in) :: beta
real(kind=dp), intent(inout) :: y(*)
integer(kind=default_int), intent(in) :: incy

private pure subroutine sgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: trans
integer(kind=default_int), intent(in) :: m
integer(kind=default_int), intent(in) :: n
real(kind=sp), intent(in) :: alpha
real(kind=sp), intent(in) :: a(lda,*)
integer(kind=default_int), intent(in) :: lda
real(kind=sp), intent(in) :: x(*)
integer(kind=default_int), intent(in) :: incx
real(kind=sp), intent(in) :: beta
real(kind=sp), intent(inout) :: y(*)
integer(kind=default_int), intent(in) :: incy

private pure subroutine zgemv(trans, m, n, alpha, a, lda, x, incx, beta, y, incy)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: trans
integer(kind=default_int), intent(in) :: m
integer(kind=default_int), intent(in) :: n
complex(kind=dp), intent(in) :: alpha
complex(kind=dp), intent(in) :: a(lda,*)
integer(kind=default_int), intent(in) :: lda
complex(kind=dp), intent(in) :: x(*)
integer(kind=default_int), intent(in) :: incx
complex(kind=dp), intent(in) :: beta
complex(kind=dp), intent(inout) :: y(*)
integer(kind=default_int), intent(in) :: incy