BLAS/TESTING/cblat2.f(3)

📦
version 3.12.1 · 2 versions
, in arch rolling

✨ NAME ✨

okay so bestie, this is the page for BLAS/TESTING/cblat2.f(3) — yes, the BLAS/TESTING/cblat2.f file itself, straight out of the Library Functions Manual. The NAME section is literally just that path, and we're keeping it that way. 💅

✨ SYNOPSIS ✨

🎀 Functions/Subroutines 🎀

Okay so this is the full lineup, no cap. Every signature is exactly as written, because we do not mess with literal code in this group chat. 🫶

  • program cblat2 — CBLAT2
  • subroutine cchk1 (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)
  • subroutine cchk2 (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)
  • subroutine cchk3 (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)
  • subroutine cchk4 (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)
  • subroutine cchk5 (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)
  • subroutine cchk6 (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)
  • subroutine cchke (isnum, srnamt, nout)
  • subroutine cmake (type, uplo, diag, m, n, a, nmax, aa, lda, kl, ku, reset, transl)
  • subroutine cmvch (trans, m, n, alpha, a, nmax, x, incx, beta, y, incy, yt, g, yy, eps, err, fatal, nout, mv)
  • logical function lce (ri, rj, lr)
  • logical function lceres (type, uplo, m, n, aa, as, lda)
  • complex function cbeg (reset)
  • real function sdiff (x, y)
  • subroutine chkxer (srnamt, infot, nout, lerr, ok)
  • subroutine cregr1 (trans, m, n, ly, kl, ku, alpha, a, lda, x, incx, beta, y, incy, ys)
  • subroutine xerbla (srname, info)

💅 Function/Subroutine Documentation 💅

✨ complex function cbeg (logical reset) ✨

complex function cbeg (logical reset)

Definition at line 3155 of file cblat2.f. That’s literally it for this lil one, bestie 💖

🌸 program cblat2 🌸

program cblat2

CBLAT2

💫 Purpose 💫

This is the test program for the COMPLEX Level 2 Blas, no cap ✨

The program must be driven by a short data file. The first 18 records of the file are read using list-directed input, the last 17 records are read using the format ( A6, L2 ). An annotated example of a data file can be obtained by deleting the first 3 characters from the following 35 lines:

!> 'cblat2.out'      NAME OF SUMMARY OUTPUT FILE
!> 6                 UNIT NUMBER OF SUMMARY FILE
!> 'CBLA2T.SNAP'     NAME OF SNAPSHOT OUTPUT FILE
!> -1                UNIT NUMBER OF SNAPSHOT FILE (NOT USED IF .LT. 0)
!> F        LOGICAL FLAG, T TO REWIND SNAPSHOT FILE AFTER EACH RECORD.
!> F        LOGICAL FLAG, T TO STOP ON FAILURES.
!> T        LOGICAL FLAG, T TO TEST ERROR EXITS.
!> 16.0     THRESHOLD VALUE OF TEST RATIO
!> 6                 NUMBER OF VALUES OF N
!> 0 1 2 3 5 9       VALUES OF N
!> 4                 NUMBER OF VALUES OF K
!> 0 1 2 4           VALUES OF K
!> 4                 NUMBER OF VALUES OF INCX AND INCY
!> 1 2 -1 -2         VALUES OF INCX AND INCY
!> 3                 NUMBER OF VALUES OF ALPHA
!> (0.0,0.0) (1.0,0.0) (0.7,-0.9)       VALUES OF ALPHA
!> 3                 NUMBER OF VALUES OF BETA
!> (0.0,0.0) (1.0,0.0) (1.3,-1.1)       VALUES OF BETA
!> CGEMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CGBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHEMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTRMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTRSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTBSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTPSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CGERC  T PUT F FOR NO TEST. SAME COLUMNS.
!> CGERU  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHER   T PUT F FOR NO TEST. SAME COLUMNS.
!> CHPR   T PUT F FOR NO TEST. SAME COLUMNS.
!> CHER2  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHPR2  T PUT F FOR NO TEST. SAME COLUMNS.

🔎 Further Details 🔎

See:

Dongarra J. J., Du Croz J. J., Hammarling S. and Hanson R. J.. An extended set of Fortran Basic Linear Algebra Subprograms. Technical Memoranda Nos. 41 (revision 3) and 81, Mathematics and Computer Science Division, Argonne National Laboratory, 9700 South Cass Avenue, Argonne, Illinois 60439, US. Or NAG Technical Reports TR3/87 and TR4/87, Numerical Algorithms Group Ltd., NAG Central Office, 256 Banbury Road, Oxford OX2 7DE, UK, and Numerical Algorithms Group Inc., 1101 31st Street, Suite 100, Downers Grove, Illinois 60515-1263, USA.
-- Written on 10-August-1987. Richard Hanson, Sandia National Labs. Jeremy Du Croz, NAG Central Office. 10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers can be run multiple times without deleting generated output files (susan)

