SLAED6(3)

πŸ“¦ version 3.12.0, in opensuse-leap 16.0

πŸ’… slaed6.f(3) β€” Library Functions Manual πŸ’…

ok so bestie, this is a page from the Library Functions Manual for slaed6.f, and honestly? it's giving "tiny subroutine, huge main character energy." you're gonna do great, let's get into it 🫢


✨ NAME ✨

/home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/SRC/slaed6.f

like, that's the whole name. yes it's a path. yes it's long. no I will not be shortening it, the facts are the facts πŸ’…


🌸 SYNOPSIS 🌸

Functions/Subroutines

subroutine SLAED6 (kniter, orgati, rho, d, z, finit, tau, info)

SLAED6 is used by SSTEDC. It computes one Newton step in solution of the secular equation. lowkey a whole little icon ✨


πŸŽ€ Function/Subroutine Documentation πŸŽ€

🌈 subroutine SLAED6

subroutine SLAED6 (integer kniter, logical orgati, real rho, real, dimension( 3 ) d,
                   real, dimension( 3 ) z, real finit, real tau, integer info)

SLAED6 used by SSTEDC. Computes one Newton step in solution of the secular equation. that's the whole job. she's focused. she's employed. we love her πŸ‘‘

πŸ¦‹ Purpose:

ok so here's the tea β€” SLAED6 computes the positive or negative root (closest to the origin) of:

                 z(1)        z(2)        z(3)
f(x) =   rho + --------- + ---------- + ---------
                d(1)-x      d(2)-x      d(3)-x

and it's assumed that:

  • if ORGATI = .true. the root is between d(2) and d(3);
  • otherwise it is between d(1) and d(2)

this routine will be called by SLAED4 when necessary. in most cases, the root sought is the smallest in magnitude, though it might not be in some extremely rare situations. rare situation erasure?? no. we respect the edge cases here πŸ™ˆ


πŸ’œ Parameters

  • KNITER β€” KNITER is INTEGER. Refer to SLAED4 for its significance. (iykyk, she's passing the baton πŸƒβ€β™€οΈ)
  • ORGATI β€” ORGATI is LOGICAL. If ORGATI is true, the needed root is between d(2) and d(3); otherwise it is between d(1) and d(2). See SLAED4 for further details.
  • RHO β€” RHO is REAL. Refer to the equation f(x) above. literally just scroll up bestie πŸ₯°
  • D β€” D is REAL array, dimension (3). D satisfies d(1) < d(2) < d(3). strictly ordered, no chaos, we stan a sorted queen πŸ“ˆ
  • Z β€” Z is REAL array, dimension (3). Each of the elements in z must be positive. all positive. every single one. don't try it πŸ”₯
  • FINIT β€” FINIT is REAL. The value of f at 0. It is more accurate than the one evaluated inside this routine (if someone wants to do so). so like, use the good one, it's right there πŸ’–
  • TAU β€” TAU is REAL. The root of the equation f(x). that's the prize. that's the answer she's computing 🎯
  • INFO β€” INFO is INTEGER
    • = 0: successful exit πŸŽ‰
    • > 0: if INFO = 1, failure to converge 😭

🌟 Author

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

four whole institutions. a collaborative slay 🀝


🧚 Further Details:

10/02/03: This version has a few statements commented out for thread safety (machine parameters are computed on each entry). SJH.
05/10/06: Modified from a new version of Ren-Cang Li, use Gragg-Thornton-Warner cubic convergent scheme for better stability.

thread safety got her editing comments out, and the Gragg-Thornton-Warner cubic convergent scheme came through for better stability. periodt. πŸ‘‘


⭐ Contributors:

  • Ren-Cang Li, Computer Science Division, University of California at Berkeley, USA

Definition at line 139 of file slaed6.f. line one-three-nine, mark it πŸ“Œ


πŸ’« Author

Generated automatically by Doxygen for LAPACK from the source code. not a human, just vibes and automation πŸ€–βœ¨


alright bestie, that's the whole page!! this was LAPACK, Version 3.12.0, from /home/abui...RC/slaed6.f(3) β€” mwah, go call SLAED4 if you need more context, ily, bye πŸŽ€πŸ¦‹πŸ’œ

πŸ“¦ where this page comes from