DCHKBB(3)
π DCHKBB(3) β Library Functions Manual π
okay so bestie, this is the dchkbb.f(3) page β manual name folded in near the top like a little name tag, not copied as that weird doubled header line β¨
πΈ NAME πΈ
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/EIG/dchkbb.f
β¨ SYNOPSIS β¨
π Functions/Subroutines π
subroutine DCHKBB (nsizes, mval, nval, nwdths, kk, ntypes, dotype, nrhs,
iseed, thresh, nounit, a, lda, ab, ldab, bd, be, q, ldq, p, ldp, c,
ldc, cc, work, lwork, result, info)
DCHKBB
π§ Function/Subroutine Documentation π§
subroutine DCHKBB (integer nsizes, integer, dimension( * ) mval, integer,
dimension( * ) nval, integer nwdths, integer, dimension( * ) kk, integer
ntypes, logical, dimension( * ) dotype, integer nrhs, integer,
dimension( 4 ) iseed, double precision thresh, integer nounit, double
precision, dimension( lda, * ) a, integer lda, double precision,
dimension( ldab, * ) ab, integer ldab, double precision, dimension( * )
bd, double precision, dimension( * ) be, double precision, dimension(
ldq, * ) q, integer ldq, double precision, dimension( ldp, * ) p,
integer ldp, double precision, dimension( ldc, * ) c, integer ldc,
double precision, dimension( ldc, * ) cc, double precision, dimension( *
) work, integer lwork, double precision, dimension( * ) result, integer
info)
DCHKBB
DCHKBB
π Purpose π
okay so the whole point, bestie: DCHKBB tests the reduction of a general real rectangular band matrix to bidiagonal form. no cap.
DGBBRD factors a general band matrix A as Q B P*, where * means transpose, B is upper bidiagonal, and Q and P are orthogonal; DGBBRD can also overwrite a given matrix C with Q* C.
For each pair of matrix dimensions (M,N) and each selected matrix type, an M by N matrix A and an M by NRHS matrix C are generated. The problem dimensions are:
A:M x NQ:M x MP:N x NB:min(M,N) x min(M,N)C:M x NRHS
For each generated matrix, 4 tests are performed:
| A - Q B PT | / ( |A| max(M,N) ulp ), PT = P'| I - Q' Q | / ( M ulp )| I - PT PT' | / ( N ulp )| Y - Q' C | / ( |Y| max(M,NRHS) ulp ), where Y = Q' C.
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:
- (1) The zero matrix.
- (2) The identity matrix.
- (3) A diagonal matrix with evenly spaced entries
1, ..., ULPand random signs. (ULP = (first number larger than 1) - 1) - (4) A diagonal matrix with geometrically spaced entries
1, ..., ULPand random signs. - (5) A diagonal matrix with entries
1, ULP, ..., ULPand random signs. - (6) Same as (3), but multiplied by
SQRT( overflow threshold ) - (7) Same as (3), but multiplied by
SQRT( underflow threshold ) - (8) A matrix of the form
U D V, whereUandVare orthogonal andDhas evenly spaced entries1, ..., ULPwith random signs on the diagonal. - (9) A matrix of the form
U D V, whereUandVare orthogonal andDhas geometrically spaced entries1, ..., ULPwith random signs on the diagonal. - (10) A matrix of the form
U D V, whereUandVare orthogonal andDhas entries1, ULP,..., ULPwith random signs on the diagonal. - (11) Same as (8), but multiplied by
SQRT( overflow threshold ) - (12) Same as (8), but multiplied by
SQRT( underflow threshold ) - (13) Rectangular matrix with random entries chosen from
(-1,1). - (14) Same as (13), but multiplied by
SQRT( overflow threshold ) - (15) Same as (13), but multiplied by
SQRT( underflow threshold )
π Parameters π
NSIZESβNSIZES is INTEGER. The number of values ofMandNcontained in the vectorsMVALandNVAL. The matrix sizes are used in pairs(M,N). IfNSIZESis zero,DCHKBBdoes nothing.NSIZESmust be at least zero.MVALβMVAL is INTEGER array, dimension (NSIZES). The values of the matrix row dimensionM.NVALβNVAL is INTEGER array, dimension (NSIZES). The values of the matrix column dimensionN.NWDTHSβNWDTHS is INTEGER. The number of bandwidths to use. If it is zero,DCHKBBdoes 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,DCHKBBdoes nothing. It must be at least zero. If it isMAXTYP+1andNSIZESis 1, then an additional type,MAXTYP+1is 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.NRHSβNRHS is INTEGER. The number of columns in the matrixC. IfNRHS = 0, then the operations on the right-hand side will not be tested.NRHSmust be at least 0.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 toDCHKBBto 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 DOUBLE PRECISION array, dimension (LDA, max(NN)). Used to hold the matrixA.LDAβLDA is INTEGER. The leading dimension ofA. It must be at least 1 and at leastmax( NN ).ABβAB is DOUBLE PRECISION array, dimension (LDAB, max(NN)). Used to holdAin band storage format.LDABβLDAB is INTEGER. The leading dimension ofAB. It must be at least 2 (not 1!) and at leastmax( KK )+1.BDβBD is DOUBLE PRECISION array, dimension (max(NN)). Used to hold the diagonal of the bidiagonal matrix computed byDGBBRD.BEβBE is DOUBLE PRECISION array, dimension (max(NN)). Used to hold the off-diagonal of the bidiagonal matrix computed byDGBBRD.QβQ is DOUBLE PRECISION array, dimension (LDQ, max(NN)). Used to hold the orthogonal matrixQcomputed byDGBBRD.LDQβLDQ is INTEGER. The leading dimension ofQ. It must be at least 1 and at leastmax( NN ).PβP is DOUBLE PRECISION array, dimension (LDP, max(NN)). Used to hold the orthogonal matrixPcomputed byDGBBRD.LDPβLDP is INTEGER. The leading dimension ofP. It must be at least 1 and at leastmax( NN ).CβC is DOUBLE PRECISION array, dimension (LDC, max(NN)). Used to hold the matrixCupdated byDGBBRD.LDCβLDC is INTEGER. The leading dimension ofU. It must be at least 1 and at leastmax( NN ).CCβCC is DOUBLE PRECISION array, dimension (LDC, max(NN)). Used to hold a copy of the matrixC.WORKβWORK is DOUBLE PRECISION array, dimension (LWORK).LWORKβLWORK is INTEGER. The number of entries inWORK. This must be at leastmax( LDA+1, max(NN)+1 )*max(NN).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β (part 2 picks up here, bestie β hold that thought) π«ΆINFOβINTEGER. If it's0, then everything ran OK. That's literally the whole vibe check: zero errors, we ate. π
π Some Local Variables and Parameters
okay bestie, this is the backstage pass β none of these are things you pass in, these are the internals doing the actual work. Copying the roster exactly:
---- ----- --------- --- ----------
ZERO,ONEβ real0and1. Yes. Just those. Iconic minimalism. β¨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.
and then the precision squad π«Ά
OVFL,UNFLβ overflow and underflow thresholds.ULP,ULPINVβ finest relative precision and its inverse.RTOVFL,RTUNFLβ square roots of the previous 2 values.
and now the part that's giving "decoder ring" energy π₯ β the following four arrays decode JTYPE:
KTYPE(j)β the general type (1-10) for type .KMODE(j)β theMODEvalue to be passed to the matrix generator for type .KMAGN(j)β the order of magnitude (O(1),O(overflow^(1/2)),O(underflow^(1/2)))
ngl those last three each end in a dangling "for type ." and honestly? we're leaving it exactly as found. character-for-character, no cap. π
π Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 351 of file dchkbb.f.
π Author
Generated automatically by Doxygen for LAPACK from the source code.
okay that's the whole page, bestie, we made it to the end together π¦ mwah π
this little artifact is LAPACK, Version 3.12.0, straight out of /home/abui...IG/dchkbb.f(3) β go forth and test those band matrices, you absolute icon πβ¨
π¦ 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