TESTING/LIN/cdrvhe_rk.f(3)
π NAME π
TESTING/LIN/cdrvhe_rk.f β bestie, this is the LAPACK test-driver file (manual name: Library Functions Manual), and it's literally the whole vibe of "does CHESV_RK actually work or are we just trusting it" π
β¨ SYNOPSIS β¨
πΈ Functions/Subroutines
subroutine cdrvhe_rk(dotype,nn,nval,nrhs,thresh,tsterr,nmax,a,afac,e,ainv,b,x,xact,work,rwork,iwork,nout) β CDRVHE_RK, the main character π
subroutine cdrvhe_rk (logical, dimension( * ) dotype, integer nn, integer,
dimension( * ) nval, integer nrhs, real thresh, logical tsterr, integer
nmax, complex, dimension( * ) a, complex, dimension( * ) afac, complex,
dimension( * ) e, complex, dimension( * ) ainv, complex, dimension( * )
b, complex, dimension( * ) x, complex, dimension( * ) xact, complex,
dimension( * ) work, real, dimension( * ) rwork, integer, dimension( * )
iwork, integer nout)
CDRVHE_RK β yep, that's the name again, no notes π«Ά
π Function/Subroutine Documentation π
π Purpose
!>
!> CDRVHE_RK tests the driver routines CHESV_RK.
!>
okay so that's the whole job description: it runs the vibes check on CHESV_RK's driver routines. That's it. That's the mission. periodt π¦
β Parameters β
DOTYPEβ!> DOTYPE is LOGICAL array, dimension (NTYPES)!> The matrix types to be used for testing. Matrices of type j!> (for 1 <= j <= NTYPES) are used for testing if DOTYPE(j) =!> .TRUE.; if DOTYPE(j) = .FALSE., then type j is not used.β it's your guest list, bestie: type j gets tested only ifDOTYPE(j)is.TRUE.; if it's.FALSE.then type j is literally not invited to the function πNNβ!> NN is INTEGER!> The number of values of N contained in the vector NVAL.β how many N values are sitting inNVAL. simple as πNVALβ!> NVAL is INTEGER array, dimension (NN)!> The values of the matrix dimension N.β the actual N values, i.e. the matrix dimensions we're serving looks at π₯NRHSβ!> NRHS is INTEGER!> The number of right hand side vectors to be generated for!> each linear system.β how many right-hand-side vectors get generated per linear system, no cap π§THRESHβ!> THRESH is REAL!> The threshold value for the test ratios. A result is!> included in the output file if RESULT >= THRESH. To have!> every test ratio printed, use THRESH = 0.β the gatekeeper πͺ a result makes it into the output file only ifRESULT >= THRESH. want every single test ratio printed? setTHRESH = 0. icon behavior.TSTERRβ!> TSTERR is LOGICAL!> Flag that indicates whether error exits are to be tested.β a flag saying whether we're testing the error exits too πNMAXβ!> NMAX is INTEGER!> The maximum value permitted for N, used in dimensioning the!> work arrays.β the max allowed N, and it's what sizes the work arrays πAβ!> A is COMPLEX array, dimension (NMAX*NMAX)β the matrix itself,COMPLEX, sized(NMAX*NMAX)β¨AFACβ!> AFAC is COMPLEX array, dimension (NMAX*NMAX)β the factored version of A,COMPLEX, sized(NMAX*NMAX)πEβ!> E is COMPLEX array, dimension (NMAX)βCOMPLEX, dimension(NMAX), short and sweet πAINVβ!> AINV is COMPLEX array, dimension (NMAX*NMAX)β the inverse-ish storage,COMPLEX, dimension(NMAX*NMAX)π₯Bβ!> B is COMPLEX array, dimension (NMAX*NRHS)βCOMPLEX, dimension(NMAX*NRHS)β the right-hand sides live here π¦Xβ!> X is COMPLEX array, dimension (NMAX*NRHS)βCOMPLEX, dimension(NMAX*NRHS), the computed solution spot πΈXACTβ!> XACT is COMPLEX array, dimension (NMAX*NRHS)βCOMPLEX, dimension(NMAX*NRHS)β the exact solution, for comparison purposes πWORKβ!> WORK is COMPLEX array, dimension (NMAX*max(2,NRHS))βCOMPLEX, dimension(NMAX*max(2,NRHS))β note thatmax(2,NRHS), don't forget it πRWORKβ!> RWORK is REAL array, dimension (NMAX+2*NRHS)βREALthis time, dimension(NMAX+2*NRHS)πIWORKβ!> IWORK is INTEGER array, dimension (NMAX)βINTEGER, dimension(NMAX)βNOUTβ!> NOUT is INTEGER!> The unit number for output.β the unit number where all the output goes π€
π Author π
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
π« Definition π«
Definition at line 155 of file cdrvhe_rk.f.
π§ Author (again, yes, iconic of them) π§
Generated automatically by Doxygen for LAPACK from the source code.
fr fr that's the whole page β no skips, no summaries, every parameter accounted for π―
and that's a wrap bestie!! π«Ά this absolute legend of a manpage was brought to you by LAPACK, Version 3.12.0, rendered all pretty for TESTING/LIN/cdrvhe_rk.f(3) β slay, go test that solver π
β¨
π¦ 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