C_ZBLAT2.F(3)

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

πŸ’– CBLAS/testing/c_zblat2.f(3) β€” Library Functions Manual πŸ’–

okay so bestie, welcome to the CBLAS/testing/c_zblat2.f(3) page from the Library Functions Manual β€” manual name folded right in near the top, exactly like you asked, and we are keeping every literal detail intact. No cap. πŸ’…βœ¨


🌸 NAME 🌸

CBLAS/testing/c_zblat2.f β€” that's literally the name on this page, and we're not renaming it, bestie. Periodt. πŸŽ€


✨ SYNOPSIS ✨

πŸŽ€ Functions/Subroutines πŸŽ€

Here's the whole cast in the exact order the page lists them. Signatures are sacred, so they stay character-for-character:

       program zblat2
       subroutine zchk1 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nkb, kb, nalf, alf, nbet, bet, ninc, inc, nmax, incmax,
           a, aa, as, x, xx, xs, y, yy, ys, yt, g, iorder)
       subroutine zchk2 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nkb, kb, nalf, alf, nbet, bet, ninc, inc, nmax, incmax,
           a, aa, as, x, xx, xs, y, yy, ys, yt, g, iorder)
       subroutine zchk3 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nkb, kb, ninc, inc, nmax, incmax, a, aa, as, x, xx, xs,
           xt, g, z, iorder)
       subroutine zchk4 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nalf, alf, ninc, inc, nmax, incmax, a, aa, as, x, xx,
           xs, y, yy, ys, yt, g, z, iorder)
       subroutine zchk5 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nalf, alf, ninc, inc, nmax, incmax, a, aa, as, x, xx,
           xs, y, yy, ys, yt, g, z, iorder)
       subroutine zchk6 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nalf, alf, ninc, inc, nmax, incmax, a, aa, as, x, xx,
           xs, y, yy, ys, yt, g, z, iorder)
       subroutine zmvch (trans, m, n, alpha, a, nmax, x, incx, beta, y, incy,
           yt, g, yy, eps, err, fatal, nout, mv)
       logical function lze (ri, rj, lr)
       logical function lzeres (type, uplo, m, n, aa, as, lda)
       complex *16 function zbeg (reset)
       double precision function ddiff (x, y)
       subroutine zmake (type, uplo, diag, m, n, a, nmax, aa, lda, kl, ku,
           reset, transl)

🧚 Function/Subroutine Documentation πŸŽ€

Bestie, here's the full documentation lineup in the exact order the page gives it. Definition lines are kept too β€” every line number, every file reference. πŸ’–


πŸ“ ddiff

ddiff is a double precision function, and it takes double precision x and double precision y. That's the whole little squad. 🫢

   double precision function ddiff (double precision x, double precision y)

Definition at line 2731 of file c_zblat2.f.


πŸ¦‹ lze

lze is a logical function with complex*16, dimension( * ) ri, complex*16, dimension( * ) rj, and integer lr. Slay. πŸ’…

   logical function lze (complex*16, dimension( * ) ri, complex*16, dimension(
       * ) rj, integer lr)

Definition at line 2589 of file c_zblat2.f.


🌈 lzeres

lzeres is a logical function, and its parameter list is literally character*2 type, character*1 uplo, integer m, integer n, complex*16, dimension( lda, * ) aa, complex*16, dimension( lda, * ) as, and integer lda. Iconic. ✨

   logical function lzeres (character*2 type, character*1 uplo, integer m,
       integer n, complex*16, dimension( lda, * ) aa, complex*16, dimension(
       lda, * ) as, integer lda)

Definition at line 2619 of file c_zblat2.f.


🧚 zbeg

zbeg is a complex*16 function with one logical reset argument. Main character energy, honestly. πŸ‘‘

   complex*16 function zbeg (logical reset)

Definition at line 2679 of file c_zblat2.f.


πŸŽ€ zblat2

zblat2 is a program, not a subroutine, and it starts at line 1. We love a grand entrance. πŸ’–

   program zblat2

Definition at line 1 of file c_zblat2.f.


🌸 zchk1

