DSYT01_ROOK.F(3)

📦
version 3.12.1 · 3 versions
, in arch rolling

💖 DSYT01_ROOK(3) 💖

Okay bestie, welcome to the Library Functions Manual page for DSYT01_ROOK(3). This is giving testing/linear-algebra main character energy, and yes, the underscores are part of the vibe. 🦋

🌸 NAME 🌸

TESTING/LIN/dsyt01_rook.f — that’s the file we’re stanning. No cap. 💅

✨ SYNOPSIS ✨

🦋 Functions/Subroutines 🦋

Here’s the subroutine moment, served exactly:

       subroutine dsyt01_rook (uplo, n, a, lda, afac, ldafac, ipiv, c, ldc,
           rwork, resid)

DSYT01_ROOK — the label, the legend. 👑

💅 Function/Subroutine Documentation 💅

🎀 subroutine dsyt01_rook 🎀

Signature tea, with every type and dimension kept exactly where it belongs:

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

DSYT01_ROOK — again, iconic. 🌟

🌈 Purpose 🌈

DSYT01_ROOK reconstructs a 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 and EPS is the machine epsilon. Literally the whole point, bestie. 💖

💖 Parameters 💖

Every single parameter, no skips, no cap:

  • UPLO — CHARACTER*1. Specifies whether the upper or lower triangular part of the symmetric matrix A is stored: = 'U': Upper triangular; = 'L': Lower triangular.
  • N — INTEGER. The number of rows and columns of the matrix A. N >= 0.
  • A — DOUBLE PRECISION array, dimension (LDA,N). The original symmetric matrix A.
  • LDA — INTEGER. The leading dimension of the array A. LDA >= max(1,N).
  • AFAC — DOUBLE PRECISION 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 DSYTRF_ROOK.
  • LDAFAC — INTEGER. The leading dimension of the array AFAC. LDAFAC >= max(1,N).
  • IPIV — INTEGER array, dimension (N). The pivot indices from DSYTRF_ROOK.
  • C — DOUBLE PRECISION array, dimension (LDC,N). That’s the whole entry; the manual gives it no extra lore.
  • LDC — INTEGER. The leading dimension of the array C. LDC >= max(1,N).
  • RWORK — DOUBLE PRECISION array, dimension (N). Also no extra lore, just the array.
  • RESID — DOUBLE PRECISION. If UPLO = 'L', norm(L*D*L' - A) / ( N * norm(A) * EPS ); if UPLO = 'U', 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 122 of file dsyt01_rook.f.

Definition at line 122 of file dsyt01_rook.f. Periodt. 🎀

🧚 Author 🧚

Generated automatically by Doxygen for LAPACK from the source code. Slay, automation. 🤖💜

💖 Sign-off time: this page is from LAPACK Version 3.12.0, with the footer path TESTING/LI...yt01_rook.f(3). The footer date slot is not giving us an actual date on this page, so no invented date — just version, path, and love. 💅🫶

📦 where this page comes from