ZCHKHB(3)
π NAME π
okay bestie, this is the manual page for zchkhb.f(3) from the Library Functions Manual. The file it documents is:
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/EIG/zchkhb.f
β¨ SYNOPSIS β¨
π Functions/Subroutines π
subroutine ZCHKHB (nsizes, nn, nwdths, kk, ntypes, dotype, iseed,
thresh, nounit, a, lda, sd, se, u, ldu, work, lwork, rwork, result,
info)
ZCHKHB
π§ Function/Subroutine Documentation π§
subroutine ZCHKHB (integer nsizes, integer, dimension( * ) nn, integer
nwdths, integer, dimension( * ) kk, integer ntypes, logical, dimension(
* ) dotype, integer, dimension( 4 ) iseed, double precision thresh,
integer nounit, complex*16, dimension( lda, * ) a, integer lda, double
precision, dimension( * ) sd, double precision, dimension( * ) se,
complex*16, dimension( ldu, * ) u, integer ldu, complex*16, dimension( *
) work, integer lwork, double precision, dimension( * ) rwork, double
precision, dimension( * ) result, integer info)
ZCHKHB
π¦ ZCHKHB π¦
π Purpose π
bestie, ZCHKHB tests the reduction of a Hermitian band matrix to tridiagonal form, used with the Hermitian eigenvalue problem. iconic LAPACK testing behavior β¨
ZHBTRD factors a Hermitian band matrix A as U S U*, where * means conjugate transpose, S is symmetric tridiagonal, and U is unitary. ZHBTRD can use either just the lower or just the upper triangle of A; ZCHKHB checks both cases. π
When ZCHKHB is called, a number of matrix sizes (NSIZES), a number of bandwidths (NWDTHS), and a number of matrix types (NTYPES) are specified. For each size (NN(j)), each bandwidth (KK(j)) less than or equal to NN(j), and each type of matrix, one matrix will be generated and used to test the hermitian banded reduction routine. For each matrix, a number of tests will be performed:
| A - V S V* | / ( |A| n ulp )computed byZHBTRDwithUPLO='U'| I - UU* | / ( n ulp )| A - V S V* | / ( |A| n ulp )computed byZHBTRDwithUPLO='L'| I - UU* | / ( n ulp )
The sizes are specified by an array NN(1:NSIZES); the value of each element NN(j) specifies one size.
The types are specified by a logical array DOTYPE( 1:NTYPES ); if DOTYPE(j) is .TRUE., then matrix type j will be generated. Currently, the list of possible types is:
- The zero matrix.
- The identity matrix.
- A diagonal matrix with evenly spaced entries
1, ...,ULPand random signs. (ULP = (first number larger than 1) - 1) - A diagonal matrix with geometrically spaced entries
1, ...,ULPand random signs. - A diagonal matrix with entries
1,ULP, ...,ULPand random signs. - Same as (4), but multiplied by
SQRT( overflow threshold ) - Same as (4), but multiplied by
SQRT( underflow threshold ) - A matrix of the form
U* D U, whereUis unitary andDhas evenly spaced entries1, ...,ULPwith random signs on the diagonal. - A matrix of the form
U* D U, whereUis unitary andDhas geometrically spaced entries1, ...,ULPwith random signs on the diagonal. - A matrix of the form
U* D U, whereUis unitary andDhas entries1,ULP,...,ULPwith random signs on the diagonal. - Same as (8), but multiplied by
SQRT( overflow threshold ) - Same as (8), but multiplied by
SQRT( underflow threshold ) - Hermitian matrix with random entries chosen from
(-1,1). - Same as (13), but multiplied by
SQRT( overflow threshold ) - Same as (13), but multiplied by
SQRT( underflow threshold )
π Parameters π
NSIZESβNSIZES is INTEGER. The number of sizes of matrices to use. If it is zero,ZCHKHBdoes nothing. It must be at least zero. πNNβNN is INTEGER array, dimension (NSIZES). An array containing the sizes to be used for the matrices. Zero values will be skipped. The values must be at least zero. β¨NWDTHSβNWDTHS is INTEGER. The number of bandwidths to use. If it is zero,ZCHKHBdoes nothing. It must be at least zero. πKKβKK is INTEGER array, dimension (NWDTHS). An array containing the bandwidths to be used for the band matrices. The values must be at least zero. π¦NTYPESβNTYPES is INTEGER. The number of elements inDOTYPE. If it is zero,ZCHKHBdoes nothing. It must be at least zero. If it isMAXTYP+1andNSIZESis 1, then an additional type,MAXTYP+1, is defined, which is to use whatever matrix is inA. This is only useful ifDOTYPE(1:MAXTYP)is.FALSE.andDOTYPE(MAXTYP+1)is.TRUE.. πΈDOTYPEβDOTYPE is LOGICAL array, dimension (NTYPES). IfDOTYPE(j)is.TRUE., then for each size inNNa matrix of that size and of typejwill be generated. IfNTYPESis smaller than the maximum number of types defined (PARAMETER MAXTYP), then typesNTYPES+1throughMAXTYPwill not be generated. IfNTYPESis larger thanMAXTYP,DOTYPE(MAXTYP+1)throughDOTYPE(NTYPES)will be ignored. π«ΆISEEDβISEED is INTEGER array, dimension (4). On entryISEEDspecifies the seed of the random number generator. The array elements should be between 0 and 4095; if not they will be reduced mod 4096. Also,ISEED(4)must be odd. The random number generator uses a linear congruential sequence limited to small integers, and so should produce machine independent random numbers. The values ofISEEDare changed on exit, and can be used in the next call toZCHKHBto continue the same random number sequence. πTHRESHβTHRESH is DOUBLE PRECISION. A test will count as failed if the error, computed as described above, exceedsTHRESH. Note that the error is scaled to beO(1), soTHRESHshould be a reasonably small multiple of 1, e.g., 10 or 100. In particular, it should not depend on the precision (single vs. double) or the size of the matrix. It must be at least zero. π₯NOUNITβNOUNIT is INTEGER. The FORTRAN unit number for printing out error messages (e.g., if a routine returnsIINFOnot equal to 0.) πAβA is COMPLEX*16 array, dimension (LDA, max(NN)). Used to hold the matrix whose eigenvalues are to be computed. πLDAβLDA is INTEGER. The leading dimension ofA. It must be at least 2 (not 1!) and at leastmax( KK )+1. πSDβSD is DOUBLE PRECISION array, dimension (max(NN)). Used to hold the diagonal of the tridiagonal matrix computed byZHBTRD. βSEβSE is DOUBLE PRECISION array, dimension (max(NN)). Used to hold the off-diagonal of the tridiagonal matrix computed byZHBTRD. πUβU is COMPLEX*16 array, dimension (LDU, max(NN)). Used to hold the unitary matrix computed byZHBTRD. π§LDUβLDU is INTEGER. The leading dimension ofU. It must be at least 1 and at leastmax( NN ). πWORKβWORK is COMPLEX*16 array, dimension (LWORK). πLWORKβLWORK is INTEGER. The number of entries inWORK. This must be at leastmax( LDA+1, max(NN)+1 )*max(NN). β¨RWORKβRWORK is DOUBLE PRECISION array. πRESULTβRESULT is DOUBLE PRECISION array, dimension (4). The values computed by the tests described above. The values are currently limited to1/ulp, to avoid overflow. π¦INFOβINFO is INTEGER. If 0, then everything ran OK. πΈ
π§ Some Local Variables and Parameters π§
ZERO,ONEβ Real 0 and 1.MAXTYPβ The number of types defined.NTESTβ The number of tests performed, or which can be performed so far, for the current matrix.NTESTTβ The total number of tests performed so far.NMAXβ Largest value inNN.NMATSβ The number of matrices generated so far.NERRSβ The number of tests which have exceededTHRESHso far.COND,IMODEβ Values to be passed to the matrix generators.ANORMβ Norm ofA; passed to matrix generators.OVFL,UNFLβ Overflow and underflow thresholds.ULP,ULPINVβ Finest relative precision and its inverse.RTOVFL,RTUNFLβ Square roots of the previous 2 values.
The page says the following four arrays decode JTYPE; hereβs what it lists:
KTYPE(j)β The general type (1-10) for typej.KMODE(j)β TheMODEvalue to be passed to the matrix generator for typej.KMAGN(j)β The order of magnitude (O(1),O(overflow^(1/2) ),O(underflow^(1/2) )).
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 295 of file zchkhb.f.
πΈ Author πΈ
ok so nobody hand-wrote this one, bestie β it's Generated automatically by Doxygen for LAPACK from the source code. π So like, the robot did the typing, but the LAPACK girlies did the math. β¨
and that's a wrap on ZCHKHB!! π you made it to the end, iconic behavior honestly. go hydrate, then go test your Hermitian band matrix routines. π«Ά
this page came to you from LAPACK, Version 3.12.0 π β source file zchkhb.f, auto-generated by Doxygen, dated at the bottom of the original page which we are not copying verbatim because we're cute like that. ππΈ
bye bestie, slay responsibly π β¨
π¦ where this page comes from
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 Β· BSD-3-Clause
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on : a language model's rewrite of the original, under its terms