zchk1 is a subroutine with the full character*12 sname, double precision eps, double precision thresh, integer nout, integer ntra, logical trace, logical rewi, logical fatal setup, then all the dimension and array arguments exactly as listed below. No skipping, no summarizing, no cap. πŸ’…

   subroutine zchk1 (character*12 sname, double precision eps, double precision
       thresh, integer nout, integer ntra, logical trace, logical rewi, logical
       fatal, integer nidim, integer, dimension( nidim ) idim, integer nkb,
       integer, dimension( nkb ) kb, integer nalf, complex*16, dimension( nalf
       ) alf, integer nbet, complex*16, dimension( nbet ) bet, integer ninc,
       integer, dimension( ninc ) inc, integer nmax, integer incmax,
       complex*16, dimension( nmax, nmax ) a, complex*16, dimension( nmax*nmax
       ) aa, complex*16, dimension( nmax*nmax ) as, complex*16, dimension( nmax
       ) x, complex*16, dimension( nmax*incmax ) xx, complex*16, dimension(
       nmax*incmax ) xs, complex*16, dimension( nmax ) y, complex*16,
       dimension( nmax*incmax ) yy, complex*16, dimension( nmax*incmax ) ys,
       complex*16, dimension( nmax ) yt, double precision, dimension( nmax ) g,
       integer iorder)

Definition at line 462 of file c_zblat2.f.


πŸ¦‹ zchk2

zchk2 is another subroutine, and its signature is the same exact lineup as zchk1 β€” every type, every dimension, every argument name. Copy-paste energy, but make it documentation. ✨

   subroutine zchk2 (character*12 sname, double precision eps, double precision
       thresh, integer nout, integer ntra, logical trace, logical rewi, logical
       fatal, integer nidim, integer, dimension( nidim ) idim, integer nkb,
       integer, dimension( nkb ) kb, integer nalf, complex*16, dimension( nalf
       ) alf, integer nbet, complex*16, dimension( nbet ) bet, integer ninc,
       integer, dimension( ninc ) inc, integer nmax, integer incmax,
       complex*16, dimension( nmax, nmax ) a, complex*16, dimension( nmax*nmax
       ) aa, complex*16, dimension( nmax*nmax ) as, complex*16, dimension( nmax
       ) x, complex*16, dimension( nmax*incmax ) xx, complex*16, dimension(
       nmax*incmax ) xs, complex*16, dimension( nmax ) y, complex*16,
       dimension( nmax*incmax ) yy, complex*16, dimension( nmax*incmax ) ys,
       complex*16, dimension( nmax ) yt, double precision, dimension( nmax ) g,
       integer iorder)

Definition at line 818 of file c_zblat2.f.


🌈 zchk3

zchk3 is a subroutine with its own exact signature β€” note that it has xt instead of y/yy/ys/yt, and it has complex*16, dimension( nmax ) z, plus integer iorder. The details matter, bestie. 🫢

   subroutine zchk3 (character*12 sname, double precision eps, double precision
       thresh, integer nout, integer ntra, logical trace, logical rewi, logical
       fatal, integer nidim, integer, dimension( nidim ) idim, integer nkb,
       integer, dimension( nkb ) kb, integer ninc, integer, dimension( ninc )
       inc, integer nmax, integer incmax, complex*16, dimension( nmax, nmax )
       a, complex*16, dimension( nmax*nmax ) aa, complex*16, dimension(
       nmax*nmax ) as, complex*16, dimension( nmax ) x, complex*16, dimension(
       nmax*incmax ) xx, complex*16, dimension( nmax*incmax ) xs, complex*16,
       dimension( nmax ) xt, double precision, dimension( nmax ) g, complex*16,
       dimension( nmax ) z, integer iorder)

Definition at line 1175 of file c_zblat2.f.


πŸŽ€ zchk4

zchk4 is a subroutine with alf, inc, and a whole pile of complex*16 array args, plus double precision, dimension( nmax ) g, complex*16, dimension( nmax ) z, and integer iorder. Literally all of it is below. πŸ’…

   subroutine zchk4 (character*12 sname, double precision eps, double precision
       thresh, integer nout, integer ntra, logical trace, logical rewi, logical
       fatal, integer nidim, integer, dimension( nidim ) idim, integer nalf,
       complex*16, dimension( nalf ) alf, integer ninc, integer, dimension(
       ninc ) inc, integer nmax, integer incmax, complex*16, dimension( nmax,
       nmax ) a, complex*16, dimension( nmax*nmax ) aa, complex*16, dimension(
       nmax*nmax ) as, complex*16, dimension( nmax ) x, complex*16, dimension(
       nmax*incmax ) xx, complex*16, dimension( nmax*incmax ) xs, complex*16,
       dimension( nmax ) y, complex*16, dimension( nmax*incmax ) yy,
       complex*16, dimension( nmax*incmax ) ys, complex*16, dimension( nmax )
       yt, double precision, dimension( nmax ) g, complex*16, dimension( nmax )
       z, integer iorder)

Definition at line 1557 of file c_zblat2.f.


🌸 zchk5

