DPST01(3)
π DPST01(3) β Library Functions Manual π
okay so bestie, welcome to DPST01(3), straight out of the Library Functions Manual. This is the page for the DPST01 subroutine, and it is lowkey giving main character energy. π
β¨ NAME β¨
/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/LIN/dpst01.fβ yep, that is the whole name/path, and I am not editing one character of it. periodt. π
π¦ SYNOPSIS π¦
Functions/Subroutines
subroutine DPST01 (uplo, n, a, lda, afac, ldafac, perm, ldperm, piv,
rwork, resid, rank)
DPST01β the subroutine itself, iconic behavior only. π
π Function/Subroutine Documentation π
subroutine DPST01 (character uplo, integer n, double precision, dimension(
lda, * ) a, integer lda, double precision, dimension( ldafac, * ) afac,
integer ldafac, double precision, dimension( ldperm, * ) perm, integer
ldperm, integer, dimension( * ) piv, double precision, dimension( * )
rwork, double precision resid, integer rank)
DPST01
Purpose
DPST01 reconstructs a symmetric positive semidefinite matrix A from its L or U factors and the permutation matrix P, and then computes the residual:
norm( P*L*L'*P' - A ) / ( N * norm(A) * EPS )
or
norm( P*U'*U*P' - A ) / ( N * norm(A) * EPS ),
where EPS is the machine epsilon. ngl, that is the whole vibe. π¦
Parameters
UPLOβUPLO is CHARACTER*1. Specifies whether the upper or lower triangular part of the symmetric matrixAis stored:= 'U': Upper triangular= 'L': Lower triangular
NβN is INTEGER. The number of rows and columns of the matrixA.N >= 0.AβA is DOUBLE PRECISION array, dimension (LDA,N). The original symmetric matrixA.LDAβLDA is INTEGER. The leading dimension of the arrayA.LDA >= max(1,N)AFACβAFAC is DOUBLE PRECISION array, dimension (LDAFAC,N). The factorLorUfrom theL*L'orU'*Ufactorization ofA.LDAFACβLDAFAC is INTEGER. The leading dimension of the arrayAFAC.LDAFAC >= max(1,N).PERMβPERM is DOUBLE PRECISION array, dimension (LDPERM,N). Overwritten with the reconstructed matrix, and then with the differenceP*L*L'*P' - A(orP*U'*U*P' - A)LDPERMβLDPERM is INTEGER. The leading dimension of the arrayPERM.LDAPERM >= max(1,N).yes bestie, the source saysLDAPERMright there, and I am keeping it exactly like that. πPIVβPIV is INTEGER array, dimension (N).PIVis such that the nonzero entries areP( PIV( K ), K ) = 1.RWORKβRWORK is DOUBLE PRECISION array, dimension (N)RESIDβRESID is DOUBLE PRECISION. IfUPLO = 'L',norm(L*L' - A) / ( N * norm(A) * EPS ). IfUPLO = 'U',norm(U'*U - A) / ( N * norm(A) * EPS ).RANKβRANK is INTEGER. number of nonzero singular values ofA.
πΈ Author πΈ
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 132 of file dpst01.f.
π Author π
Generated automatically by Doxygen for LAPACK from the source code.
okay that is the whole thing, bestie. This cutie is from LAPACK Version 3.12.0, and the footer path is /home/abui...IN/dpst01.f(3). slay, you made it to the end. πβ¨π
π¦ 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