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

Ztpsv() Sub Ztpsv ( 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  ) Solution of Ax = b, ATx = b or AHx = b (complex triangular matrices in packed form) (BLAS 2) Purpose This routine solves one of the systems of equations A*x = b, A^T*x = b or A^H*x = b where b and x are n element vectors and A is an n x n unit or non-unit, upper or lower triangular matrix, supplied in packed form. No test for singularity or near-singularity is included in this routine. Such tests must be performed before calling this routine. 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 equation to be solved as follows: = "N": A*x = b. = "T": A^T*x = b. = "C": A^H*x = b. [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 b is stored with element spacing IncX. [out] Starting from this location, solution x (N vector) of A*x = b, A^T*x = b or A^H*x = b is stored with element spacing IncX. [in] IncX (Optional) Element spacing of vector x in the array X(). (IncX <> 0) (default = 1) Reference BLAS