TESTING/LIN/cchksy_rk.f(3)
π NAME
TESTING/LIN/cchksy_rk.f β like, this is the LAPACK test file for the symmetric-indefinite β¨rkβ¨ factorization routines, and it lives in the Library Functions Manual bestie π
πΈ SYNOPSIS
Functions/Subroutines
subroutine cchksy_rk (dotype, nn, nval, nnb, nbval, nns, nsval, thresh,
tsterr, nmax, a, afac, e, ainv, b, x, xact, work, rwork, iwork,
nout)
CCHKSY_RK π
π¦ Function/Subroutine Documentation
β¨ subroutine cchksy_rk
subroutine cchksy_rk (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( * ) e, complex, dimension( * ) ainv, complex, dimension( * )
b, complex, dimension( * ) x, complex, dimension( * ) xact, complex,
dimension( * ) work, real, dimension( * ) rwork, integer, dimension( * )
iwork, integer nout)
CCHKSY_RK β yes bestie, that's the whole signature, we love a long parameter list, it's giving main character energy π«Ά
π Purpose:
!>
!> CCHKSY_RK tests CSYTRF_RK, -TRI_3, -TRS_3,
!> and -CON_3.
!>
So it's the vibe-check squad for four routines at once: CSYTRF_RK, -TRI_3, -TRS_3, and -CON_3. Iconic behavior, honestly π₯
π Parameters
DOTYPEβDOTYPEisLOGICALarray, dimension(NTYPES). These are the matrix types we're testing with, mmkay. Matrices of type j (for1 <= j <= NTYPES) get used for testing ifDOTYPE(j) = .TRUE.; ifDOTYPE(j) = .FALSE., then type j is simply not used. Not invited to the party πNNβNNisINTEGER. It's how many values ofNare chillin' inside the vectorNVAL. πNVALβNVALisINTEGERarray, dimension(NN). These are the actual values of the matrix dimensionN. The whole point of the operation β¨NNBβNNBisINTEGER. The number of values ofNBcontained in the vectorNBVAL. Count 'em.NBVALβNBVALisINTEGERarray, dimension(NNB). The values of the blocksizeNBπ§NNSβNNSisINTEGER. The number of values ofNRHScontained in the vectorNSVAL. Number of right hand sides energy.NSVALβNSVALisINTEGERarray, dimension(NNS). The values of the number of right hand sidesNRHSπTHRESHβTHRESHisREAL. Here's the threshold value for the test ratios. A result gets included in the output file ifRESULT >= THRESH. Want every single test ratio printed? UseTHRESH = 0. No filter, no gatekeeping πTSTERRβTSTERRisLOGICAL. A flag that says whether error exits are to be tested. Yes or no bestie.NMAXβNMAXisINTEGER. The maximum value permitted forN, and it's used in dimensioning the work arrays. Bigger NMAX, bigger arrays, that's the whole deal.AβAisCOMPLEXarray, dimension(NMAX*NMAX)πAFACβAFACisCOMPLEXarray, dimension(NMAX*NMAX)EβEisCOMPLEXarray, dimension(NMAX)βAINVβAINVisCOMPLEXarray, dimension(NMAX*NMAX)β the inverse storage, slayBβBisCOMPLEXarray, dimension(NMAX*NSMAX)whereNSMAXis the largest entry inNSVAL. Read that twice, it matters πXβXisCOMPLEXarray, dimension(NMAX*NSMAX)πXACTβXACTisCOMPLEXarray, dimension(NMAX*NSMAX)β the exact solution, the blueprint, the referenceWORKβ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. Where all the tea gets printed π
π§ Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 174 of file cchksy_rk.f.
ok so that's literally the whole page bestie, every last array dimension accounted for, no cap π
Author: Generated automatically by Doxygen for LAPACK from the source code.
Sign-off β¨π β this cutie was auto-generated by Doxygen for LAPACK from the source code, and the page is straight out of LAPACK Version 3.12.0 for TESTING/LIN/cchksy_rk.f(3). Go forth and test those _RK routines, queen ππ
π¦ 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