DGET02(3)
π NAME π
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/LIN/dget02.f β like, that's literally the whole name bestie, it's a Fortran file living its best life in the LAPACK testing directory π
β¨ SYNOPSIS β¨
Functions/Subroutines πΈ
subroutine DGET02 (trans, m, n, nrhs, a, lda, x, ldx, b, ldb, rwork,
resid)
DGET02 β that's her, that's the icon π
π¦ Function/Subroutine Documentation π¦
subroutine DGET02 (character trans, integer m, integer n, integer nrhs,
double precision, dimension( lda, * ) a, integer lda, double precision,
dimension( ldx, * ) x, integer ldx, double precision, dimension( ldb, *
) b, integer ldb, double precision, dimension( * ) rwork, double
precision resid)
DGET02 π
π― Purpose π―
Okay so listen, bestie β DGET02 computes the residual for a solution of a system of linear equations op(A)*X = B:
RESID = norm(B - op(A)*X) / ( norm(op(A)) * norm(X) * EPS ),
where op(A) = A or A**T, depending on TRANS, and EPS is the machine epsilon. The norm used is the 1-norm. No cap, that's the whole vibe check: how far off is your answer, scaled so the number actually means something π
π§ Parameters π§
TRANSβTRANSisCHARACTER*1and it specifies the form of the system of equations, iykyk:= 'N':A * X = B(No transpose)= 'T':A**T * X = B(Transpose)= 'C':A**H * X = B(Conjugate transpose = Transpose)
MβMisINTEGER, the number of rows of the matrixA.M >= 0. β¨NβNisINTEGER, the number of columns of the matrixA.N >= 0. β¨NRHSβNRHSisINTEGER, the number of columns ofB, the matrix of right hand sides.NRHS >= 0. π«ΆAβAisDOUBLE PRECISIONarray, dimension(LDA,N). The originalM x NmatrixA. πLDAβLDAisINTEGER, the leading dimension of the arrayA.LDA >= max(1,M). Don't mess this one up fr fr.XβXisDOUBLE PRECISIONarray, dimension(LDX,NRHS). The computed solution vectors for the system of linear equations. Main character energy, honestly πLDXβLDXisINTEGER, the leading dimension of the arrayX. IfTRANS = 'N',LDX >= max(1,N); ifTRANS = 'T'or'C',LDX >= max(1,M). βBβBisDOUBLE PRECISIONarray, dimension(LDB,NRHS). On entry, the right hand side vectors for the system of linear equations. On exit,Bis overwritten with the differenceB - op(A)*X. π Yeah, she gets clobbered β that's not a bug, that's just how she does it.LDBβLDBisINTEGER, the leading dimension of the arrayB. IfTRANS = 'N',LDB >= max(1,M); ifTRANS = 'T'or'C',LDB >= max(1,N). πRWORKβRWORKisDOUBLE PRECISIONarray, dimension(M). πRESIDβRESIDisDOUBLE PRECISION, the maximum over the number of right hand sides of
norm(B - op(A)*X) / ( norm(op(A)) * norm(X) * EPS )
That's your final girl, the number you actually came here for π₯
Heads up bestie: the size constraints in this parameter list (M >= 0,N >= 0,LDX >= max(1,N), and all the rest) are non-negotiable β respect the leading dimensions or it's giving undefined behaviour π
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 133 of file dget02.f. π
π Author π
Generated automatically by Doxygen for LAPACK from the source code. Not me writing this by hand, the robots did it π€β¨
That's the whole page, bestie! LAPACK Version 3.12.0, and this little beauty came from /home/abui...IN/dget02.f(3) β slay, go check your residuals, ily π«Άπ
π¦ 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