stdlib_chpr Subroutine
public pure subroutine stdlib_chpr(uplo, n, alpha, x, incx, ap)
CHPR performs the hermitian rank 1 operation A := alphaxx**H + A, where alpha is a real scalar, x is an n element vector and A is an n by n hermitian matrix, supplied in packed form.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| 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) | :: | ap(*) |