DTBT05(3)
πΈ dtbt05.f(3) β Library Functions Manual πΈ
Welcome to the dtbt05.f(3) glow-up, bestie β this is from the Library Functions Manual, and it's giving iconic LAPACK test-routine energy. π
β¨ NAME β¨
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/LIN/dtbt05.f
β¨ SYNOPSIS β¨
π¦ Functions/Subroutines π¦
subroutine DTBT05 (uplo, trans, diag, n, kd, nrhs, ab, ldab, b, ldb, x, ldx, xact, ldxact, ferr, berr, reslts)
DTBT05
π§ Function/Subroutine Documentation π§
subroutine DTBT05 (character uplo, character trans, character diag, integer
n, integer kd, integer nrhs, double precision, dimension( ldab, * ) ab,
integer ldab, double precision, dimension( ldb, * ) b, integer ldb,
double precision, dimension( ldx, * ) x, integer ldx, double precision,
dimension( ldxact, * ) xact, integer ldxact, double precision,
dimension( * ) ferr, double precision, dimension( * ) berr, double
precision, dimension( * ) reslts)
DTBT05
π₯ Purpose π₯
okay so DTBT05 tests the error bounds from iterative refinement for the computed solution to a system of equations A*X = B, where A is a triangular band matrix. π«Ά
RESLTS(1) = test of the error bound
= norm(X - XACT) / ( norm(X) * FERR )
A large value is returned if this ratio is not less than one.
RESLTS(2) = residual from the iterative refinement routine
= the maximum of BERR / ( NZ*EPS + (*) ), where
(*) = NZ*UNFL / (min_i (abs(A)*abs(X) +abs(b))_i )
and NZ = max. number of nonzeros in any row of A, plus 1
π Parameters π
UPLOβCHARACTER*1. Specifies whether the matrixAis upper or lower triangular.= 'U': Upper triangular;= 'L': Lower triangular.TRANSβCHARACTER*1. Specifies the form of the system of equations.= '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 number of rows of the matricesX,B, andXACT, and the order of the matrixA.N >= 0.KDβINTEGER. The number of super-diagonals of the matrixAifUPLO = 'U', or the number of sub-diagonals ifUPLO = 'L'.KD >= 0.NRHSβINTEGER. The number of columns of the matricesX,B, andXACT.NRHS >= 0.ABβDOUBLE PRECISION 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: ifUPLO = 'U',AB(kd+1+i-j,j) = A(i,j)formax(1,j-kd)<=i<=j; ifUPLO = 'L',AB(1+i-j,j) = A(i,j)forj<=i<=min(n,j+kd). IfDIAG = 'U', the diagonal elements ofAare not referenced and are assumed to be1.LDABβINTEGER. The leading dimension of the arrayAB.LDAB >= KD+1.BβDOUBLE PRECISION 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).XβDOUBLE PRECISION array, dimension (LDX,NRHS). The computed solution vectors. Each vector is stored as a column of the matrixX.LDXβINTEGER. The leading dimension of the arrayX.LDX >= max(1,N).XACTβDOUBLE PRECISION array, dimension (LDX,NRHS). The exact solution vectors. Each vector is stored as a column of the matrixXACT.LDXACTβINTEGER. The leading dimension of the arrayXACT.LDXACT >= max(1,N).FERRβDOUBLE PRECISION array, dimension (NRHS). The estimated forward error bounds for each solution vectorX. IfXTRUEis the true solution,FERRbounds the magnitude of the largest entry in(X - XTRUE)divided by the magnitude of the largest entry inX.BERRβDOUBLE PRECISION array, dimension (NRHS). The componentwise relative backward error of each solution vector (i.e., the smallest relative change in any entry ofAorBthat makesXan exact solution).RESLTSβDOUBLE PRECISION array, dimension (2). The maximum over theNRHSsolution vectors of the ratios:RESLTS(1) = norm(X - XACT) / ( norm(X) * FERR );RESLTS(2) = BERR / ( NZ*EPS + (*) ).
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 187 of file dtbt05.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
Source/version sign-off, bestie: this is LAPACK Version 3.12.0, and the footer path is /home/abui...IN/dtbt05.f(3) β no cap, that's the whole cute send-off. πβ¨
π¦ 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