ZSYT01(3)

📦 version 3.12.0, in opensuse-leap 16.0

🌸 NAME 🌸

okay so bestie, this is the zsyt01.f(3) page from the Library Functions Manual — we're folding the header/manual-name tea in right here instead of copy-pasting that whole line. The NAME section is literally this source path and nothing else:

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

✨ SYNOPSIS ✨

🎀 Functions/Subroutines 🎀

  • subroutine ZSYT01 (uplo, n, a, lda, afac, ldafac, ipiv, c, ldc, rwork, resid) — the subroutine call, looking iconic.
  • ZSYT01 — the name again, serving main-character energy.
subroutine ZSYT01 (uplo, n, a, lda, afac, ldafac, ipiv, c, ldc, rwork, resid)
    ZSYT01

🦋 Function/Subroutine Documentation 🦋

subroutine ZSYT01 (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)

ZSYT01 — yes, bestie, that's the name again. It's giving “I am the subroutine and I know it.” 💅

🎯 Purpose

ZSYT01 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. no cap, that's the whole vibe. ✨

🌸 Parameters 🌸

  • UPLO — CHARACTER*1. Specifies whether the upper or lower triangular part of the complex 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 — COMPLEX*16 array, dimension (LDA,N). The original complex symmetric matrix A.
  • LDA — INTEGER. The leading dimension of the array A. LDA >= max(1,N).
  • AFAC — 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.
  • LDAFAC — INTEGER. The leading dimension of the array AFAC. LDAFAC >= max(1,N).
  • IPIV — INTEGER array, dimension (N). The pivot indices from ZSYTRF.
  • C — COMPLEX*16 array, dimension (LDC,N).
  • LDC — INTEGER. The leading dimension of the array C. LDC >= max(1,N).
  • RWORK — DOUBLE PRECISION array, dimension (N).
  • RESID — 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.f.

👑 Author 👑

Generated automatically by Doxygen for LAPACK from the source code.

final footer sign-off, bestie: LAPACK Version 3.12.0 — /home/abui...IN/zsyt01.f(3). No explicit date is printed in this footer, so I'm not making one up. 🫶💖

📦 where this page comes from