Intel® oneAPI Math Kernel Library Developer Reference - Fortran
Solves a system of linear equations A * X = B with a complex Hermitian matrix using the factorization computed by ?hetrf_rk.
call chetrs_3(uplo, n, nrhs, A, lda, e, ipiv, B, ldb, info)
call zhetrs_3(uplo, n, nrhs, A, lda, e, ipiv, B, ldb, info)
?hetrs_3 solves a system of linear equations A * X = B with a complex Hermitian matrix A using the factorization computed by ?hetrf_rk: A = P*U*D*(UH)*(PT) or A = P*L*D*(LH)*(PT), where U (or L) is unit upper (or lower) triangular matrix, UH (or LH) is the conjugate of U (or L), P is a permutation matrix, PT is the transpose of P, and D is a Hermitian and block diagonal with 1-by-1 and 2-by-2 diagonal blocks.
This algorithm uses Level 3 BLAS.
CHARACTER*1
Specifies whether the details of the factorization are stored as an upper or lower triangular matrix:
INTEGER
The order of the matrix A. n ≥ 0.
INTEGER
The number of right-hand sides; that is, the number of columns in the matrix B. nrhs ≥ 0.
COMPLEX for chetrs_3
COMPLEX*16 for zhetrs_3
Array, dimension (lda,n). Diagonal of the block diagonal matrix D and factor U or L as computed by ?hetrf_rk:
INTEGER
The leading dimension of the array A.lda ≥ max(1, n).
COMPLEX for chetrs_3
COMPLEX*16 for zhetrs_3
Array, dimension (n). On entry, contains the superdiagonal (or subdiagonal) elements of the Hermitian block diagonal matrix D with 1-by-1 or 2-by-2 diagonal blocks. If uplo = 'U', e(i) = D(i-1,i),i=2:N, and e(1) is not referenced. If uplo = 'L', e(i) = D(i+1,i),i=1:N-1, and e(n) is not referenced.
INTEGER
Array, dimension (n). Details of the interchanges and the block structure of D as determined by ?hetrf_rk.
COMPLEX for chetrs_3
COMPLEX*16 for zhetrs_3
On entry, the right-hand side matrix B.
The second dimension of B must be at least max(1, nrhs).
INTEGER
The leading dimension of the array B. ldb ≥ max(1, n).
COMPLEX for chetrs_3
COMPLEX*16 for zhetrs_3
On exit, the solution matrix X.
INTEGER