TESTING/EIG/dlctes.f(3)

πŸ“¦
version 3.12.1 Β· 3 versions
, in arch rolling

πŸ’… TESTING/EIG/dlctes.f πŸ’…

okay bestie, welcome to the little page for TESTING/EIG/dlctes.f β€” it's part of the LAPACK library's function docs, and honestly it's a whole vibe. it's short, it's sweet, it's a logical function that makes a decision and moves on with its life. main character energy fr.


✨ SYNOPSIS ✨

🧚 Functions/Subroutines

  • logical function dlctes (zr, zi, d) β€” the one and only, DLCTES

πŸ¦‹ Function/Subroutine Documentation πŸ¦‹

logical function dlctes (double precision zr, double precision zi, double precision d)

yep, that's the signature. three double precision args walk into a function and it returns a logical. iconic.

DLCTES

πŸŽ€ Purpose:

!>
!> DLCTES returns .TRUE. if the eigenvalue (ZR/D) + sqrt(-1)*(ZI/D)
!> is to be selected (specifically, in this subroutine, if the real
!> part of the eigenvalue is negative), and otherwise it returns
!> .FALSE..
!>
!> It is used by the test routine DDRGES to test whether the driver
!> routine DGGES successfully sorts eigenvalues.
!>

so like, lowkey the whole job is: give it a complex eigenvalue written as (ZR/D) + sqrt(-1)*(ZI/D) and it hands back .TRUE. if that eigenvalue should be selected β€” and specifically, in this subroutine, that means the real part of the eigenvalue is negative. otherwise? .FALSE. periodt. πŸ’…

and the reason it exists at all? it's the helper for the test routine DDRGES, which uses it to check whether the driver routine DGGES actually sorted the eigenvalues correctly. so it's basically the vibe-check for eigenvalue sorting. no cap. ✨


🌸 Parameters 🌸

  • ZR β€” is DOUBLE PRECISION. this is the numerator of the real part of a complex eigenvalue (ZR/D) + i*(ZI/D). bestie it's the top half of the fraction, ok? πŸ“
!>          ZR is DOUBLE PRECISION
!>          The numerator of the real part of a complex eigenvalue
!>          (ZR/D) + i*(ZI/D).
!>
  • ZI β€” is DOUBLE PRECISION. the numerator of the imaginary part of a complex eigenvalue (ZR/D) + i*(ZI). yes, that's exactly how the original writes it β€” (ZR/D) + i*(ZI) β€” don't come for me, I'm just the messenger πŸ’€
!>          ZI is DOUBLE PRECISION
!>          The numerator of the imaginary part of a complex eigenvalue
!>          (ZR/D) + i*(ZI).
!>
  • D β€” is DOUBLE PRECISION. the denominator part of a complex eigenvalue (ZR/D) + i*(ZI/D). it's giving shared responsibility. 🫢
!>          D is DOUBLE PRECISION
!>          The denominator part of a complex eigenvalue
!>          (ZR/D) + i*(ZI/D).
!>

πŸ‘‘ Author πŸ‘‘

the whole squad on the credits:

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

Definition at line 67 of file dlctes.f. like, go look, it's right there ⭐


🌈 Author 🌈

Generated automatically by Doxygen for LAPACK from the source code. bestie it literally wrote itself, we're just here for the vibes πŸ™ˆ

kay that's the whole page, you ate that πŸ’– this was LAPACK, Version 3.12.0, of TESTING/EIG/dlctes.f(3) β€” slay and goodbye, mwah πŸŽ€βœ¨

πŸ“¦ where this page comes from