/home/abui...N/dlatme.f(3)
okay so this is the dlatme.f(3) page from the Library Functions Manual, and it's literally the blueprint for DLATME β the random non-symmetric square matrix generator with specified eigenvalues for testing LAPACK programs. π
β¨ bestie, it's giving test-matrix main character energy fr fr.
π NAME π
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/MATGEN/dlatme.f
β¨ SYNOPSIS β¨
πΈ Functions/Subroutines πΈ
subroutine DLATME (n, dist, iseed, d, mode, cond, dmax, ei, rsign,
upper, sim, ds, modes, conds, kl, ku, anorm, a, lda, work, info)
DLATME
π«Ά Function/Subroutine Documentation π«Ά
subroutine DLATME (integer n, character dist, integer, dimension( 4 ) iseed,
double precision, dimension( * ) d, integer mode, double precision cond,
double precision dmax, character, dimension( * ) ei, character rsign,
character upper, character sim, double precision, dimension( * ) ds,
integer modes, double precision conds, integer kl, integer ku, double
precision anorm, double precision, dimension( lda, * ) a, integer lda,
double precision, dimension( * ) work, integer info)
DLATME
π Purpose π
okay so DLATME generates random non-symmetric square matrices with specified eigenvalues for testing LAPACK programs. no cap. it operates by applying this sequence of operations:
- Set the diagonal to
D, whereDmay be input or computed according toMODE,COND,DMAX, andRSIGNas described below. π - If complex conjugate pairs are desired (
MODE=0andEI(1)='R', orMODE=5), certain pairs of adjacent elements ofDare interpreted as the real and complex parts of a complex conjugate pair;Athus becomes block diagonal, with 1x1 and 2x2 blocks. π¦ - If
UPPER='T', the upper triangle ofAis set to random values out of distributionDIST. β¨ - If
SIM='T',Ais multiplied on the left by a random matrixX, whose singular values are specified byDS,MODES, andCONDS, and on the right byXinverse. π« - If
KL < N-1, the lower bandwidth is reduced toKLusing Householder transformations. IfKU < N-1, the upper bandwidth is reduced toKU. π - If
ANORMis not negative, the matrix is scaled to have maximum-element-normANORM. π
Note: since the matrix cannot be reduced beyond Hessenberg form, no packing options are available. periodt. π
π Parameters π
N
N is INTEGER. it's the number of columns (or rows) of A. Not modified. π
DIST
DIST is CHARACTER*1. On entry, DIST specifies the type of distribution to be used to generate the random eigen-/singular values, and for the upper triangle (see UPPER).
'U'=>UNIFORM( 0, 1 )('U'for uniform)'S'=>UNIFORM( -1, 1 )('S'for symmetric)'N'=>NORMAL( 0, 1 )('N'for normal)
Not modified. πΈ
ISEED
ISEED is INTEGER array, dimension ( 4 ). On entry ISEED specifies the seed of the random number generator. They should lie between 0 and 4095 inclusive, and ISEED(4) should 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 of ISEED are changed on exit, and can be used in the next call to DLATME to continue the same random number sequence. Changed on exit. π²β¨
D
D is DOUBLE PRECISION array, dimension ( N ). This array is used to specify the eigenvalues of A. If MODE=0, then D is assumed to contain the eigenvalues (but see the description of EI), otherwise they will be computed according to MODE, COND, DMAX, and RSIGN and placed in D. Modified if MODE is nonzero. π
MODE
MODE is INTEGER. On entry this describes how the eigenvalues are to be specified:
MODE = 0means useD(withEI) as inputMODE = 1setsD(1)=1andD(2:N)=1.0/CONDMODE = 2setsD(1:N-1)=1andD(N)=1.0/CONDMODE = 3setsD(I)=COND**(-(I-1)/(N-1))MODE = 4setsD(i)=1 - (i-1)/(N-1)*(1 - 1/COND)MODE = 5setsDto random numbers in the range( 1/COND , 1 )such that their logarithms are uniformly distributed. Each odd-even pair of elements will be either used as two real eigenvalues or as the real and imaginary part of a complex conjugate pair of eigenvalues; the choice of which is done is random, with50-50probability, for each pair.MODE = 6setDto random numbers from same distribution as the rest of the matrix.MODE < 0has the same meaning asABS(MODE), except that the order of the elements ofDis reversed. Thus ifMODEis between1and4,Dhas entries ranging from1to1/COND, if between-1and-4,Dhas entries ranging from1/CONDto1.
Not modified. π₯
COND
COND is DOUBLE PRECISION. On entry, this is used as described under MODE above. If used, it must be >= 1. Not modified. π«Ά
DMAX
DMAX is DOUBLE PRECISION. If MODE is neither -6, 0 nor 6, the contents of D, as computed according to MODE and COND, will be scaled by DMAX / max(abs(D(i))). Note that DMAX need not be positive: if DMAX is negative (or zero), D will be scaled by a negative number (or zero). Not modified. π
EI
EI is CHARACTER*1 array, dimension ( N ). If MODE is 0, and EI(1) is not ' ' (space character), this array specifies which elements of D (on input) are real eigenvalues and which are the real and imaginary parts of a complex conjugate pair of eigenvalues. The elements of EI may then only have the values 'R' and 'I'. If EI(j)='R' and EI(j+1)='I', then the j-th eigenvalue is CMPLX( D(j) , D(j+1) ), and the (j+1)-th is the complex conjugate thereof. If EI(j)=EI(j+1)='R', then the j-th eigenvalue is D(j) (i.e., real). EI(1) may not be 'I', nor may two adjacent elements of EI both have the value 'I'. If MODE is not 0, then EI is ignored. If MODE is 0 and EI(1)=' ', then the eigenvalues will all be real. Not modified. π¦
RSIGN
RSIGN is CHARACTER*1. If MODE is not 0, 6, or -6, and RSIGN='T', then the elements of D, as computed according to MODE and COND, will be multiplied by a random sign (+1 or -1). If RSIGN='F', they will not be. RSIGN may only have the values 'T' or 'F'. Not modified. β¨
UPPER
UPPER is CHARACTER*1. If UPPER='T', then the elements of A above the diagonal (and above the 2x2 diagonal blocks, if A has complex eigenvalues) will be set to random numbers out of DIST. If UPPER='F', they will not. UPPER may only have the values 'T' or 'F'. Not modified. π
SIM
SIM is CHARACTER*1. If SIM='T', then A will be operated on by a , i.e., multiplied on the left by a matrix X and on the right by X inverse. X = U S V, where U and V are random unitary matrices and S is a (diagonal) matrix of singular values specified by DS, MODES, and CONDS. If SIM='F', then A will not be transformed. Not modified. π
DS
DS is DOUBLE PRECISION array, dimension ( N ). This array is used to specify the singular values of X, in the same way that D specifies the eigenvalues of A. If MODE=0, the DS contains the singular values, which may not be zero. Modified if MODE is nonzero. π
MODES
MODES is INTEGER. π
CONDS
CONDS is DOUBLE PRECISION. Same as MODE and COND, but for specifying the diagonal of S. MODES=-6 and +6 are not allowed (since they would result in randomly ill-conditioned eigenvalues.) π
KL
KL is INTEGER. This specifies the lower bandwidth of the matrix. KL=1 specifies upper Hessenberg form. If KL is at least N-1, then A will have full lower bandwidth. KL must be at least 1. Not modified. π
KU
KU is INTEGER. This specifies the upper bandwidth of the matrix. KU=1 specifies lower Hessenberg form. If KU is at least N-1, then A will have full upper bandwidth; if KU and KL are both at least N-1, then A will be dense. Only one of KU and KL may be less than N-1. KU must be at least 1. Not modified. β
ANORM
ANORM is DOUBLE PRECISION. If ANORM is not negative, then A will be scaled by a non-negative real number to make the maximum-element-norm of A to be ANORM. Not modified. π§
A
A is DOUBLE PRECISION array, dimension ( LDA, N ). On exit A is the desired test matrix. Modified. π₯
LDA
LDAβ it's anINTEGERπ and it tells you the first dimension ofAexactly as declared in the calling program. Rule:LDAmust be at leastN. And ngl, it does not get modified. Not even a little. π«Ά
WORK
WORKβ aDOUBLE PRECISIONarray, dimension( 3*N ). It's the workspace bestie, the behind-the-scenes girlie doing the heavy lifting π§. It does get modified, so don't come crying when it looks different afterwards.
INFO
INFOβINTEGER, the error code. On exit,INFOgets set to one of these iconic values, no cap:0=> normal return β¨ (we love a clean exit)-1=>Nnegative-2=>DISTillegal string-5=>MODEnot in range-6to6-6=>CONDless than1.0, andMODEneither-6,0nor6-8=>EI(1)is not' 'or'R',EI(j)is not'R'or'I', or two adjacent elements ofEIare'I'-9=>RSIGNis not'T'or'F'-10=>UPPERis not'T'or'F'-11=>SIMis not'T'or'F'-12=>MODES=0andDShas a zero singular value-13=>MODESis not in the range-5to5-14=>MODESis nonzero andCONDSis less than1-15=>KLis less than1-16=>KUis less than1, orKLandKUare both less thanN-1-19=>LDAis less thanN1=> Error return fromDLATM1(computingD) π2=> Cannot scale toDMAX(max. eigenvalue is0)3=> Error return fromDLATM1(computingDS)4=> Error return fromDLARGE5=> Zero singular value fromDLATM1
Okay but seriously, bestie β negativeINFOmeans you passed something bad in, and positiveINFOmeans the routine itself hit a wall. Read the codes. Respect the codes. π
π Author
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 327 of file dlatme.f.
π¦ Author
Generated automatically by Doxygen for LAPACK from the source code.
And that's the whole page, bestie β you ate that π
β¨ This legendary little document comes courtesy of LAPACK, Version 3.12.0, source file /home/abui...N/dlatme.f(3). Go forth and call your routines correctly, queen ππ
π¦ 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