CHPT01(3)

📦 version 3.12.0, in opensuse-leap 16.0

okay bestie, welcome to CHPT01(3) from the Library Functions Manual ✨ this page is for the Fortran subroutine CHPT01, and the header vibe is chpt01.f(3) (fr it shows /home/abui...IN/chpt01.f(3)). we're gonna cover every single detail, no skips, no cap 💅

🌸 NAME 🌸

the NAME section is literally this path, bestie 🎀:

/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/TESTING/LIN/chpt01.f

that's the file. that's the tea. periodt.

✨ SYNOPSIS ✨

🌈 Functions/Subroutines 🌈

  • subroutine CHPT01 (uplo, n, a, afac, ipiv, c, ldc, rwork, resid) — the call, and it's giving CHPT01 energy 👑
       subroutine CHPT01 (uplo, n, a, afac, ipiv, c, ldc, rwork, resid)
           CHPT01

💖 Function/Subroutine Documentation 💖

   subroutine CHPT01 (character uplo, integer n, complex, dimension( * ) a,
       complex, dimension( * ) afac, integer, dimension( * ) ipiv, complex,
       dimension( ldc, * ) c, integer ldc, real, dimension( * ) rwork, real
       resid)
       CHPT01

🎯 Purpose 🎯

okay so CHPT01 reconstructs a Hermitian indefinite packed matrix A from its block L*D*L' or U*D*U' factorization, then computes the residual norm( C - A ) / ( N * norm(A) * EPS ). in that formula, C is the reconstructed matrix, EPS is the machine epsilon, L' is the conjugate transpose of L, and U' is the conjugate transpose of U. it's giving linear algebra main character energy 👑✨

🌈 Parameters 🌈

  • UPLO — it's a CHARACTER*1 and it tells us which triangular part of the Hermitian matrix A is stored: 'U' means upper triangular, 'L' means lower triangular. slay 💅
  • N — it's an INTEGER and it's the number of rows and columns of matrix A. it's gotta be N >= 0, no cap.
  • A — it's a COMPLEX array with dimension (N*(N+1)/2). it's the original Hermitian matrix A, stored as a packed triangular matrix 🎀
  • AFAC — it's a COMPLEX array with dimension (N*(N+1)/2). it's the factored form of matrix A, stored as a packed triangular matrix. AFAC contains the block diagonal matrix D and the multipliers used to obtain the factor L or U from the block L*D*L' or U*D*U' factorization as computed by CHPTRF. iykyk 🔥
  • IPIV — it's an INTEGER array with dimension (N). these are the pivot indices from CHPTRF. 💀
  • C — it's a COMPLEX array with dimension (LDC,N). that's it, that's the tea ☕️
  • LDC — it's an INTEGER and it's the leading dimension of array C. it has to satisfy LDC >= max(1,N). periodt.
  • RWORK — it's a REAL array with dimension (N). 🌸
  • RESID — it's a REAL. if UPLO = 'L', it's norm(L*D*L' - A) / ( N * norm(A) * EPS ). if UPLO = 'U', it's norm(U*D*U' - A) / ( N * norm(A) * EPS ). math girlie math 🧮✨

👑 Author 👑

  • Univ. of Tennessee
  • Univ. of California Berkeley
  • Univ. of Colorado Denver
  • NAG Ltd.

Definition at line 112 of file chpt01.f. 💖

Author

this page was generated automatically by Doxygen for LAPACK from the source code 🤖✨

okay that's the whole page, bestie 💖 cute sign-off: LAPACK Version 3.12.0, /home/abui...IN/chpt01.f(3) — no date in the footer, just version and file vibes. bye 🫶

📦 where this page comes from