SRC/chpsv.f(3)
okay so bestie, welcome to SRC/chpsv.f from the Library Functions Manual β section 3, if we're being cute about it. This page is giving β¨ serious LAPACK energy β¨, and honestly? The math ate. Let's get into it.
π NAME
SRC/chpsv.f β yes, that's the file. The star of the show is chpsv, and its whole thing is: CHPSV computes the solution to system of linear equations A * X = B for OTHER matrices. Slay.
β¨ SYNOPSIS
π§ Functions/Subroutines
subroutine chpsv (uplo, n, nrhs, ap, ipiv, b, ldb, info)
CHPSV computes the solution to system of linear equations A * X = B
for OTHER matrices
π«Ά Function/Subroutine Documentation
Full signature incoming, no skips:
subroutine chpsv (character uplo, integer n, integer nrhs, complex,
dimension( * ) ap, integer, dimension( * ) ipiv, complex, dimension(
ldb, * ) b, integer ldb, integer info)
CHPSV computes the solution to system of linear equations A * X = B for OTHER matrices. Periodt.
π― Purpose
CHPSV computes the solution to a complex system of linear equations
A * X = B,
where A is an N-by-N Hermitian matrix stored in packed format and X and B are N-by-NRHS matrices.
The diagonal pivoting method is used to factor A as
A = U * D * U**H, if UPLO = 'U', or
A = L * D * L**H, if UPLO = 'L',
where U (or L) is a product of permutation and unit upper (lower) triangular matrices, D is Hermitian and block diagonal with 1-by-1 and 2-by-2 diagonal blocks. The factored form of A is then used to solve the system of equations A * X = B.
π§Ύ Parameters
UPLOβUPLOisCHARACTER*1= 'U':Upper triangle of A is stored;= 'L':Lower triangle of A is stored.
NβNisINTEGER- The number of linear equations, i.e., the order of the matrix A.
N >= 0.
- The number of linear equations, i.e., the order of the matrix A.
NRHSβNRHSisINTEGER- The number of right hand sides, i.e., the number of columns of the matrix B.
NRHS >= 0.
- The number of right hand sides, i.e., the number of columns of the matrix B.
APβAPisCOMPLEXarray, dimension(N*(N+1)/2)- On entry, the upper or lower triangle of the Hermitian matrix A, packed columnwise in a linear array. The j-th column of A is stored in the array AP as follows:
- if
UPLO = 'U',AP(i + (j-1)*j/2) = A(i,j)for1<=i<=j; - if
UPLO = 'L',AP(i + (j-1)*(2n-j)/2) = A(i,j)forj<=i<=n.
- if
- See below for further details.
- On exit, the block diagonal matrix D and the multipliers used to obtain the factor U or L from the factorization
A = U*D*U**HorA = L*D*L**Has computed byCHPTRF, stored as a packed triangular matrix in the same storage format as A.
- On entry, the upper or lower triangle of the Hermitian matrix A, packed columnwise in a linear array. The j-th column of A is stored in the array AP as follows:
IPIVβIPIVisINTEGERarray, dimension(N)- Details of the interchanges and the block structure of D, as determined by
CHPTRF. - If
IPIV(k) > 0, then rows and columns k andIPIV(k)were interchanged, andD(k,k)is a 1-by-1 diagonal block. - If
UPLO = 'U'andIPIV(k) = IPIV(k-1) < 0, then rows and columnsk-1and-IPIV(k)were interchanged andD(k-1:k,k-1:k)is a 2-by-2 diagonal block. - If
UPLO = 'L'andIPIV(k) = IPIV(k+1) < 0, then rows and columnsk+1and-IPIV(k)were interchanged andD(k:k+1,k:k+1)is a 2-by-2 diagonal block.
- Details of the interchanges and the block structure of D, as determined by
BβBisCOMPLEXarray, dimension(LDB,NRHS)- On entry, the N-by-NRHS right hand side matrix B.
- On exit, if
INFO = 0, the N-by-NRHS solution matrix X.
LDBβLDBisINTEGER- The leading dimension of the array B.
LDB >= max(1,N).
- The leading dimension of the array B.
INFOβINFOisINTEGER= 0:successful exit< 0:ifINFO = -i, the i-th argument had an illegal value> 0:ifINFO = i,D(i,i)is exactly zero. The factorization has been completed, but the block diagonal matrix D is exactly singular, so the solution could not be computed.
π Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π Further Details
The packed storage scheme is illustrated by the following example
when N = 4, UPLO = 'U':
Two-dimensional storage of the Hermitian matrix A:
a11 a12 a13 a14
a22 a23 a24
a33 a34 (aij = conjg(aji))
a44
Packed storage of the upper triangle of A:
AP = [ a11, a12, a22, a13, a23, a33, a14, a24, a34, a44 ]
π Definition at line 161 of file chpsv.f.
That's literally where the definition sits, bestie.
π Author
Generated automatically by Doxygen for LAPACK from the source code.
mwah π β source/version check: LAPACK Version 3.12.0, and this page lives at SRC/chpsv.f(3). That's the footer, and it's iconic. β¨
π¦ where this page comes from
- arch rolling: lapack-doc 3.12.1-2 Β· custom
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms