public interface her
HER 执行埃尔米特秩 1 运算 A := alphaxx**H + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n x n 的埃尔米特矩阵。
子程序
public pure subroutine cher(uplo, n, alpha, x, incx, a, lda)
参数
| 类型 | 意图 | 可选 | 属性 | 名称 | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| integer(kind=ilp), | intent(in) | :: | n | |||
| real(kind=sp), | intent(in) | :: | alpha | |||
| complex(kind=sp), | intent(in) | :: | x(*) | |||
| integer(kind=ilp), | intent(in) | :: | incx | |||
| complex(kind=sp), | intent(inout) | :: | a(lda,*) | |||
| integer(kind=ilp), | intent(in) | :: | lda |
public pure subroutine zher(uplo, n, alpha, x, incx, a, lda)
参数
| 类型 | 意图 | 可选 | 属性 | 名称 | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| integer(kind=ilp), | intent(in) | :: | n | |||
| real(kind=dp), | intent(in) | :: | alpha | |||
| complex(kind=dp), | intent(in) | :: | x(*) | |||
| integer(kind=ilp), | intent(in) | :: | incx | |||
| complex(kind=dp), | intent(inout) | :: | a(lda,*) | |||
| integer(kind=ilp), | intent(in) | :: | lda |
模块过程
public pure subroutine stdlib_cher(uplo, n, alpha, x, incx, a, lda)
CHER 执行埃尔米特秩 1 运算 A := alphaxx**H + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n x n 的埃尔米特矩阵。
参数
| 类型 | 意图 | 可选 | 属性 | 名称 | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| integer(kind=ilp), | intent(in) | :: | n | |||
| real(kind=sp), | intent(in) | :: | alpha | |||
| complex(kind=sp), | intent(in) | :: | x(*) | |||
| integer(kind=ilp), | intent(in) | :: | incx | |||
| complex(kind=sp), | intent(inout) | :: | a(lda,*) | |||
| integer(kind=ilp), | intent(in) | :: | lda |
public pure subroutine stdlib_zher(uplo, n, alpha, x, incx, a, lda)
ZHER 执行埃尔米特秩 1 运算 A := alphaxx**H + A，其中 alpha 是一个实数标量，x 是一个 n 元素向量，A 是一个 n x n 的埃尔米特矩阵。
参数
| 类型 | 意图 | 可选 | 属性 | 名称 | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| integer(kind=ilp), | intent(in) | :: | n | |||
| real(kind=dp), | intent(in) | :: | alpha | |||
| complex(kind=dp), | intent(in) | :: | x(*) | |||
| integer(kind=ilp), | intent(in) | :: | incx | |||
| complex(kind=dp), | intent(inout) | :: | a(lda,*) | |||
| integer(kind=ilp), | intent(in) | :: | lda |