f77_blas_trmv Module



Interfaces

public interface f77_trmv

Generic old style interface for TRMV. Supports s, d, c, z. See also: mfi_trmv, strmv, dtrmv, ctrmv, ztrmv.

  • public pure subroutine strmv(uplo, trans, diag, n, a, lda, x, incx)

    Original interface for STRMV See also: mfi_trmv, trmv.

    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
    real(kind=REAL32), intent(in) :: a(lda,*)
    integer, intent(in) :: lda
    real(kind=REAL32), intent(inout) :: x(*)
    integer, intent(in) :: incx
  • public pure subroutine dtrmv(uplo, trans, diag, n, a, lda, x, incx)

    Original interface for DTRMV See also: mfi_trmv, trmv.

    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
    real(kind=REAL64), intent(in) :: a(lda,*)
    integer, intent(in) :: lda
    real(kind=REAL64), intent(inout) :: x(*)
    integer, intent(in) :: incx
  • public pure subroutine ctrmv(uplo, trans, diag, n, a, lda, x, incx)

    Original interface for CTRMV See also: mfi_trmv, trmv.

    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
    complex(kind=REAL32), intent(in) :: a(lda,*)
    integer, intent(in) :: lda
    complex(kind=REAL32), intent(inout) :: x(*)
    integer, intent(in) :: incx
  • public pure subroutine ztrmv(uplo, trans, diag, n, a, lda, x, incx)

    Original interface for ZTRMV See also: mfi_trmv, trmv.

    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
    complex(kind=REAL64), intent(in) :: a(lda,*)
    integer, intent(in) :: lda
    complex(kind=REAL64), intent(inout) :: x(*)
    integer, intent(in) :: incx