Zgbmv Zgemv Zgerc Zgeru Zhbmv Zhemv Zher Zher2 Zhpmv Zhpr Zhpr2 Zsbmv Zspmv Zspr Zspr2 Zsymv Zsyr Zsyr2 Ztbmv Ztbsv Ztpmv Ztpsv Ztrmv Ztrsv

Zhpr() Sub Zhpr ( Uplo As  String, N As  Long, Alpha As  Double, X_I As  Complex, Ap_I As  Complex, Optional IncX As  Long = 1  ) Rank 1 operation: A <- αxxH + A (Hermitian matrices in packed form) (BLAS 2) Purpose This routine performs the Hermitian rank 1 operation A <- αxx^H + A where α is a real scalar, x is an n element vector and A is an n x n Hermitian matrix supplied in packed form. Parameters [in] uplo Specifies whether the upper or lower triangular part of the matrix A is supplied in the packed array Ap() as follows: = "U": The upper triangular part of A is supplied in Ap(). = "L": The lower triangular part of A is supplied in Ap(). [in] N Order of the matrix A. (N >= 0) (If N = 0, returns without computation) [in] Alpha Scalar α. [in] X_I An element X(I) of the array X(). Starting from this location, vector x is stored with element spacing IncX. [in] Ap_I An element Ap(I) of the array Ap(). [in] Starting from this location, N x N Hermitian matrix A is stored in packed form. According to Uplo, only upper or lower triangular part is to be referenced. The imaginary parts of the diagonal elements need not be set and are assumed to be zero. [out] Starting from this location, N x N Hermitian matrix αxx^H + A is stored in packed form. According to Uplo, only upper or lower triangular part is stored. The imaginary parts of the diagonal elements are set to zero. [in] IncX (Optional) Element spacing of vector x in the array X(). (IncX <> 0) (default = 1) Reference BLAS