BLAS/TESTING/cblat3.f(3)

📦 version 3.12.1, in arch rolling

💅 NAME 💅

okay so the manual page is BLAS/TESTING/cblat3.f(3), and the file itself is BLAS/TESTING/cblat3.f — yes bestie, it’s the complex Level 3 BLAS tester and it has main character energy. 🦋

✨ SYNOPSIS ✨

🎀 Functions/Subroutines 🎀

here’s the whole squad — every single function and subroutine, no skipping, no cap:

program cblat3 — CBLAT3
subroutine cchk1 — args: sname, eps, thresh, nout, ntra, trace, rewi, fatal, nidim, idim, nalf, alf, nbet, bet, nmax, a, aa, as, b, bb, bs, c, cc, cs, ct, g
subroutine cchk2 — args: sname, eps, thresh, nout, ntra, trace, rewi, fatal, nidim, idim, nalf, alf, nbet, bet, nmax, a, aa, as, b, bb, bs, c, cc, cs, ct, g
subroutine cchk3 — args: sname, eps, thresh, nout, ntra, trace, rewi, fatal, nidim, idim, nalf, alf, nmax, a, aa, as, b, bb, bs, ct, g, c
subroutine cchk4 — args: sname, eps, thresh, nout, ntra, trace, rewi, fatal, nidim, idim, nalf, alf, nbet, bet, nmax, a, aa, as, b, bb, bs, c, cc, cs, ct, g
subroutine cchk5 — args: sname, eps, thresh, nout, ntra, trace, rewi, fatal, nidim, idim, nalf, alf, nbet, bet, nmax, ab, aa, as, bb, bs, c, cc, cs, ct, g, w
subroutine cchke — args: isnum, srnamt, nout
subroutine cmake — args: type, uplo, diag, m, n, a, nmax, aa, lda, reset, transl
subroutine cmmch — args: transa, transb, m, n, kk, alpha, a, lda, b, ldb, beta, c, ldc, ct, g, cc, ldcc, eps, err, fatal, nout, mv
logical function lce — args: ri, rj, lr
logical function lceres — args: type, uplo, m, n, aa, as, lda
complex function cbeg — args: reset
real function sdiff — args: x, y
subroutine chkxer — args: srnamt, infot, nout, lerr, ok
subroutine xerbla — args: srname, info
subroutine cchk6 — args: sname, eps, thresh, nout, ntra, trace, rewi, fatal, nidim, idim, nalf, alf, nbet, bet, nmax, a, aa, as, b, bb, bs, c, cc, cs, ct, g
subroutine cmmtch — args: uplo, transa, transb, n, kk, alpha, a, lda, b, ldb, beta, c, ldc, ct, g, cc, ldcc, eps, err, fatal, nout, mv

🌸 Function/Subroutine Documentation 🌸

💜 complex function cbeg (logical reset)

complex function cbeg (logical reset)

Definition at line 3534 of file cblat3.f.

👑 program cblat3

program cblat3

CBLAT3

Purpose:

okay so this is the test program for the COMPLEX Level 3 Blas — yes, it says “Blas” like that, iconic. The program must be driven by a short data file. The first 14 records of the file are read using list-directed input, the last 10 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 23 lines:

'cblat3.out'      NAME OF SUMMARY OUTPUT FILE
6                 UNIT NUMBER OF SUMMARY FILE
'CBLAT3.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
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
CGEMM  T PUT F FOR NO TEST. SAME COLUMNS.
CHEMM  T PUT F FOR NO TEST. SAME COLUMNS.
CSYMM  T PUT F FOR NO TEST. SAME COLUMNS.
CTRMM  T PUT F FOR NO TEST. SAME COLUMNS.
CTRSM  T PUT F FOR NO TEST. SAME COLUMNS.
CHERK  T PUT F FOR NO TEST. SAME COLUMNS.
CSYRK  T PUT F FOR NO TEST. SAME COLUMNS.
CHER2K T PUT F FOR NO TEST. SAME COLUMNS.
CSYR2K T PUT F FOR NO TEST. SAME COLUMNS.
CGEMMTR T PUT F FOR NO TEST. SAME COLUMNS.

Further Details

See:

Dongarra J. J., Du Croz J. J., Duff I. S. and Hammarling S. A Set of Level 3 Basic Linear Algebra Subprograms.
Technical Memorandum No.88 (Revision 1), Mathematics and Computer Science Division, Argonne National Laboratory, 9700 South Cass Avenue, Argonne, Illinois 60439, US.

Written on 8-February-1989.

Jack Dongarra, Argonne National Laboratory.
Iain Duff, AERE Harwell.
Jeremy Du Croz, Numerical Algorithms Group Ltd.
Sven Hammarling, Numerical Algorithms Group Ltd.

10-9-00: Change STATUS='NEW' to 'UNKNOWN' so that the testers can be run multiple times without deleting generated output files (susan). periodt. 💅

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line 85 of file cblat3.f.

🎀 subroutine cchk1

subroutine cchk1 (character*7 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 nbet, complex, dimension( nbet ) bet, integer nmax,
    complex, dimension( nmax, nmax ) a, complex, dimension( nmax*nmax ) aa,
    complex, dimension( nmax*nmax ) as, complex, dimension( nmax, nmax ) b,
    complex, dimension( nmax*nmax ) bb, complex, dimension( nmax*nmax ) bs,
    complex, dimension( nmax, nmax ) c, complex, dimension( nmax*nmax ) cc,
    complex, dimension( nmax*nmax ) cs, complex, dimension( nmax ) ct, real,
    dimension( nmax ) g)

Definition at line 409 of file cblat3.f.

🎀 subroutine cchk2

