/home/abui...t01_rook.f(3)

📦 version 3.12.0, in opensuse-leap 16.0

🌸 /home/abui...t01_rook.f(3) — Library Functions Manual 🌸

okay so bestie, this is the Library Functions Manual page for /home/abui...t01_rook.f(3). It's giving very specific LAPACK energy, and we are going to read every single detail. no skipping. 💅

✨ NAME ✨

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

🎀 SYNOPSIS 🎀

🧚 Functions/Subroutines 🧚

  • subroutine ZSYT01_ROOK (uplo, n, a, lda, afac, ldafac, ipiv, c, ldc, rwork, resid) — this is the function in question, and yes, its name is literally ZSYT01_ROOK.
subroutine ZSYT01_ROOK (uplo, n, a, lda, afac, ldafac, ipiv, c, ldc,
    rwork, resid)

🔥 Function/Subroutine Documentation 🔥

💖 subroutine ZSYT01_ROOK 💖

Full signature, character for character:

subroutine ZSYT01_ROOK (character uplo, integer n, complex*16, dimension(
       lda, * ) a, integer lda, complex*16, dimension( ldafac, * ) afac,
       integer ldafac, integer, dimension( * ) ipiv, complex*16, dimension(
       ldc, * ) c, integer ldc, double precision, dimension( * ) rwork, double
       precision resid)

yep, that's the routine: ZSYT01_ROOK. 🫶

🎯 Purpose:

ZSYT01_ROOK reconstructs a complex symmetric indefinite matrix A from its block L*D*L' or U*D*U' factorization and computes the residual:

norm( C - A ) / ( N * norm(A) * EPS ),

where C is the reconstructed matrix, EPS is the machine epsilon, L' is the transpose of L, and U' is the transpose of U. ✨

🌈 Parameters

  • UPLO — UPLO is CHARACTER*1. It specifies whether the upper or lower triangular part of the complex symmetric matrix A is stored:
    • = 'U': Upper triangular
    • = 'L': Lower triangular
  • N — N is INTEGER. The number of rows and columns of the matrix A. N >= 0.
  • A — A is COMPLEX*16 array, dimension (LDA,N). The original complex symmetric matrix A.
  • LDA — LDA is INTEGER. The leading dimension of the array A. LDA >= max(1,N).
  • AFAC — AFAC is COMPLEX*16 array, dimension (LDAFAC,N). The factored form of the matrix A. 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 ZSYTRF_ROOK.
  • LDAFAC — LDAFAC is INTEGER. The leading dimension of the array AFAC. LDAFAC >= max(1,N).
  • IPIV — IPIV is INTEGER array, dimension (N). The pivot indices from ZSYTRF_ROOK.
  • C — C is COMPLEX*16 array, dimension (LDC,N).
  • LDC — LDC is INTEGER. The leading dimension of the array C. LDC >= max(1,N).
  • RWORK — RWORK is DOUBLE PRECISION array, dimension (N).
  • RESID — RESID is DOUBLE PRECISION.
    • 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 )

👑 Author

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

Definition at line 123 of file zsyt01_rook.f.

🪄 Author

Doxygen auto-generated this one for LAPACK from the source code. iconic behavior, honestly. 💫

💖 That's the whole page, bestie. Signing off from LAPACK Version 3.12.0, page /home/abui...t01_rook.f(3). 🫶🎀

📦 where this page comes from