TESTING/LIN/stbt03.f(3)
π§ TESTING/LIN/stbt03.f(3) π§
from the Library Functions Manual, bestie. This is the stbt03 subroutine page, and we're gonna go through every single thing it does. No skipping, no cap. π
β¨ NAME β¨
TESTING/LIN/stbt03.f β the file/page for the stbt03 subroutine. That's it, that's the name. π
β¨ SYNOPSIS β¨
πΈ Functions/Subroutines πΈ
subroutine stbt03 (uplo, trans, diag, n, kd, nrhs, ab, ldab, scale,
cnorm, tscal, x, ldx, b, ldb, work, resid)
STBT03
π Function/Subroutine Documentation π
π«Ά subroutine stbt03 π«Ά
subroutine stbt03 (character uplo, character trans, character diag, integer
n, integer kd, integer nrhs, real, dimension( ldab, * ) ab, integer
ldab, real scale, real, dimension( * ) cnorm, real tscal, real,
dimension( ldx, * ) x, integer ldx, real, dimension( ldb, * ) b, integer
ldb, real, dimension( * ) work, real resid)
STBT03
π― Purpose π―
Okay so STBT03 computes the residual for the solution to a scaled triangular system of equations A*x = s*b or A'*x = s*b when A is a triangular band matrix. Here A' is the transpose of A, s is a scalar, and x and b are N by NRHS matrices. The test ratio is the maximum over the number of right hand sides of:
norm(s*b - op(A)*x) / ( norm(op(A)) * norm(x) * EPS ),
where op(A) denotes A or A' and EPS is the machine epsilon. Slay, math. π₯
π Parameters π
UPLOβCHARACTER*1. Specifies whether the matrixAis upper or lower triangular:= 'U': Upper triangular;= 'L': Lower triangular. Pick one, bestie. πTRANSβCHARACTER*1. Specifies the operation applied toA:= 'N': A *x = b (No transpose);= 'T': A'*x = b (Transpose);= 'C': A'*x = b (Conjugate transpose = Transpose).DIAGβCHARACTER*1. Specifies whether or not the matrixAis unit triangular:= 'N': Non-unit triangular;= 'U': Unit triangular.NβINTEGER. The order of the matrixA.N >= 0.KDβINTEGER. The number of superdiagonals or subdiagonals of the triangular band matrixA.KD >= 0.NRHSβINTEGER. The number of right hand sides, i.e., the number of columns of the matricesXandB.NRHS >= 0.ABβREAL array, dimension (LDAB,N). The upper or lower triangular band matrixA, stored in the firstkd+1rows of the array. Thej-th column ofAis stored in thej-th column of the arrayABas follows:
if UPLO = 'U', AB(kd+1+i-j,j) = A(i,j) for max(1,j-kd)<=i<=j;
if UPLO = 'L', AB(1+i-j,j) = A(i,j) for j<=i<=min(n,j+kd).
LDABβINTEGER. The leading dimension of the arrayAB.LDAB >= KD+1.SCALEβREAL. The scaling factorsused in solving the triangular system.CNORMβREAL array, dimension (N). The 1-norms of the columns ofA, not counting the diagonal.TSCALβREAL. The scaling factor used in computing the 1-norms inCNORM.CNORMactually contains the column norms ofTSCAL*A.XβREAL array, dimension (LDX,NRHS). The computed solution vectors for the system of linear equations.LDXβINTEGER. The leading dimension of the arrayX.LDX >= max(1,N).BβREAL array, dimension (LDB,NRHS). The right hand side vectors for the system of linear equations.LDBβINTEGER. The leading dimension of the arrayB.LDB >= max(1,N).WORKβREAL array, dimension (N). That's the whole vibe for this one. π«ΆRESIDβREAL. The maximum over the number of right hand sides ofnorm(op(A)*x - s*b) / ( norm(op(A)) * norm(x) * EPS ).
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 172 of file stbt03.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
That's the whole page, bestie! Source/version vibe: LAPACK Version 3.12.0, and the page is TESTING/LIN/stbt03.f(3). Byeee πβ¨
π¦ 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