doubleGTsolve(3)
πΈ doubleGTsolve(3) β LAPACK's double GT solve era πΈ
okay so bestie, this is the doubleGTsolve(3) page, and it's giving very specific linear algebra in the best way. it's a LAPACK group page. sit down, hydrate, we're doing tridiagonal solves π
β¨ NAME β¨
doubleGTsolve β double π«Ά (that's it, that's the name, the whole name, no notes)
β¨ SYNOPSIS β¨
π Functions π
subroutine dgtsv (N, NRHS, DL, D, DU, B, LDB, INFO)β DGTSV computes the solution to system of linear equations A * X = B for GT matrices β¨subroutine dgtsvx (FACT, TRANS, N, NRHS, DL, D, DU, DLF, DF, DUF, DU2, IPIV, B, LDB, X, LDX, RCOND, FERR, BERR, WORK, IWORK, INFO)β DGTSVX computes the solution to system of linear equations A * X = B for GT matrices β¨
π Detailed Description π
This is the group of double solve driver functions for GT matrices. like, the whole squad. the GT solve squad. no cap π
π Function Documentation π
π¦ subroutine dgtsv π¦
subroutine dgtsv (integer N, integer NRHS, double precision, dimension( * )
DL, double precision, dimension( * ) D, double precision, dimension( * )
DU, double precision, dimension( ldb, * ) B, integer LDB, integer INFO)
DGTSV computes the solution to system of linear equations A * X = B for GT matrices β¨
π Purpose π
DGTSV solves the equation
A*X = B,
where A is an n by n tridiagonal matrix, by Gaussian elimination with partial pivoting.
lowkey important heads up: the equation A**T*X = B may be solved by interchanging the order of the arguments DU and DL. yes bestie, just swap them. the way that works is iconic ngl π«Ά
πΈ Parameters πΈ
NβNisINTEGER. the order of the matrix A.N >= 0.NRHSβNRHSisINTEGER. the number of right hand sides, aka the number of columns of the matrix B.NRHS >= 0.DLβDLisDOUBLE PRECISIONarray, dimension(N-1). on entry,DLmust contain the(n-1)sub-diagonal elements of A. on exit,DLis overwritten by the(n-2)elements of the second super-diagonal of the upper triangular matrix U from the LU factorization of A, sitting inDL(1), ..., DL(n-2). she gets recycled, periodt πDβDisDOUBLE PRECISIONarray, dimension(N). on entry,Dmust contain the diagonal elements of A. on exit,Dis overwritten by the n diagonal elements of U.DUβDUisDOUBLE PRECISIONarray, dimension(N-1). on entry,DUmust contain the(n-1)super-diagonal elements of A. on exit,DUis overwritten by the(n-1)elements of the first super-diagonal of U.BβBisDOUBLE PRECISIONarray, dimension(LDB,NRHS). on entry, the N by NRHS matrix of right hand side matrix B. on exit, ifINFO = 0, the N by NRHS solution matrix X. she came in as B and left as X, main character behavior πLDBβLDBisINTEGER. the leading dimension of the array B.LDB >= max(1,N).INFOβINFOisINTEGER.= 0: successful exit π< 0: ifINFO = -i, the i-th argument had an illegal value π> 0: ifINFO = i,U(i,i)is exactly zero, and the solution has not been computed. the factorization has not been completed unlessi = N. π this is not a drill bestie
π§ Author π§
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π¦ subroutine dgtsvx π¦
subroutine dgtsvx (character FACT, character TRANS, integer N, integer NRHS,
double precision, dimension( * ) DL, double precision, dimension( * ) D,
double precision, dimension( * ) DU, double precision, dimension( * )
DLF, double precision, dimension( * ) DF, double precision, dimension( *
) DUF, double precision, dimension( * ) DU2, integer, dimension( * )
IPIV, double precision, dimension( ldb, * ) B, integer LDB, double
precision, dimension( ldx, * ) X, integer LDX, double precision RCOND,
double precision, dimension( * ) FERR, double precision, dimension( * )
BERR, double precision, dimension( * ) WORK, integer, dimension( * )
IWORK, integer INFO)
DGTSVX computes the solution to system of linear equations A * X = B for GT matrices β¨
π Purpose π
DGTSVX uses the LU factorization to compute the solution to a real system of linear equations A * X = B or A**T * X = B, where A is a tridiagonal matrix of order N and X and B are N-by-NRHS matrices.
error bounds on the solution and a condition estimate are also provided. she's thorough like that π
π Description π
the following steps are performed:
- If
FACT = 'N', the LU decomposition is used to factor the matrix A asA = L * U, where L is a product of permutation and unit lower bidiagonal matrices and U is upper triangular with nonzeros in only the main diagonal and first two superdiagonals. - If some
U(i,i)=0, so that U is exactly singular, then the routine returns withINFO = i. otherwise, the factored form of A is used to estimate the condition number of the matrix A. if the reciprocal of the condition number is less than machine precision,INFO = N+1is returned as a warning, but the routine still goes on to solve for X and compute error bounds as described below. she warns you but she does NOT stop, she's committed π€ - The system of equations is solved for X using the factored form of A.
- Iterative refinement is applied to improve the computed solution matrix and calculate error bounds and backward error estimates for it.
πΈ Parameters πΈ
FACTβFACTisCHARACTER*1. specifies whether or not the factored form of A has been supplied on entry.= 'F':DLF,DF,DUF,DU2, andIPIVcontain the factored form of A;DL,D,DU,DLF,DF,DUF,DU2andIPIVwill not be modified. hands off bestie, they're taken π= 'N': the matrix will be copied toDLF,DF, andDUFand factored.
TRANSβTRANSisCHARACTER*1. specifies the form of the system of equations:= 'N':A * X = B(No transpose)= 'T':A**T * X = B(Transpose)= 'C':A**H * X = B(Conjugate transpose = Transpose)
NβNisINTEGER. the order of the matrix A.N >= 0.NRHSβNRHSisINTEGER. the number of right hand sides, i.e., the number of columns of the matrix B.NRHS >= 0.DLβDLisDOUBLE PRECISIONarray, dimension(N-1). the(n-1)subdiagonal elements of A.DβDisDOUBLE PRECISIONarray, dimension(N). the n diagonal elements of A.DUβDUisDOUBLE PRECISIONarray, dimension(N-1). the(n-1)superdiagonal elements of A.DLFβDLFisDOUBLE PRECISIONarray, dimension(N-1).- If
FACT = 'F', thenDLFis an input argument and on entry contains the(n-1)multipliers that define the matrix L from the LU factorization of A as computed byDGTTRF. - If
FACT = 'N', thenDLFis an output argument and on exit contains the(n-1)multipliers that define the matrix L from the LU factorization of A.
- If
DFβDFisDOUBLE PRECISIONarray, dimension(N).- If
FACT = 'F', thenDFis an input argument and on entry contains the n diagonal elements of the upper triangular matrix U from the LU factorization of A. - If
FACT = 'N', thenDFis an output argument and on exit contains the n diagonal elements of the upper triangular matrix U from the LU factorization of A.
- If
DUFβDUFisDOUBLE PRECISIONarray, dimension(N-1).- If
FACT = 'F', thenDUFis an input argument and on entry contains the(n-1)elements of the first superdiagonal of U. - If
FACT = 'N', thenDUFis an output argument and on exit contains the(n-1)elements of the first superdiagonal of U.
- If
DU2βDU2isDOUBLE PRECISIONarray, dimension(N-2).- If
FACT = 'F', thenDU2is an input argument and on entry contains the(n-2)elements of the second superdiagonal of U. - If
FACT = 'N', thenDU2is an output argument and on exit contains the(n-2)elements of the second superdiagonal of U.
- If
IPIVβIPIVisINTEGERarray, dimension(N).- If
FACT = 'F', thenIPIVis an input argument and on entry contains the pivot indices from the LU factorization of A as computed byDGTTRF. - If
FACT = 'N', thenIPIVis an output argument and on exit contains the pivot indices from the LU factorization of A; row i of the matrix was interchanged with rowIPIV(i).IPIV(i)will always be eitheriori+1;IPIV(i) = iindicates a row interchange was not required.
- If
BβBisDOUBLE PRECISIONarray, dimension(LDB,NRHS). the N-by-NRHS right hand side matrix B.LDBβLDBisINTEGER. the leading dimension of the array B.LDB >= max(1,N).XβXisDOUBLE PRECISIONarray, dimension(LDX,NRHS). ifINFO = 0orINFO = N+1, the N-by-NRHS solution matrix X. πLDXβLDXisINTEGER. the leading dimension of the array X.LDX >= max(1,N).RCONDβRCONDisDOUBLE PRECISION. the estimate of the reciprocal condition number of the matrix A. ifRCONDis less than the machine precision (in particular, ifRCOND = 0), the matrix is singular to working precision. this condition is indicated by a return code ofINFO > 0. πFERRβFERRisDOUBLE PRECISIONarray, dimension(NRHS). the estimated forward error bound for each solution vectorX(j)(the j-th column of the solution matrix X). ifXTRUEis the true solution corresponding toX(j),FERR(j)is an estimated upper bound for the magnitude of the largest element in(X(j) - XTRUE)divided by the magnitude of the largest element inX(j). the estimate is as reliable as the estimate forRCOND, and is almost always a slight overestimate of the true error. she's a little dramatic, she overestimates, relatable πBERRβBERRisDOUBLE PRECISIONarray, dimension(NRHS). the componentwise relative backward error of each solution vectorX(j)(i.e., the smallest relative change in any element of A or B that makesX(j)an exact solution).WORKβWORKβDOUBLE PRECISION array, dimension (3*N). yeah bestie this is the scratch space, give it3*Ndoubles, she needs room to breathe β¨IWORKβINTEGER array, dimension (N). the integer bestie, dimensionN, she's here for the bookkeeping πINFOβINTEGER, and this is the β¨vibe checkβ¨ at the end. here's the tea, every possible value, no skips:
= 0: successful exit
< 0: if INFO = -i, the i-th argument had an illegal value
> 0: if INFO = i, and i is
<= N: U(i,i) is exactly zero. The factorization
has not been completed unless i = N, but the
factor U is exactly singular, so the solution
and error bounds could not be computed.
RCOND = 0 is returned.
= N+1: U is nonsingular, but RCOND is less than machine
precision, meaning that the matrix is singular
to working precision. Nevertheless, the
solution and error bounds are computed because
there are a number of situations where the
computed solution can be more accurate than the
value of RCOND would suggest.
okay so let's decode that because it's giving cryptic π
INFO = 0β we ate. successful exit, no notes. πINFO < 0β ifINFO = -i, then the i-th argument had an illegal value. something you passed in was a no β bestie, the i-th one specifically.INFO > 0β ifINFO = i, then it depends on whatiis:- if
i <= N:U(i,i)is exactly zero. the factorization has not been completed unlessi = N, but the factorUis exactly singular, so the solution and error bounds could not be computed, andRCOND = 0is returned. it's giving singular, it's giving unsolvable, it's giving not today π - if
i = N+1:Uis nonsingular, butRCONDis less than machine precision, which means the matrix is singular to working precision. nevertheless, the solution and error bounds are computed, because there are a number of situations where the computed solution can be more accurate than the value ofRCONDwould suggest. like okay she's technically singular but she's still serving, lowkey iconic ππ«Ά
- if
π Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
πΈ Author (yes, again)
Generated automatically by Doxygen for LAPACK from the source code. not a human writing this one bestie, the machine did it, and honestly? she did that π β¨
okay and that's a wrap on doubleGTsolve(3)!! this lil page is from LAPACK Version 3.11.0, dated Sun Nov 27 2022, and it was auto-generated by Doxygen for LAPACK from the source code. go solve something slay, bestie π¦π mwah!
π¦ where this page comes from
- debian bookworm: liblapack-doc 3.11.0-2 Β· BSD-3-Clause
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash on : a language model's rewrite of the original, under its terms