sbmv 接口

public interface sbmv

SBMV 执行矩阵-向量运算 y := alphaAx + beta*y,其中 alpha 和 beta 是标量,x 和 y 是 n 元素向量,A 是一个 n×n 对称带状矩阵,具有 k 个超对角线。


子程序

public pure subroutine dsbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

参数

类型 意图可选 属性 名称
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: k
real(kind=dp), intent(in) :: alpha
real(kind=dp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=dp), intent(in) :: x(*)
integer(kind=ilp), intent(in) :: incx
real(kind=dp), intent(in) :: beta
real(kind=dp), intent(inout) :: y(*)
integer(kind=ilp), intent(in) :: incy

public pure subroutine ssbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

参数

类型 意图可选 属性 名称
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: k
real(kind=sp), intent(in) :: alpha
real(kind=sp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=sp), intent(in) :: x(*)
integer(kind=ilp), intent(in) :: incx
real(kind=sp), intent(in) :: beta
real(kind=sp), intent(inout) :: y(*)
integer(kind=ilp), intent(in) :: incy

模块过程

public pure subroutine stdlib_dsbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

DSBMV 执行矩阵-向量运算 y := alphaAx + beta*y,其中 alpha 和 beta 是标量,x 和 y 是 n 元素向量,A 是一个 n×n 对称带状矩阵,具有 k 个超对角线。

参数

类型 意图可选 属性 名称
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: k
real(kind=dp), intent(in) :: alpha
real(kind=dp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=dp), intent(in) :: x(*)
integer(kind=ilp), intent(in) :: incx
real(kind=dp), intent(in) :: beta
real(kind=dp), intent(inout) :: y(*)
integer(kind=ilp), intent(in) :: incy

public pure subroutine stdlib_ssbmv(uplo, n, k, alpha, a, lda, x, incx, beta, y, incy)

SSBMV 执行矩阵-向量运算 y := alphaAx + beta*y,其中 alpha 和 beta 是标量,x 和 y 是 n 元素向量,A 是一个 n×n 对称带状矩阵,具有 k 个超对角线。

参数

类型 意图可选 属性 名称
character(len=1), intent(in) :: uplo
integer(kind=ilp), intent(in) :: n
integer(kind=ilp), intent(in) :: k
real(kind=sp), intent(in) :: alpha
real(kind=sp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=sp), intent(in) :: x(*)
integer(kind=ilp), intent(in) :: incx
real(kind=sp), intent(in) :: beta
real(kind=sp), intent(inout) :: y(*)
integer(kind=ilp), intent(in) :: incy