zchk5 is a subroutine, and its signature matches zchk4 exactly. Same arguments, same dimensions, same definition-line treatment. Obsessed with consistency. ✨

   subroutine zchk5 (character*12 sname, double precision eps, double precision
       thresh, integer nout, integer ntra, logical trace, logical rewi, logical
       fatal, integer nidim, integer, dimension( nidim ) idim, integer nalf,
       complex*16, dimension( nalf ) alf, integer ninc, integer, dimension(
       ninc ) inc, integer nmax, integer incmax, complex*16, dimension( nmax,
       nmax ) a, complex*16, dimension( nmax*nmax ) aa, complex*16, dimension(
       nmax*nmax ) as, complex*16, dimension( nmax ) x, complex*16, dimension(
       nmax*incmax ) xx, complex*16, dimension( nmax*incmax ) xs, complex*16,
       dimension( nmax ) y, complex*16, dimension( nmax*incmax ) yy,
       complex*16, dimension( nmax*incmax ) ys, complex*16, dimension( nmax )
       yt, double precision, dimension( nmax ) g, complex*16, dimension( nmax )
       z, integer iorder)

Definition at line 1835 of file c_zblat2.f.


πŸ¦‹ zchk6

zchk6 is a subroutine, and here's the detail that matters: its z argument is complex*16, dimension( nmax, 2 ) z β€” yes, with the 2. We are not flattening that, bestie. πŸ’–

   subroutine zchk6 (character*12 sname, double precision eps, double precision
       thresh, integer nout, integer ntra, logical trace, logical rewi, logical
       fatal, integer nidim, integer, dimension( nidim ) idim, integer nalf,
       complex*16, dimension( nalf ) alf, integer ninc, integer, dimension(
       ninc ) inc, integer nmax, integer incmax, complex*16, dimension( nmax,
       nmax ) a, complex*16, dimension( nmax*nmax ) aa, complex*16, dimension(
       nmax*nmax ) as, complex*16, dimension( nmax ) x, complex*16, dimension(
       nmax*incmax ) xx, complex*16, dimension( nmax*incmax ) xs, complex*16,
       dimension( nmax ) y, complex*16, dimension( nmax*incmax ) yy,
       complex*16, dimension( nmax*incmax ) ys, complex*16, dimension( nmax )
       yt, double precision, dimension( nmax ) g, complex*16, dimension( nmax,
       2 ) z, integer iorder)

Definition at line 2129 of file c_zblat2.f.


🧚 zmake

zmake is a subroutine with character*2 type, character*1 uplo, character*1 diag, integer m, integer n, complex*16, dimension( nmax, * ) a, integer nmax, complex*16, dimension( * ) aa, integer lda, integer kl, integer ku, logical reset, and complex*16 transl. Every single one is below. πŸŽ€

   subroutine zmake (character*2 type, character*1 uplo, character*1 diag,
       integer m, integer n, complex*16, dimension( nmax, * ) a, integer nmax,
       complex*16, dimension( * ) aa, integer lda, integer kl, integer ku,
       logical reset, complex*16 transl)

Definition at line 2747 of file c_zblat2.f.


🌈 zmvch

zmvch is a subroutine with character*1 trans, integer m, integer n, complex*16 alpha, complex*16, dimension( nmax, * ) a, integer nmax, complex*16, dimension( * ) x, integer incx, complex*16 beta, complex*16, dimension( * ) y, integer incy, complex*16, dimension( * ) yt, double precision, dimension( * ) g, complex*16, dimension( * ) yy, double precision eps, double precision err, logical fatal, integer nout, and logical mv. It's giving very detailed, and we're here for it. πŸ’…

   subroutine zmvch (character*1 trans, integer m, integer n, complex*16 alpha,
       complex*16, dimension( nmax, * ) a, integer nmax, complex*16, dimension(
       * ) x, integer incx, complex*16 beta, complex*16, dimension( * ) y,
       integer incy, complex*16, dimension( * ) yt, double precision,
       dimension( * ) g, complex*16, dimension( * ) yy, double precision eps,
       double precision err, logical fatal, integer nout, logical mv)

Definition at line 2457 of file c_zblat2.f.


πŸ‘‘ Author πŸ‘‘

Generated automatically by Doxygen for LAPACK from the source code. Not me hand-writing it, bestie β€” the robots did that part, and we're just making it iconic. πŸ’–


xoxo, from the footer: LAPACK Version 3.12.0 / CBLAS/testing/c_zblat2.f(3) β€” that's the source/version and the page tag, and that's the whole vibe. Periodt. πŸ’…βœ¨

πŸ“¦ where this page comes from