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

Zspr2() Sub Zspr2 ( 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 <- αxyT + αyxT + A (complex symmetric matrices in packed form) (BLAS 2) Purpose This routine performs the rank 2 operation A <- αxy^T + αyx^T + A where α is a scalar, x and y are n element vectors and A is an n x n symmetric matrix. 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 symmetric matrix A is stored in packed form. According to uplo, upper or lower triangular part is to be supplied. [out] Starting from this location, N x N symmetric matrix αxy^T + αyx^T + A is stored. According to uplo, upper or lower triangular part is stored. [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