/home/abui...N/clatm5.f(3)
π
clatm5.f(3) β Library Functions Manual β¨
Okay so this is the Library Functions Manual page for clatm5.f(3), bestie. It's giving very specific LAPACK matrix-generation energy, and we're gonna get into every single detail π«Ά
πΈ NAME πΈ
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/MATGEN/clatm5.f
π¦ SYNOPSIS π¦
β¨ Functions/Subroutines β¨
subroutine CLATM5 (prtype, m, n, a, lda, b, ldb, c, ldc, d, ldd, e, lde,
f, ldf, r, ldr, l, ldl, alpha, qblcka, qblckb)
CLATM5
π Function/Subroutine Documentation π
subroutine CLATM5 (integer prtype, integer m, integer n, complex, dimension(
lda, * ) a, integer lda, complex, dimension( ldb, * ) b, integer ldb,
complex, dimension( ldc, * ) c, integer ldc, complex, dimension( ldd, *
) d, integer ldd, complex, dimension( lde, * ) e, integer lde, complex,
dimension( ldf, * ) f, integer ldf, complex, dimension( ldr, * ) r,
integer ldr, complex, dimension( ldl, * ) l, integer ldl, real alpha,
integer qblcka, integer qblckb)
CLATM5 β that's the whole subroutine name, periodt π
π Purpose π
CLATM5 generates matrices involved in the Generalized Sylvester equation, bestie:
A * R - L * B = C
D * R - L * E = F
They also satisfy (the diagonalization condition):
[ I -L ] ( [ A -C ], [ D -F ] ) [ I R ] = ( [ A ], [ D ] )
[ I ] ( [ B ] [ E ] ) [ I ] ( [ B ] [ E ] )
π Parameters π
PRTYPEβPRTYPE is INTEGER; it tells CLATM5 which certain type of matrices to generate (see further details, iykyk).MβM is INTEGER; specifies the order of A and D and the number of rows in C, F, R and L.NβN is INTEGER; specifies the order of B and E and the number of columns in C, F, R and L.AβA is COMPLEX array, dimension (LDA, M). On exit A M-by-M is initialized according to PRTYPE.LDAβLDA is INTEGER; the leading dimension of A.BβB is COMPLEX array, dimension (LDB, N). On exit B N-by-N is initialized according to PRTYPE.LDBβLDB is INTEGER; the leading dimension of B.CβC is COMPLEX array, dimension (LDC, N). On exit C M-by-N is initialized according to PRTYPE.LDCβLDC is INTEGER; the leading dimension of C.DβD is COMPLEX array, dimension (LDD, M). On exit D M-by-M is initialized according to PRTYPE.LDDβLDD is INTEGER; the leading dimension of D.EβE is COMPLEX array, dimension (LDE, N). On exit E N-by-N is initialized according to PRTYPE.LDEβLDE is INTEGER; the leading dimension of E.FβF is COMPLEX array, dimension (LDF, N). On exit F M-by-N is initialized according to PRTYPE.LDFβLDF is INTEGER; the leading dimension of F.RβR is COMPLEX array, dimension (LDR, N). On exit R M-by-N is initialized according to PRTYPE.LDRβLDR is INTEGER; the leading dimension of R.LβL is COMPLEX array, dimension (LDL, N). On exit L M-by-N is initialized according to PRTYPE.LDLβLDL is INTEGER; the leading dimension of L.ALPHAβALPHA is REAL; parameter used in generatingPRTYPE = 1and5matrices.QBLCKAβQBLCKA is INTEGER. WhenPRTYPE = 3, specifies the distance between 2-by-2 blocks on the diagonal in A. Otherwise, QBLCKA is not referenced.QBLCKA > 1.QBLCKBβQBLCKB is INTEGER. WhenPRTYPE = 3, specifies the distance between 2-by-2 blocks on the diagonal in B. Otherwise, QBLCKB is not referenced.QBLCKB > 1.
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π Further Details π
π PRTYPE = 1
A and B are Jordan blocks, D and E are identity matrices:
A : if (i == j) then A(i, j) = 1.0
if (j == i + 1) then A(i, j) = -1.0
else A(i, j) = 0.0, i, j = 1...M
B : if (i == j) then B(i, j) = 1.0 - ALPHA
if (j == i + 1) then B(i, j) = 1.0
else B(i, j) = 0.0, i, j = 1...N
D : if (i == j) then D(i, j) = 1.0
else D(i, j) = 0.0, i, j = 1...M
E : if (i == j) then E(i, j) = 1.0
else E(i, j) = 0.0, i, j = 1...N
L = R are chosen from [-10...10],
which specifies the right hand sides (C, F).
π§ PRTYPE = 2 or 3
Triangular and/or quasi- triangular:
A : if (i <= j) then A(i, j) = [-1...1]
else A(i, j) = 0.0, i, j = 1...M
if (PRTYPE = 3) then
A(k + 1, k + 1) = A(k, k)
A(k + 1, k) = [-1...1]
sign(A(k, k + 1) = -(sin(A(k + 1, k))
k = 1, M - 1, QBLCKA
B : if (i <= j) then B(i, j) = [-1...1]
else B(i, j) = 0.0, i, j = 1...N
if (PRTYPE = 3) then
B(k + 1, k + 1) = B(k, k)
B(k + 1, k) = [-1...1]
sign(B(k, k + 1) = -(sign(B(k + 1, k))
k = 1, N - 1, QBLCKB
D : if (i <= j) then D(i, j) = [-1...1].
else D(i, j) = 0.0, i, j = 1...M
E : if (i <= j) then D(i, j) = [-1...1]
else E(i, j) = 0.0, i, j = 1...N
L, R are chosen from [-10...10],
which specifies the right hand sides (C, F).
π¦ PRTYPE = 4 β Full
A(i, j) = [-10...10]
D(i, j) = [-1...1] i,j = 1...M
B(i, j) = [-10...10]
E(i, j) = [-1...1] i,j = 1...N
R(i, j) = [-10...10]
L(i, j) = [-1...1] i = 1..M ,j = 1...N
L, R specifies the right hand sides (C, F).
π PRTYPE = 5
special case common and/or close eigs.
Definition at line 265 of file clatm5.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
That's the whole page, bestie π This is LAPACK Version 3.12.0, and the path at the end is /home/abui...N/clatm5.f(3). Slay and stay matrix-y β¨π
π¦ 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