DQRT16(3)
π dqrt16.f(3) β Library Functions Manual (yes bestie, we're in the LAPACK section)
okay so real quick: this whole page lives at /home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/LIN/dqrt16.f and honestly? iconic address. very "i have a long name and i'm proud of it" energy. β¨
πΈ NAME
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/LIN/dqrt16.f
like. that's the name. the whole path. she said "i'm not shortening it for anyone." periodt π
π¦ SYNOPSIS
Functions/Subroutines
subroutine DQRT16 (trans, m, n, nrhs, a, lda, x, ldx, b, ldb, rwork,
resid)
DQRT16
π Function/Subroutine Documentation
subroutine DQRT16 (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)
DQRT16 β she's the one doing the vibes check on your linear solver, and no cap she takes it seriously. π
β¨ Purpose β¨
okay so picture this, bestie:
DQRT16computes the residual for a solution of a system of linear equationsA*x = borA'*x = b:RESID = norm(B - A*X) / ( max(m,n) * norm(A) * norm(X) * EPS ),whereEPSis the machine epsilon.
that's it. that's the whole job. she checks how wrong you were, mathematically. lowkey the most honest function in the whole library π
π Parameters π
strap in, there's a lot of them, but they all slay in their own way π
TRANSβTRANS is CHARACTER*1. specifies the form of the system of equations:= 'N': A *x = b= 'T': A'*x = b, where A' is the transpose of A= 'C': A'*x = b, where A' is the transpose of A
(yes, 'T' and 'C' do the exact same thing here. twins. matching outfits. it's giving coordinated.)
MβM is INTEGER. the number of rows of the matrixA.M >= 0. zero is allowed, she's not gonna gatekeep π«ΆNβN is INTEGER. the number of columns of the matrixA.N >= 0. same deal, no gatekeeping.NRHSβNRHS is INTEGER. the number of columns ofB, the matrix of right hand sides.NRHS >= 0.AβA is DOUBLE PRECISION array, dimension (LDA,N). the originalM x NmatrixA. the main character, honestly.LDAβLDA is INTEGER. the leading dimension of the arrayA.LDA >= max(1,M). respect the leading dimension or she WILL notice. πXβX is DOUBLE PRECISION array, dimension (LDX,NRHS). the computed solution vectors for the system of linear equations. the answer you think you got.LDXβLDX is INTEGER. the leading dimension of the arrayX. IfTRANS = 'N',LDX >= max(1,N); ifTRANS = 'T'or'C',LDX >= max(1,M). read that twice, it flips depending onTRANS, iykyk π¦BβB is DOUBLE PRECISION array, dimension (LDB,NRHS). On entry, the right hand side vectors for the system of linear equations. On exit,Bis overwritten with the differenceB - A*X.
β οΈ heads up bestie: your B does NOT come back the way you left it. she replaces it with the difference. not me gaslighting you, that's literally the docs π
LDBβLDB is INTEGER. the leading dimension of the arrayB. IFTRANS = 'N',LDB >= max(1,M); ifTRANS = 'T'or'C',LDB >= max(1,N). (the original literally shouts "IF" in caps, so we're shouting too π₯)RWORKβRWORK is DOUBLE PRECISION array, dimension (M). that's it. that's the whole description. she's a working array withMslots, no further notes, mysterious queen πRESIDβRESID is DOUBLE PRECISION. the maximum over the number of right hand sides ofnorm(B - A*X) / ( max(m,n) * norm(A) * norm(X) * EPS ). the final verdict. the report card. the moment of truth β
π Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
four whole institutions collaborated on this and honestly? teamwork makes the dream work π
Definition at line 131 of file dqrt16.f. (yes, line 131, we counted, she's not hiding πΈ)
π§ Author (again, but the meta one)
Generated automatically by Doxygen for LAPACK from the source code. so technically a robot wrote this page, but the robot ate and left no crumbs π€β¨
β π that's the page bestie, all of it, nothing skipped β π
sign-off: this is LAPACK, Version 3.12.0, and the page you just read is /home/abui...IN/dqrt16.f(3). go forth and check your residuals ππ
π¦ 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