subroutine cchk2 (character*7 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 nbet, complex, dimension( nbet ) bet, integer nmax,
    complex, dimension( nmax, nmax ) a, complex, dimension( nmax*nmax ) aa,
    complex, dimension( nmax*nmax ) as, complex, dimension( nmax, nmax ) b,
    complex, dimension( nmax*nmax ) bb, complex, dimension( nmax*nmax ) bs,
    complex, dimension( nmax, nmax ) c, complex, dimension( nmax*nmax ) cc,
    complex, dimension( nmax*nmax ) cs, complex, dimension( nmax ) ct, real,
    dimension( nmax ) g)

Definition at line 694 of file cblat3.f.

🎀 subroutine cchk3

subroutine cchk3 (character*7 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 nmax, complex, dimension( nmax, nmax ) a, complex,
    dimension( nmax*nmax ) aa, complex, dimension( nmax*nmax ) as, complex,
    dimension( nmax, nmax ) b, complex, dimension( nmax*nmax ) bb, complex,
    dimension( nmax*nmax ) bs, complex, dimension( nmax ) ct, real,
    dimension( nmax ) g, complex, dimension( nmax, nmax ) c)

Definition at line 973 of file cblat3.f.

🎀 subroutine cchk4

subroutine cchk4 (character*7 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 nbet, complex, dimension( nbet ) bet, integer nmax,
    complex, dimension( nmax, nmax ) a, complex, dimension( nmax*nmax ) aa,
    complex, dimension( nmax*nmax ) as, complex, dimension( nmax, nmax ) b,
    complex, dimension( nmax*nmax ) bb, complex, dimension( nmax*nmax ) bs,
    complex, dimension( nmax, nmax ) c, complex, dimension( nmax*nmax ) cc,
    complex, dimension( nmax*nmax ) cs, complex, dimension( nmax ) ct, real,
    dimension( nmax ) g)

Definition at line 1283 of file cblat3.f.

🎀 subroutine cchk5

subroutine cchk5 (character*7 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 nbet, complex, dimension( nbet ) bet, integer nmax,
    complex, dimension( 2*nmax*nmax ) ab, complex, dimension( nmax*nmax )
    aa, complex, dimension( nmax*nmax ) as, complex, dimension( nmax*nmax )
    bb, complex, dimension( nmax*nmax ) bs, complex, dimension( nmax, nmax )
    c, complex, dimension( nmax*nmax ) cc, complex, dimension( nmax*nmax )
    cs, complex, dimension( nmax ) ct, real, dimension( nmax ) g, complex,
    dimension( 2*nmax ) w)

Definition at line 1615 of file cblat3.f.

🎀 subroutine cchk6

subroutine cchk6 (character*7 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 nbet, complex, dimension( nbet ) bet, integer nmax,
    complex, dimension( nmax, nmax ) a, complex, dimension( nmax*nmax ) aa,
    complex, dimension( nmax*nmax ) as, complex, dimension( nmax, nmax ) b,
    complex, dimension( nmax*nmax ) bb, complex, dimension( nmax*nmax ) bs,
    complex, dimension( nmax, nmax ) c, complex, dimension( nmax*nmax ) cc,
    complex, dimension( nmax*nmax ) cs, complex, dimension( nmax ) ct, real,
    dimension( nmax ) g)

Definition at line 3693 of file cblat3.f.

🧚 subroutine cchke

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

Definition at line 1988 of file cblat3.f.

🧚 subroutine chkxer

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

Definition at line 3607 of file cblat3.f.

🧚 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, logical reset, complex transl)

Definition at line 3125 of file cblat3.f.

🧚 subroutine cmmch

subroutine cmmch (character*1 transa, character*1 transb, integer m, integer
    n, integer kk, complex alpha, complex, dimension( lda, * ) a, integer
    lda, complex, dimension( ldb, * ) b, integer ldb, complex beta, complex,
    dimension( ldc, * ) c, integer ldc, complex, dimension( * ) ct, real,
    dimension( * ) g, complex, dimension( ldcc, * ) cc, integer ldcc, real
    eps, real err, logical fatal, integer nout, logical mv)

Definition at line 3253 of file cblat3.f.

🧚 subroutine cmmtch

subroutine cmmtch (character*1 uplo, character*1 transa, character*1 transb,
    integer n, integer kk, complex alpha, complex, dimension( lda, * ) a,
    integer lda, complex, dimension( ldb, * ) b, integer ldb, complex beta,
    complex, dimension( ldc, * ) c, integer ldc, complex, dimension( * ) ct,
    real, dimension( * ) g, complex, dimension( ldcc, * ) cc, integer ldcc,
    real eps, real err, logical fatal, integer nout, logical mv)

Definition at line 3983 of file cblat3.f.

🦋 logical function lce

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

Definition at line 3441 of file cblat3.f.

🦋 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 3473 of file cblat3.f.

🦋 real function sdiff

real function sdiff (real x, real y)

Definition at line 3588 of file cblat3.f.

🦋 subroutine xerbla

subroutine xerbla (character*(*) srname, integer info)

Definition at line 3637 of file cblat3.f.

okay part 1 ends here, but we’re not done — part 2 is right behind this 💅✨

✨ AUTHOR ✨

Ok so nobody actually wrote this page by hand — it was generated automatically by Doxygen for LAPACK from the source code, bestie. 💅 Like, the docs literally wrote themselves from the code, no cap. So if you're looking for a human to @ about a typo… it's the source code, babe. 🫶

And that's the whole page, omg we made it 💖 Go take a vibe check break, you earned it. This little masterpiece came from LAPACK, Version 3.12.0, and it lives at BLAS/TESTING/cblat3.f(3) — iconic address, honestly. 🎀✨

📦 where this page comes from

arch rolling: lapack-doc 3.12.1-2 · custom
💖 girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on 2026-11-04: a language model's rewrite of the original, under its terms