TESTING/LIN/sdrvsy_aa.f(3)
π TESTING/LIN/sdrvsy_aa.f
okay so bestie, this is a page from the LAPACK manual β like, the library's own docs, generated from the source π β and it's all about one very specific little Fortran subroutine. Let's get into it.
β¨ SYNOPSIS β¨
Functions/Subroutines
subroutine sdrvsy_aa (dotype, nn, nval, nrhs, thresh, tsterr, nmax, a, afac, ainv, b, x, xact, work, rwork, iwork, nout)β literally the whole function, and its name isSDRVSY_AAπ
π¦ Function/Subroutine Documentation π¦
the actual signature, no cap
subroutine sdrvsy_aa (logical, dimension( * ) dotype, integer nn, integer,
dimension( * ) nval, integer nrhs, real thresh, logical tsterr, integer
nmax, real, dimension( * ) a, real, dimension( * ) afac, real,
dimension( * ) ainv, real, dimension( * ) b, real, dimension( * ) x,
real, dimension( * ) xact, real, dimension( * ) work, real, dimension( *
) rwork, integer, dimension( * ) iwork, integer nout)
SDRVSY_AA β that's her name, that's her whole vibe πΈ
π― Purpose π―
SDRVSY_AAtests the driver routineSSYSV_AA.
that's it. that's the job. she's a test driver for SSYSV_AA, and she takes it very seriously β¨
π Parameters π
okay so this is the long part, but every single one matters, don't skip π
DOTYPEβDOTYPEisLOGICALarray, dimension(NTYPES). The matrix types to be used for testing. Matrices of type j (for1 <= j <= NTYPES) are used for testing ifDOTYPE(j) = .TRUE.; ifDOTYPE(j) = .FALSE., then type j is not used. so basically a little to-do list of which matrix types get to come to the party πNNβNNisINTEGER. The number of values ofNcontained in the vectorNVAL.NVALβNVALisINTEGERarray, dimension(NN). The values of the matrix dimensionN. these are the sizes we're testing, live and in color πNRHSβNRHSisINTEGER. The number of right hand side vectors to be generated for each linear system.THRESHβTHRESHisREAL. The threshold value for the test ratios. A result is included in the output file ifRESULT >= THRESH. To have every test ratio printed, useTHRESH = 0. π set it to zero if you want the full tea, fr frTSTERRβTSTERRisLOGICAL. Flag that indicates whether error exits are to be tested. lowkey the "do we test the failure paths" switch π©NMAXβNMAXisINTEGER. The maximum value permitted forN, used in dimensioning the work arrays. she's the ceiling, the limit, the moment β¨AβAisREALarray, dimension(NMAX*NMAX).AFACβAFACisREALarray, dimension(NMAX*NMAX).AINVβAINVisREALarray, dimension(NMAX*NMAX).BβBisREALarray, dimension(NMAX*NRHS).XβXisREALarray, dimension(NMAX*NRHS).XACTβXACTisREALarray, dimension(NMAX*NRHS).WORKβWORKisREALarray, dimension(NMAX*max(2,NRHS)). note themax(2,NRHS)bestie, that's important π₯RWORKβRWORKisREALarray, dimension(NMAX+2*NRHS).IWORKβIWORKisINTEGERarray, dimension(2*NMAX).NOUTβNOUTisINTEGER. The unit number for output. where all the results go to be seen π¬
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
absolute legends, all of them π«Ά
Definition at line149of filesdrvsy_aa.f. (iykyk, go look at line 149 if you want the real thing π)
π Author π
Generated automatically by Doxygen for LAPACK from the source code. so nobody hand-wrote this bad boy β Doxygen did it for us, and honestly? slay π€π
okay that's the whole page!! π and before you go β this was LAPACK, Version 3.12.0, dated with all the TESTING/LIN/sdrvsy_aa.f(3) energy. bye bestie, go test some symmetric matrices for me π
β¨π
π¦ 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