f77_tbmv Interface

public interface f77_tbmv

Generic old style interface for TBMV. Supports s, d, c, z. See also: mfi_tbmv, stbmv, dtbmv, ctbmv, ztbmv.


Subroutines

public pure subroutine stbmv(uplo, trans, diag, n, k, a, lda, x, incx)

Original interface for STBMV See also: mfi_tbmv, f77_tbmv.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: diag
integer, intent(in) :: n
integer, intent(in) :: k
real(kind=REAL32), intent(in) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL32), intent(inout) :: x(*)
integer, intent(in) :: incx

public pure subroutine dtbmv(uplo, trans, diag, n, k, a, lda, x, incx)

Original interface for DTBMV See also: mfi_tbmv, f77_tbmv.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: diag
integer, intent(in) :: n
integer, intent(in) :: k
real(kind=REAL64), intent(in) :: a(lda,*)
integer, intent(in) :: lda
real(kind=REAL64), intent(inout) :: x(*)
integer, intent(in) :: incx

public pure subroutine ctbmv(uplo, trans, diag, n, k, a, lda, x, incx)

Original interface for CTBMV See also: mfi_tbmv, f77_tbmv.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: diag
integer, intent(in) :: n
integer, intent(in) :: k
complex(kind=REAL32), intent(in) :: a(lda,*)
integer, intent(in) :: lda
complex(kind=REAL32), intent(inout) :: x(*)
integer, intent(in) :: incx

public pure subroutine ztbmv(uplo, trans, diag, n, k, a, lda, x, incx)

Original interface for ZTBMV See also: mfi_tbmv, f77_tbmv.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: uplo
character(len=1), intent(in) :: trans
character(len=1), intent(in) :: diag
integer, intent(in) :: n
integer, intent(in) :: k
complex(kind=REAL64), intent(in) :: a(lda,*)
integer, intent(in) :: lda
complex(kind=REAL64), intent(inout) :: x(*)
integer, intent(in) :: incx