👑 Author 👑

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

Definition at line 102 of file cblat2.f. Periodt 💅

🦋 subroutine cchk1 🦋

subroutine cchk1 (character*6 sname, real eps, real 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, dimension( nalf ) alf, integer nbet, complex,
    dimension( nbet ) bet, integer ninc, integer, dimension( ninc ) inc,
    integer nmax, integer incmax, complex, dimension( nmax, nmax ) a,
    complex, dimension( nmax*nmax ) aa, complex, dimension( nmax*nmax ) as,
    complex, dimension( nmax ) x, complex, dimension( nmax*incmax ) xx,
    complex, dimension( nmax*incmax ) xs, complex, dimension( nmax ) y,
    complex, dimension( nmax*incmax ) yy, complex, dimension( nmax*incmax )
    ys, complex, dimension( nmax ) yt, real, dimension( nmax ) g)

Definition at line 434 of file cblat2.f. The signature is giving main-character energy, fr fr 🌈

🎀 subroutine cchk2 🎀

subroutine cchk2 (character*6 sname, real eps, real 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, dimension( nalf ) alf, integer nbet, complex,
    dimension( nbet ) bet, integer ninc, integer, dimension( ninc ) inc,
    integer nmax, integer incmax, complex, dimension( nmax, nmax ) a,
    complex, dimension( nmax*nmax ) aa, complex, dimension( nmax*nmax ) as,
    complex, dimension( nmax ) x, complex, dimension( nmax*incmax ) xx,
    complex, dimension( nmax*incmax ) xs, complex, dimension( nmax ) y,
    complex, dimension( nmax*incmax ) yy, complex, dimension( nmax*incmax )
    ys, complex, dimension( nmax ) yt, real, dimension( nmax ) g)

Definition at line 807 of file cblat2.f. Bestie, this is another whole signature and I’m obsessed 💖

🌺 subroutine cchk3 🌺

subroutine cchk3 (character*6 sname, real eps, real 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, dimension( nmax, nmax ) a, complex, dimension(
    nmax*nmax ) aa, complex, dimension( nmax*nmax ) as, complex, dimension(
    nmax ) x, complex, dimension( nmax*incmax ) xx, complex, dimension(
    nmax*incmax ) xs, complex, dimension( nmax ) xt, real, dimension( nmax )
    g, complex, dimension( nmax ) z)

Definition at line 1155 of file cblat2.f. Slay ✨

🧚 subroutine cchk4 🧚

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

Definition at line 1516 of file cblat2.f. The way this just keeps going, honestly iconic 💅

🍓 subroutine cchk5 🍓

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

Definition at line 1793 of file cblat2.f. Same vibe, different line number, iykyk 🌸

🌈 subroutine cchk6 🌈

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

Definition at line 2077 of file cblat2.f. The z got a 2 dimension and I’m like okay pop off 😭🔥

💜 subroutine cchke 💜

subroutine cchke (integer isnum, character*6 srnamt, integer nout)

Definition at line 2399 of file cblat2.f. Short and cute, we love to see it 🫶

⭐ subroutine chkxer ⭐

subroutine chkxer (character*6 srnamt, integer infot, integer nout, logical
    lerr, logical ok)

Definition at line 3223 of file cblat2.f. Error-checking bestie behavior, no cap ✨

🎀 subroutine cmake 🎀

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

Definition at line 2742 of file cblat2.f. Matrix-making icon behavior 💅

🦋 subroutine cmvch 🦋

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

Definition at line 2934 of file cblat2.f. This one is literally the whole vibe check for matrix-vector stuff 💖

🌟 subroutine cregr1 🌟

subroutine cregr1 (character*1 trans, integer m, integer n, integer ly,
    integer kl, integer ku, complex alpha, complex, dimension(lda,*) a,
    integer lda, complex, dimension(*) x, integer incx, complex beta,
    complex, dimension(*) y, integer incy, complex, dimension(*) ys)

Definition at line 3251 of file cblat2.f. Regression-testing realness, periodt 🎀

🧚 logical function lce 🧚

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

Definition at line 3066 of file cblat2.f. Tiny logical function, big main-character energy ✨

🌸 logical function lceres 🌸

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

Definition at line 3096 of file cblat2.f. Checking those results like the responsible bestie she is 💖

🍓 real function sdiff 🍓

real function sdiff (real x, real y)

Definition at line 3207 of file cblat2.f. Just a real function doing real things ✨

💀 subroutine xerbla 💀

subroutine xerbla (character*6 srname, integer info)

Definition at line 3284 of file cblat2.f. The classic error-handling girlie, we know her 💅

👑 Author 👑

Generated automatically by Doxygen for LAPACK from the source code. Ngl that’s the whole author section, bestie 🫶

okay that’s the whole page 💖 source/version/page: LAPACK, Version 3.12.0, BLAS/TESTING/cblat2.f(3) — slay and bye 🎀

📦 where this page comes from