f77_gemv Interface

public interface f77_gemv

Generic old style interface for GEMV. Supports s, d, c, z. See also: mfi_gemv, sgemv, dgemv, cgemv, zgemv.


Subroutines

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

Original interface for SGEMV See also: mfi_gemv, f77_gemv.

Arguments

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

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

Original interface for DGEMV See also: mfi_gemv, f77_gemv.

Arguments

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

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

Original interface for CGEMV See also: mfi_gemv, f77_gemv.

Arguments

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

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

Original interface for ZGEMV See also: mfi_gemv, f77_gemv.

Arguments

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