ZTPLQT(3)
π ZTPLQT(3) β like, the manual page, bestie β¨
okay so this is a page from the Library Functions Manual β it lives at /home/abui...RC/ztplqt.f(3), which is giving "deep in the Fortran trenches" energy and honestly? iconic. it's a LAPACK thing. it does linear algebra. it does it blocked. let's get into it π«Ά
β¨ NAME β¨
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/SRC/ztplqt.f
like... that's the whole name. that's the path. that's where the source lives. no cap, that's just what it is π
πΈ SYNOPSIS πΈ
Functions/Subroutines
subroutine ZTPLQT (m, n, l, mb, a, lda, b, ldb, t, ldt, work, info)
ZTPLQT β yes that's the name, yes it's all caps, yes it's a whole vibe π
π¦ Function/Subroutine Documentation π¦
the actual signature, in full, in all its glory:
subroutine ZTPLQT (integer m, integer n, integer l, integer mb, complex*16,
dimension( lda, * ) a, integer lda, complex*16, dimension( ldb, * ) b,
integer ldb, complex*16, dimension( ldt, * ) t, integer ldt, complex*16,
dimension( * ) work, integer info)
ZTPLQT π
π Purpose π
okay so listen up:
ZTPLQT computes a blocked LQ factorization of a complex matrixC, which is composed of a triangular blockAand pentagonal blockB, using the compact WY representation forQ.
that's it. that's the whole job. blocked LQ factorization, triangular + pentagonal blocks, compact WY representation for Q. slay π
π Parameters π
M
M is INTEGER. it's the number of rows of the matrix B, and the order of the triangular matrix A. and: M >= 0. simple as that β¨
N
N is INTEGER. the number of columns of the matrix B. constraint: N >= 0. periodt π
L
L is INTEGER. the number of rows of the lower trapezoidal part of B. constraint: MIN(M,N) >= L >= 0. and β important β See Further Details. iykyk, it's down there π
MB
MB is INTEGER. the block size to be used in the blocked QR. constraint: M >= MB >= 1. tiny but mighty block size energy π
A
A is a COMPLEX*16 array, dimension (LDA,M). on entry: the lower triangular M-by-M matrix A. on exit: the elements on and below the diagonal of the array contain the lower triangular matrix L. so it transforms β glow-up arc fr fr π¦
LDA
LDA is INTEGER. the leading dimension of the array A. constraint: LDA >= max(1,M). don't skimp on it bestie π
B
B is a COMPLEX*16 array, dimension (LDB,N). on entry: the pentagonal M-by-N matrix B β the first N-L columns are rectangular, and the last L columns are lower trapezoidal. on exit: B contains the pentagonal matrix V. See Further Details β the whole V situation is explained down below π
LDB
LDB is INTEGER. the leading dimension of the array B. constraint: LDB >= max(1,M). π
T
T is a COMPLEX*16 array, dimension (LDT,N). the lower triangular block reflectors stored in compact form as a sequence of upper triangular blocks. See Further Details, because there is lore π
LDT
LDT is INTEGER. the leading dimension of the array T. constraint: LDT >= MB. π
WORK
WORK is a COMPLEX*16 array, dimension (MB*M). it works. that's its whole personality β¨
INFO
INFO is INTEGER. the receipts:
= 0: successful exit π< 0: ifINFO = -i, thei-th argument had an illegal value π¬
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
absolute legends, all of them π«Ά
π₯ Further Details: π₯
okay this is the part where it gets good. buckle up.
the input matrix C is a M-by-(M+N) matrix
C = [ A ] [ B ]
where A is an lower triangular M-by-M matrix, and B is M-by-N pentagonal matrix consisting of a M-by-(N-L) rectangular matrix B1 on left of a M-by-L upper trapezoidal matrix B2:
[B] = [ B1 ] [ B2 ]
[ B1 ] <- M-by-(N-L) rectangular
[ B2 ] <- M-by-L lower trapezoidal.
the lower trapezoidal matrix B2 consists of the first L columns of a M-by-M lower triangular matrix, where 0 <= L <= MIN(M,N). if L=0, B is rectangular M-by-N; if M=L=N, B is lower triangular. see how it all clicks?? it's giving puzzle pieces clicking into place π§
the matrix W stores the elementary reflectors H(i) in the i-th row above the diagonal (of A) in the M-by-(M+N) input matrix C
[C] = [ A ] [ B ]
[ A ] <- lower triangular M-by-M
[ B ] <- M-by-N pentagonal
so that W can be represented as
[W] = [ I ] [ V ]
[ I ] <- identity, M-by-M
[ V ] <- M-by-N, same form as B.
thus, all of information needed for W is contained on exit in B, which we call V above. note that V has the same form as B; that is,
[V] = [ V1 ] [ V2 ]
[ V1 ] <- M-by-(N-L) rectangular
[ V2 ] <- M-by-L lower trapezoidal.
the rows of V represent the vectors which define the H(i)'s. π«
the number of blocks is B = ceiling(M/MB), where each block is of order MB except for the last block, which is of order IB = M - (M-1)*MB. for each of the B blocks, a upper triangular block reflector factor is computed: T1, T2, ..., TB. the MB-by-MB (and IB-by-IB for the last block) T's are stored in the MB-by-N matrix T as
T = [T1 T2 ... TB].
genuinely obsessed with this. the blocking?? the compact WY representation?? the way T is just a whole row of block reflectors?? ate and left no crumbs π₯π
β Definition β
definition at line 187 of file ztplqt.f. π
π Author (again, yes really) π
generated automatically by Doxygen for LAPACK from the source code. so like, a robot wrote this about a robot's math. meta fr fr π€π
and that's the page!! brought to you by LAPACK, Version 3.12.0, living at /home/abui...RC/ztplqt.f(3) β mwah, go factor something blocky bestie πβ¨π
π¦ 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