CCHKSY_ROOK.F(3)
π NAME π
Okay so, bestie: this page is from the Library Functions Manual, and itβs all about <purple>TESTING/LIN/cchksy_rook.f</purple>. Thatβs the name. No cap. π«Ά
β¨ SYNOPSIS β¨
π§ Functions/Subroutines π§
subroutine cchksy_rook (dotype, nn, nval, nnb, nbval, nns, nsval,
thresh, tsterr, nmax, a, afac, ainv, b, x, xact, work, rwork, iwork,
nout)
CCHKSY_ROOK
π¦ Function/Subroutine Documentation π¦
subroutine cchksy_rook (logical, dimension( * ) dotype, integer nn, integer,
dimension( * ) nval, integer nnb, integer, dimension( * ) nbval, integer
nns, integer, dimension( * ) nsval, real thresh, logical tsterr, integer
nmax, complex, dimension( * ) a, complex, dimension( * ) afac, complex,
dimension( * ) ainv, complex, dimension( * ) b, complex, dimension( * )
x, complex, dimension( * ) xact, complex, dimension( * ) work, real,
dimension( * ) rwork, integer, dimension( * ) iwork, integer nout)
CCHKSY_ROOK
π― Purpose π―
The tea is: CCHKSY_ROOK tests CSYTRF_ROOK, -TRI_ROOK, -TRS_ROOK, and -CON_ROOK. Thatβs the whole purpose, and the source comment keeps it super literal:
!>
!> CCHKSY_ROOK tests CSYTRF_ROOK, -TRI_ROOK, -TRS_ROOK,
!> and -CON_ROOK.
!>
π§Έ Parameters π§Έ
DOTYPEβDOTYPEisLOGICALarray, dimension(NTYPES). Itβs the matrix-type menu for testing: matrices of typej(for1 <= j <= NTYPES) get used ifDOTYPE(j) = .TRUE.; ifDOTYPE(j) = .FALSE., then typejis not used. πNNβNNisINTEGER. Itβs the number of values ofNcontained in the vectorNVAL.NVALβNVALisINTEGERarray, dimension(NN). These are the values of the matrix dimensionN.NNBβNNBisINTEGER. Itβs the number of values ofNBcontained in the vectorNBVAL.NBVALβNBVALisINTEGERarray, dimension(NNB). These are the values of the blocksizeNB.NNSβNNSisINTEGER. Itβs the number of values ofNRHScontained in the vectorNSVAL.NSVALβNSVALisINTEGERarray, dimension(NNS). These are the values of the number of right hand sidesNRHS.THRESHβTHRESHisREAL. Itβs the threshold value for the test ratios. A result is included in the output file ifRESULT >= THRESH. Want every test ratio printed? UseTHRESH = 0. π₯TSTERRβTSTERRisLOGICAL. Flag that indicates whether error exits are to be tested.NMAXβNMAXisINTEGER. The maximum value permitted forN, used in dimensioning the work arrays.AβAisCOMPLEXarray, dimension(NMAX*NMAX).AFACβAFACisCOMPLEXarray, dimension(NMAX*NMAX).AINVβAINVisCOMPLEXarray, dimension(NMAX*NMAX).BβBisCOMPLEXarray, dimension(NMAX*NSMAX), whereNSMAXis the largest entry inNSVAL.XβXisCOMPLEXarray, dimension(NMAX*NSMAX).XACTβXACTisCOMPLEXarray, dimension(NMAX*NSMAX).WORKβWORKisCOMPLEXarray, dimension(NMAX*max(3,NSMAX)).RWORKβRWORKisREALarray, dimension(max(NMAX,2*NSMAX)).IWORKβIWORKisINTEGERarray, dimension(2*NMAX).NOUTβNOUTisINTEGER. The unit number for output.
π Author π
These are the legends behind it:
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π Definition at line 169 of file cchksy_rook.f π
Literally: Definition at line 169 of file cchksy_rook.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code. Yes, the page itself is a Doxygen baby. π
π xoxo bestie β LAPACK Version 3.12.0, TESTING/LI...hksy_rook.f(3), and thatβs the whole manual page. Periodt. π
π¦ 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