ZGBT02(3)
β¨ NAME β¨
Welcome to ZGBT02(3) from the Library Functions Manual, bestie π. The header tag is /home/abui...IN/zgbt02.f(3) β twice in the original header, iconic β and the NAME line points at the full source file path: /home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/LIN/zgbt02.f.
π¦ SYNOPSIS π¦
π¦ Functions/Subroutines π¦
subroutine ZGBT02 (trans, m, n, kl, ku, nrhs, a, lda, x, ldx, b, ldb,
rwork, resid)
And the function itself is ZGBT02, periodt.
π§ Function/Subroutine Documentation π§
Here's the full signature, character for character, no cap:
subroutine ZGBT02 (character trans, integer m, integer n, integer kl,
integer ku, integer nrhs, complex*16, dimension( lda, * ) a, integer
lda, complex*16, dimension( ldx, * ) x, integer ldx, complex*16,
dimension( ldb, * ) b, integer ldb, double precision, dimension( * )
rwork, double precision resid)
This is the ZGBT02 star of the show.
πΈ Purpose πΈ
Ok so ZGBT02 computes the residual for a solution of a banded system of equations op(A)*X = B:
RESID = norm(B - op(A)*X) / ( norm(op(A)) * norm(X) * EPS ),
where op(A) = A, A**T, or A**H, depending on TRANS, and EPS is the machine epsilon. Literally the whole vibe of this routine.
π Parameters π
TRANSβCHARACTER*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).MβINTEGER. The number of rows of the matrix A.M >= 0.NβINTEGER. The number of columns of the matrix A.N >= 0.KLβINTEGER. The number of subdiagonals within the band of A.KL >= 0.KUβINTEGER. The number of superdiagonals within the band of A.KU >= 0.NRHSβINTEGER. The number of columns of B.NRHS >= 0.AβCOMPLEX*16 array, dimension (LDA,N). The original matrix A in band storage, stored in rows 1 toKL+KU+1.LDAβINTEGER. The leading dimension of the array A.LDA >= max(1,KL+KU+1).XβCOMPLEX*16 array, dimension (LDX,NRHS). The computed solution vectors for the system of linear equations.LDXβINTEGER. The leading dimension of the array X. IfTRANS = 'N',LDX >= max(1,N); ifTRANS = 'T'or'C',LDX >= max(1,M).BβCOMPLEX*16 array, dimension (LDB,NRHS). On entry, the right hand side vectors for the system of linear equations. On exit, B is overwritten with the differenceB - A*X.LDBβINTEGER. The leading dimension of the array B.IF TRANS = 'N',LDB >= max(1,M); ifTRANS = 'T'or'C',LDB >= max(1,N).RWORKβDOUBLE PRECISION array, dimension (MAX(1,LRWORK)), whereLRWORK >= MwhenTRANS = 'T'or'C'; otherwise, RWORK is not referenced.RESIDβDOUBLE PRECISION. The maximum over the number of right hand sides ofnorm(B - op(A)*X) / ( norm(op(A)) * norm(X) * EPS ).
Bestie, those dimension conditions are mandatory, not a suggestion π.
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 146 of file zgbt02.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
And that's the cute little sign-off, bestie: LAPACK, Version 3.12.0, from /home/abui...IN/zgbt02.f(3). The page doesn't give a date, so I'm not inventing one β periodt. Mwah π
π¦ where this page comes from
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms