TESTING/LIN/dqrt12.f(3)
π TESTING/LIN/dqrt12.f
okay bestie, welcome to the TESTING/LIN corner of the Library Functions Manual β this is where LAPACK checks its own homework, and honestly? icon behavior. β¨
π¦ SYNOPSIS
Functions/Subroutines
double precision function dqrt12 (m, n, a, lda, s, work, lwork)
DQRT12 β say it with me, it's giving main character energy π
πΈ Function/Subroutine Documentation
double precision function dqrt12 (integer m, integer n, double precision,
dimension( lda, * ) a, integer lda, double precision, dimension( * ) s,
double precision, dimension( lwork ) work, integer lwork)
DQRT12 β¨ (yes that's the whole description, she's mysterious, she's booked and busy, we respect it)
π Purpose
No cap, here's the whole vibe:
!>
!> DQRT12 computes the singular values `svlues' of the upper trapezoid
!> of A(1:M,1:N) and returns the ratio
!>
!> || svlues - s ||/(||s||*eps*max(M,N))
!>
so basically she grabs the singular values of the upper trapezoid of A(1:M,1:N), does a little comparison dance with s, and hands you back that ratio. it's a whole accuracy-check moment π«Ά (and yes, svlues is spelled like that in the source β we keep it exactly, literally not touching it π)
π Parameters
M
!> M is INTEGER
!> The number of rows of the matrix A.
!>
how many rows A has. that's it, that's the whole job π
N
!> N is INTEGER
!> The number of columns of the matrix A.
!>
how many columns A has. iconic, we love a symmetric description π«
A
!> A is DOUBLE PRECISION array, dimension (LDA,N)
!> The M-by-N matrix A. Only the upper trapezoid is referenced.
!>
the star of the show π an M-by-N DOUBLE PRECISION array β but heads up, only the upper trapezoid gets referenced, the rest of her is literally just vibing in the background π
LDA
!> LDA is INTEGER
!> The leading dimension of the array A.
!>
the leading dimension of A, aka the stride situation. crucial, don't skip π―
S
!> S is DOUBLE PRECISION array, dimension (min(M,N))
!> The singular values of the matrix A.
!>
DOUBLE PRECISION array of size min(M,N) holding the singular values of A β the actual facts she's comparing against π
WORK
!> WORK is DOUBLE PRECISION array, dimension (LWORK)
!>
scratch space, DOUBLE PRECISION, dimension (LWORK). she works hard so you don't have to π§
LWORK
!> LWORK is INTEGER
!> The length of the array WORK. LWORK >= max(M*N + 4*min(M,N) +
!> max(M,N), M*N+2*MIN( M, N )+4*N).
!>
the length of WORK, and bestie please respect the minimum:
LWORK >= max(M*N + 4*min(M,N) + max(M,N), M*N+2*MIN( M, N )+4*N)
β οΈ too small and it's not a vibe. give WORK the room she deserves fr fr.
π Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
the whole squad showed up for this one π
β Details
Definition at line 88 of file dqrt12.f.
π Author (again, yes really)
Generated automatically by Doxygen for LAPACK from the source code. she's not hand-written, she's machine-born and still slaying π€β¨
and that's the whole page, bestie! π from LAPACK, Version 3.12.0 β one file, TESTING/LIN/dqrt12.f(3), delivered with love, no date on the footer so we're just gonna say it dropped whenever the source said so π«Άπ mwah, go check those singular values β¨
π¦ 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