CHST01(3)
πΈ NAME πΈ
Bestie, this is the manual page for chst01(3) β aka CHST01. The source path is exactly /home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/EIG/chst01.f, no cap. π¦
π« SYNOPSIS π«
π§ Functions/Subroutines π§
subroutine CHST01 (n, ilo, ihi, a, lda, h, ldh, q, ldq, work, lwork, rwork, result)
CHST01 β thatβs the name, sheβs iconic. π
π Function/Subroutine Documentation π
subroutine CHST01 (integer n, integer ilo, integer ihi, complex, dimension( lda, * ) a, integer lda, complex, dimension( ldh, * ) h, integer ldh, complex, dimension( ldq, * ) q, integer ldq, complex, dimension( lwork ) work, integer lwork, real, dimension( * ) rwork, real, dimension( 2 ) result)
CHST01
π¦ Purpose π¦
Okay so CHST01 tests the reduction of a general matrix A to upper Hessenberg form: A = Q*H*Q'. Two test ratios are computed, bestie:
RESULT(1) = norm( A - Q*H*Q' ) / ( norm(A) * N * EPS )RESULT(2) = norm( I - Q'*Q ) / ( N * EPS )
The matrix Q is assumed to be given explicitly, as it would be following CGEHRD + CUNGHR. In this version, ILO and IHI are not used, but they could be used to save some work if this is desired. β¨
π Parameters π
NβN is INTEGER. The order of the matrixA.N >= 0.ILOβILO is INTEGER.IHIβIHI is INTEGER.Ais assumed to be upper triangular in rows and columns1:ILO-1andIHI+1:N, soQdiffers from the identity only in rows and columnsILO+1:IHI.AβA is COMPLEX array, dimension (LDA,N). The original n by n matrixA.LDAβLDA is INTEGER. The leading dimension of the arrayA.LDA >= max(1,N).HβH is COMPLEX array, dimension (LDH,N). The upper Hessenberg matrixHfrom the reductionA = Q*H*Q'as computed byCGEHRD.His assumed to be zero below the first subdiagonal.LDHβLDH is INTEGER. The leading dimension of the arrayH.LDH >= max(1,N).QβQ is COMPLEX array, dimension (LDQ,N). The orthogonal matrixQfrom the reductionA = Q*H*Q'as computed byCGEHRD + CUNGHR.LDQβLDQ is INTEGER. The leading dimension of the arrayQ.LDQ >= max(1,N).WORKβWORK is COMPLEX array, dimension (LWORK).LWORKβLWORK is INTEGER. The length of the arrayWORK.LWORK >= 2*N*N.RWORKβRWORK is REAL array, dimension (N).RESULTβRESULT is REAL array, dimension (2).RESULT(1) = norm( A - Q*H*Q' ) / ( norm(A) * N * EPS )RESULT(2) = norm( I - Q'*Q ) / ( N * EPS )
π Author π
- Univ. of Tennessee
- Univ. of California Berkeley
- Univ. of Colorado Denver
- NAG Ltd.
Definition at line 138 of file chst01.f.
β¨ Author β¨
Generated automatically by Doxygen for LAPACK from the source code.
Catch you later, bestie! This cutie page comes from LAPACK Version 3.12.0, file /home/abui...IG/chst01.f(3) β mwah πβ¨
π¦ 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