DTPTRI(3)
π DTPTRI(3) π
okay so bestie, this one lives in the Library Functions Manual and it's literally the glow-up arc for a triangular matrix π the file is:
/home/abuild/rpmbuild/BUILD/lapack-
static-3.12.0-build/lapack-3.12.0/SRC/dtptri.f
yes the path is a whole paragraph, we don't talk about it π
β¨ SYNOPSIS β¨
Functions/Subroutines π«Ά
subroutine DTPTRI (uplo, diag, n, ap, info)
DTPTRI
πΈ Function/Subroutine Documentation πΈ
subroutine DTPTRI (character uplo, character diag, integer n, double
precision, dimension( * ) ap, integer info)
DTPTRI
π Purpose π
!> !> DTPTRI computes the inverse of a real upper or lower triangular !> matrix A stored in packed format. !>
like, it takes your triangular matrix, keeps it in its cute little packed box, and hands you back the inverse. main character energy fr π₯
π Parameters π
UPLOβ ok so this is aCHARACTER*1and it tells us which triangle we're dealing with:= 'U': A is upper triangular;= 'L': A is lower triangular.
DIAGβ alsoCHARACTER*1, the vibe check on the diagonal:= 'N': A is non-unit triangular;= 'U': A is unit triangular.
Nβ this one's anINTEGER, it's the order of the matrix A. and listen:N >= 0. non-negotiable bestie β¨APβDOUBLE PRECISION array, dimension(N*(N+1)/2). this is the icon of the whole page so pay attention π- On entry, the upper or lower triangular matrix A, stored columnwise in a linear array. The j-th column of A is stored in the array AP as follows:
- if
UPLO = 'U',AP(i + (j-1)*j/2) = A(i,j)for1<=i<=j; - if
UPLO = 'L',AP(i + (j-1)*((2*n-j)/2) = A(i,j)forj<=i<=n.
- if
- See below for further details.
- On exit, the (triangular) inverse of the original matrix, in the same packed storage format. she left the house as A and came back as Aβ»ΒΉ, we love a transformation π«
- On entry, the upper or lower triangular matrix A, stored columnwise in a linear array. The j-th column of A is stored in the array AP as follows:
INFOβINTEGER, the receipts:= 0: successful exit π< 0: ifINFO = -i, the i-th argument had an illegal value π> 0: ifINFO = i,A(i,i)is exactly zero. the triangular matrix is singular and its inverse can not be computed. no inverse for you, she's singular π
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
π¦ Further Details: π¦
!> !> A triangular matrix A can be transferred to packed storage using one !> of the following program segments: !> !> UPLO = 'U': UPLO = 'L': !> !> JC = 1 JC = 1 !> DO 2 J = 1, N DO 2 J = 1, N !> DO 1 I = 1, J DO 1 I = J, N !> AP(JC+I-1) = A(I,J) AP(JC+I-J) = A(I,J) !> 1 CONTINUE 1 CONTINUE !> JC = JC + J JC = JC + N - J + 1 !> 2 CONTINUE 2 CONTINUE !>
two little snippets side by side, pick your triangle, copy the loop, slay π
β Note β
Definition at line 116 of file dtptri.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
and that's the whole page bestie, you ate π«Ά
LAPACK β Version 3.12.0 β dated /home/abui...RC/dtptri.f(3) β mwah, see you at the next manpage πβ¨π
π¦ 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