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

Ztpmv() Sub Ztpmv ( Uplo As  String, Trans As  String, Diag As  String, N As  Long, Ap_I As  Complex, X_I As  Complex, Optional IncX As  Long = 1  ) x <- Ax, x <- ATx or x <- AHx (complex triangular matrices in packed form) (BLAS 2) Purpose This routine performs the matrix-vector operations x <- A*x, x <- A^T*x or x <- A^H*x where x is a vector and A is an n x n unit or non-unit, upper or lower triangular matrix, supplied in packed form. Parameters [in] Uplo Specifies whether the matrix is an upper or lower triangular matrix as follows: = "U": A is an upper triangular matrix. = "L": A is an lower triangular matrix. [in] Trans Specifies the operation to be performed as follows: = "N": x <- A*x. = "T": x <- A^T*x. = "C": x <- A^H*x. [in] Diag Specifies whether or not A is unit triangular as follows: = "N": A is not assumed to be unit triangular. = "U": A is assumed to be unit triangular. (Diagonal elements of Ap() are not referenced) [in] N Order of the matrix A. (N >= 0) (If N = 0, returns without computation) [in] Ap_I An element Ap(I) of the array Ap(). Starting from this location, N x N triangular matrix A is stored in packed form. Only the upper or lower triangular part is stored. [in] X_I An element X(I) of the array X(). [in] Starting from this location, N vector x is stored with element spacing IncX. [out] Starting from this location, N vector A*x, A^T*x or A^H*x is stored with element spacing IncX. [in] IncX (Optional) Element spacing of vector x in the array X(). (IncX <> 0) (default = 1) Reference BLAS