/home/abui...G/zblat3.f(3)

💅 NAME 💅

okay bestie, this is the manual page for the file at /home/abuild/rpmbuild/BUILD/lapack-static-3.12.0-build/lapack-3.12.0/BLAS/TESTING/zblat3.f. The manual name is Library Functions Manual, and the page path/title is /home/abui...G/zblat3.f(3). Slay. 🫶

✨ SYNOPSIS ✨

Functions/Subroutines

program ZBLAT3 — it’s literally ZBLAT3.
subroutine ZCHK1 (character*6 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 nbet, complex*16, dimension( nbet ) bet, integer nmax, complex*16, dimension( nmax, nmax ) a, complex*16, dimension( nmax*nmax ) aa, complex*16, dimension( nmax*nmax ) as, complex*16, dimension( nmax, nmax ) b, complex*16, dimension( nmax*nmax ) bb, complex*16, dimension( nmax*nmax ) bs, complex*16, dimension( nmax, nmax ) c, complex*16, dimension( nmax*nmax ) cc, complex*16, dimension( nmax*nmax ) cs, complex*16, dimension( nmax ) ct, double precision, dimension( nmax ) g) — yes, that’s the whole signature.
subroutine ZCHK2 (character*6 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 nbet, complex*16, dimension( nbet ) bet, integer nmax, complex*16, dimension( nmax, nmax ) a, complex*16, dimension( nmax*nmax ) aa, complex*16, dimension( nmax*nmax ) as, complex*16, dimension( nmax, nmax ) b, complex*16, dimension( nmax*nmax ) bb, complex*16, dimension( nmax*nmax ) bs, complex*16, dimension( nmax, nmax ) c, complex*16, dimension( nmax*nmax ) cc, complex*16, dimension( nmax*nmax ) cs, complex*16, dimension( nmax ) ct, double precision, dimension( nmax ) g) — same energy, different line.
subroutine ZCHK3 (character*6 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 nmax, complex*16, dimension( nmax, nmax ) a, complex*16, dimension( nmax*nmax ) aa, complex*16, dimension( nmax*nmax ) as, complex*16, dimension( nmax, nmax ) b, complex*16, dimension( nmax*nmax ) bb, complex*16, dimension( nmax*nmax ) bs, complex*16, dimension( nmax ) ct, double precision, dimension( nmax ) g, complex*16, dimension( nmax, nmax ) c) — iconic signature behavior.
subroutine ZCHK4 (character*6 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 nbet, complex*16, dimension( nbet ) bet, integer nmax, complex*16, dimension( nmax, nmax ) a, complex*16, dimension( nmax*nmax ) aa, complex*16, dimension( nmax*nmax ) as, complex*16, dimension( nmax, nmax ) b, complex*16, dimension( nmax*nmax ) bb, complex*16, dimension( nmax*nmax ) bs, complex*16, dimension( nmax, nmax ) c, complex*16, dimension( nmax*nmax ) cc, complex*16, dimension( nmax*nmax ) cs, complex*16, dimension( nmax ) ct, double precision, dimension( nmax ) g) — no cap, every argument is right there.
subroutine ZCHK5 (character*6 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 nbet, complex*16, dimension( nbet ) bet, integer nmax, complex*16, dimension( 2*nmax*nmax ) ab, complex*16, dimension( nmax*nmax ) aa, complex*16, dimension( nmax*nmax ) as, complex*16, dimension( nmax*nmax ) bb, complex*16, dimension( nmax*nmax ) bs, complex*16, dimension( nmax, nmax ) c, complex*16, dimension( nmax*nmax ) cc, complex*16, dimension( nmax*nmax ) cs, complex*16, dimension( nmax ) ct, double precision, dimension( nmax ) g, complex*16, dimension( 2*nmax ) w) — yes bestie, 2*nmax*nmax and 2*nmax are both there.
subroutine ZCHKE (integer isnum, character*6 srnamt, integer nout) — short and sweet.
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, logical reset, complex*16 transl) — the whole little maker.
subroutine ZMMCH (character*1 transa, character*1 transb, integer m, integer n, integer kk, complex*16 alpha, complex*16, dimension( lda, * ) a, integer lda, complex*16, dimension( ldb, * ) b, integer ldb, complex*16 beta, complex*16, dimension( ldc, * ) c, integer ldc, complex*16, dimension( * ) ct, double precision, dimension( * ) g, complex*16, dimension( ldcc, * ) cc, integer ldcc, double precision eps, double precision err, logical fatal, integer nout, logical mv) — huge signature, zero notes.
logical function LZE (complex*16, dimension( * ) ri, complex*16, dimension( * ) rj, integer lr) — logical and flawless.
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) — also logical, also here.
complex*16 function ZBEG (logical reset) — yes, it returns complex*16.
double precision function DDIFF (double precision x, double precision y) — double precision, double trouble.
subroutine CHKXER (srnamt, infot, nout, lerr, ok) — listed exactly like that.
subroutine XERBLA (srname, info) — also listed exactly like that.

