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

Zhpr2() Sub Zhpr2 ( Uplo As  String, N As  Long, Alpha As  Complex, X_I As  Complex, Y_I As  Complex, Ap_I As  Complex, Optional IncX As  Long = 1, Optional IncY As  Long = 1  ) Rank 2 operation: A <- αxyH + conjg(α)yxH + A (Hermitian matrices in packed form) (BLAS 2) Purpose This routine performs the rank 2 operation A <- αxy^H + conjg(α)yx^H + A where α is a scalar, x and y are n element vectors 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] Y_I An element Y(I) of the array Y(). Starting from this location, vector y is stored with element spacing IncY. [in,out] 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, upper or lower triangular part is to be supplied. 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 αxy^H + conjg(α)yx^H + A is stored. According to uplo, 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) [in] IncY (Optional) Element spacing of vector y in the array Y(). (IncY <> 0) (default = 1) Reference BLAS