spr 接口

public interface spr

SPR 执行对称秩 1 操作 A := alpha*x*x**T + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。


子程序

public pure subroutine dspr(uplo, n, alpha, x, incx, ap)

参数

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

public pure subroutine sspr(uplo, n, alpha, x, incx, ap)

参数

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

模块过程

public pure subroutine stdlib_dspr(uplo, n, alpha, x, incx, ap)

DSPR 执行对称秩 1 操作 A := alpha*x*x**T + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

参数

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

public pure subroutine stdlib_sspr(uplo, n, alpha, x, incx, ap)

SSPR 执行对称秩 1 操作 A := alpha*x*x**T + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n×n 对称矩阵，以打包形式提供。

参数

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