💖 Function/Subroutine Documentation 💖

subroutine CHKXER

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

Definition at line 3414 of file zblat3.f.

double precision function DDIFF

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

Definition at line 3395 of file zblat3.f.

logical function LZE

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

Definition at line 3248 of file zblat3.f.

logical function LZERES

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 3280 of file zblat3.f.

subroutine XERBLA

subroutine XERBLA (character*6 srname, integer info)

Definition at line 3444 of file zblat3.f.

complex*16 function ZBEG

complex*16 function ZBEG (logical reset)

Definition at line 3341 of file zblat3.f.

program ZBLAT3

program ZBLAT3

It’s literally ZBLAT3.

Purpose:

Test program for the COMPLEX*16 Level 3 Blas.

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 9 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:

!> 'zblat3.out'      NAME OF SUMMARY OUTPUT FILE
!> 6                 UNIT NUMBER OF SUMMARY FILE
!> 'ZBLAT3.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
!> ZGEMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHEMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZSYMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTRMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTRSM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHERK  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZSYRK  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHER2K T PUT F FOR NO TEST. SAME COLUMNS.
!> ZSYR2K 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)

Author

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

Definition at line 85 of file zblat3.f.

subroutine ZCHK1

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

Definition at line 404 of file zblat3.f.

subroutine ZCHK2

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

Definition at line 689 of file zblat3.f.

subroutine ZCHK3

subroutine ZCHK3 (character*6 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 nmax, complex*16, dimension(
     nmax, nmax ) a, complex*16, dimension( nmax*nmax ) aa, complex*16,
     dimension( nmax*nmax ) as, complex*16, dimension( nmax, nmax ) b,
     complex*16, dimension( nmax*nmax ) bb, complex*16, dimension( nmax*nmax
     ) bs, complex*16, dimension( nmax ) ct, double precision, dimension(
     nmax ) g, complex*16, dimension( nmax, nmax ) c)

Definition at line 968 of file zblat3.f.

subroutine ZCHK4

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

Definition at line 1279 of file zblat3.f.

subroutine ZCHK5

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

Definition at line 1611 of file zblat3.f.

subroutine ZCHKE

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

Definition at line 1985 of file zblat3.f.

subroutine ZMAKE

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

Definition at line 2929 of file zblat3.f.

subroutine ZMMCH

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

Definition at line 3058 of file zblat3.f.

🌈 Author 🌈

Generated automatically by Doxygen for LAPACK from the source code.

okay bestie, that’s the whole page! 💖 This one is LAPACK Version 3.12.0, and the footer path is /home/abui...G/zblat3.f(3). Periodt. 🫶

📦 where this page comes from

opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 · BSD-3-Clause
opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 · BSD-3-Clause
opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 · BSD-3-Clause
opensuse-leap 16.0: lapack-man 3.12.0-160000.2.2 · BSD-3-Clause
💖 girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on 2026-11-04: a language model's rewrite of the original, under its terms