TESTING/LIN/dchkps.f(3)
π TESTING/LIN/dchkps.f π
okay so this one is from the Library Functions Manual bestie, and it's literally the docs for DCHKPS β the β¨vibe checkβ¨ subroutine that puts DPSTRF through its paces. no cap, it's a testing routine and it's giving "quality assurance queen" π
πΈ SYNOPSIS πΈ
Functions/Subroutines
subroutine dchkps (dotype, nn, nval, nnb, nbval, nrank, rankval, thresh,
tsterr, nmax, a, afac, perm, piv, work, rwork, nout)
DCHKPS
β¨ Function/Subroutine Documentation β¨
π the signature, in full π
subroutine dchkps (logical, dimension( * ) dotype, integer nn, integer,
dimension( * ) nval, integer nnb, integer, dimension( * ) nbval, integer
nrank, integer, dimension( * ) rankval, double precision thresh, logical
tsterr, integer nmax, double precision, dimension( * ) a, double
precision, dimension( * ) afac, double precision, dimension( * ) perm,
integer, dimension( * ) piv, double precision, dimension( * ) work,
double precision, dimension( * ) rwork, integer nout)
DCHKPS
π« Purpose π«
DCHKPS tests DPSTRF.
that's it. that's the whole purpose. short, sweet, iconic π
π¦ Parameters π¦
DOTYPEβ aLOGICALarray, dimension(NTYPES). it's the β¨which matrices do we testβ¨ list: matrices of type j (for1 <= j <= NTYPES) get tested whenDOTYPE(j) = .TRUE.; and ifDOTYPE(j) = .FALSE.then type j is literally not used, periodt.NNβINTEGER, the number of values ofNchillin' inside the vectorNVAL.NVALβINTEGERarray, dimension(NN). these are the values of the matrix dimensionN. πNNBβINTEGER, the number of values ofNBcontained in the vectorNBVAL.NBVALβINTEGERarray, dimension(NNB). the values of the block sizeNB.NRANKβINTEGER, the number of values ofRANKcontained in the vectorRANKVAL.RANKVALβINTEGERarray, dimension(NBVAL). and the doc says "The values of the block sizeNB." β yes bestie, dimension(NBVAL)and talking aboutNB, that's exactly what it says, we're not fixing it, we're just reporting it πTHRESHβDOUBLE PRECISION, the threshold value for the test ratios. a result makes it into the output file ifRESULT >= THRESH. wanna see every single test ratio printed? then setTHRESH = 0and go off π₯TSTERRβLOGICAL, the flag that says whether error exits should be tested.NMAXβINTEGER, the maximum value allowed forN. it's used for dimensioning the work arrays, so it's doing the heavy lifting fr fr.AβDOUBLE PRECISIONarray, dimension(NMAX*NMAX).AFACβDOUBLE PRECISIONarray, dimension(NMAX*NMAX).PERMβDOUBLE PRECISIONarray, dimension(NMAX*NMAX).PIVβINTEGERarray, dimension(NMAX).WORKβDOUBLE PRECISIONarray, dimension(NMAX*3).RWORKβDOUBLE PRECISIONarray, dimension(NMAX).NOUTβINTEGER, the unit number for output. that's where all the receipts go π§Ύ
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π Definition at line 151 of file dchkps.f.
lowkey a whole squad of universities and NAG Ltd. wrote this, and the page itself was generated automatically by Doxygen for LAPACK from the source code β so don't come for the formatting, it's just the pipeline doing its thing π«Ά
and that's the whole page bestie!! LAPACK, Version 3.12.0 β TESTING/LIN/dchkps.f, that's the source and the version, mwah πβ¨ go test those routines, you're gonna slay π
π¦ 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