BLAS/TESTING/dblat3.f(3) Library Functions Manual BLAS/TESTING/dblat3.f(3) NAME BLAS/TESTING/dblat3.f SYNOPSIS Functions/Subroutines program dblat3 DBLAT3 subroutine dchk1 (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 dchk2 (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 dchk3 (sname, eps, thresh, nout, ntra, trace, rewi, fatal, nidim, idim, nalf, alf, nmax, a, aa, as, b, bb, bs, ct, g, c) subroutine dchk4 (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 dchk5 (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 dchke (isnum, srnamt, nout) subroutine dmake (type, uplo, diag, m, n, a, nmax, aa, lda, reset, transl) subroutine dmmch (transa, transb, m, n, kk, alpha, a, lda, b, ldb, beta, c, ldc, ct, g, cc, ldcc, eps, err, fatal, nout, mv) logical function lde (ri, rj, lr) logical function lderes (type, uplo, m, n, aa, as, lda) double precision function dbeg (reset) double precision function ddiff (x, y) subroutine chkxer (srnamt, infot, nout, lerr, ok) subroutine xerbla (srname, info) Function/Subroutine Documentation subroutine chkxer (character*6 srnamt, integer infot, integer nout, logical lerr, logical ok) Definition at line 2785 of file dblat3.f. double precision function dbeg (logical reset) Definition at line 2720 of file dblat3.f. program dblat3 DBLAT3 Purpose: Test program for the DOUBLE PRECISION 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 6 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 20 lines: 'dblat3.out' NAME OF SUMMARY OUTPUT FILE 6 UNIT NUMBER OF SUMMARY FILE 'DBLAT3.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 1.0 0.7 VALUES OF ALPHA 3 NUMBER OF VALUES OF BETA 0.0 1.0 1.3 VALUES OF BETA DGEMM T PUT F FOR NO TEST. SAME COLUMNS. DSYMM T PUT F FOR NO TEST. SAME COLUMNS. DTRMM T PUT F FOR NO TEST. SAME COLUMNS. DTRSM T PUT F FOR NO TEST. SAME COLUMNS. DSYRK T PUT F FOR NO TEST. SAME COLUMNS. DSYR2K 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 81 of file dblat3.f. subroutine dchk1 (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, double precision, dimension( nalf ) alf, integer nbet, double precision, dimension( nbet ) bet, integer nmax, double precision, dimension( nmax, nmax ) a, double precision, dimension( nmax*nmax ) aa, double precision, dimension( nmax*nmax ) as, double precision, dimension( nmax, nmax ) b, double precision, dimension( nmax*nmax ) bb, double precision, dimension( nmax*nmax ) bs, double precision, dimension( nmax, nmax ) c, double precision, dimension( nmax*nmax ) cc, double precision, dimension( nmax*nmax ) cs, double precision, dimension( nmax ) ct, double precision, dimension( nmax ) g) Definition at line 392 of file dblat3.f. subroutine dchk2 (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, double precision, dimension( nalf ) alf, integer nbet, double precision, dimension( nbet ) bet, integer nmax, double precision, dimension( nmax, nmax ) a, double precision, dimension( nmax*nmax ) aa, double precision, dimension( nmax*nmax ) as, double precision, dimension( nmax, nmax ) b, double precision, dimension( nmax*nmax ) bb, double precision, dimension( nmax*nmax ) bs, double precision, dimension( nmax, nmax ) c, double precision, dimension( nmax*nmax ) cc, double precision, dimension( nmax*nmax ) cs, double precision, dimension( nmax ) ct, double precision, dimension( nmax ) g) Definition at line 673 of file dblat3.f. subroutine dchk3 (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, double precision, dimension( nalf ) alf, integer nmax, double precision, dimension( nmax, nmax ) a, double precision, dimension( nmax*nmax ) aa, double precision, dimension( nmax*nmax ) as, double precision, dimension( nmax, nmax ) b, double precision, dimension( nmax*nmax ) bb, double precision, dimension( nmax*nmax ) bs, double precision, dimension( nmax ) ct, double precision, dimension( nmax ) g, double precision, dimension( nmax, nmax ) c) Definition at line 943 of file dblat3.f. subroutine dchk4 (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, double precision, dimension( nalf ) alf, integer nbet, double precision, dimension( nbet ) bet, integer nmax, double precision, dimension( nmax, nmax ) a, double precision, dimension( nmax*nmax ) aa, double precision, dimension( nmax*nmax ) as, double precision, dimension( nmax, nmax ) b, double precision, dimension( nmax*nmax ) bb, double precision, dimension( nmax*nmax ) bs, double precision, dimension( nmax, nmax ) c, double precision, dimension( nmax*nmax ) cc, double precision, dimension( nmax*nmax ) cs, double precision, dimension( nmax ) ct, double precision, dimension( nmax ) g) Definition at line 1248 of file dblat3.f. subroutine dchk5 (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, double precision, dimension( nalf ) alf, integer nbet, double precision, dimension( nbet ) bet, integer nmax, double precision, dimension( 2*nmax*nmax ) ab, double precision, dimension( nmax*nmax ) aa, double precision, dimension( nmax*nmax ) as, double precision, dimension( nmax*nmax ) bb, double precision, dimension( nmax*nmax ) bs, double precision, dimension( nmax, nmax ) c, double precision, dimension( nmax*nmax ) cc, double precision, dimension( nmax*nmax ) cs, double precision, dimension( nmax ) ct, double precision, dimension( nmax ) g, double precision, dimension( 2*nmax ) w) Definition at line 1523 of file dblat3.f. subroutine dchke (integer isnum, character*6 srnamt, integer nout) Definition at line 1837 of file dblat3.f. double precision function ddiff (double precision x, double precision y) Definition at line 2766 of file dblat3.f. subroutine dmake (character*2 type, character*1 uplo, character*1 diag, integer m, integer n, double precision, dimension( nmax, * ) a, integer nmax, double precision, dimension( * ) aa, integer lda, logical reset, double precision transl) Definition at line 2392 of file dblat3.f. subroutine dmmch (character*1 transa, character*1 transb, integer m, integer n, integer kk, double precision alpha, double precision, dimension( lda, * ) a, integer lda, double precision, dimension( ldb, * ) b, integer ldb, double precision beta, double precision, dimension( ldc, * ) c, integer ldc, double precision, dimension( * ) ct, double precision, dimension( * ) g, double precision, dimension( ldcc, * ) cc, integer ldcc, double precision eps, double precision err, logical fatal, integer nout, logical mv) Definition at line 2505 of file dblat3.f. logical function lde (double precision, dimension( * ) ri, double precision, dimension( * ) rj, integer lr) Definition at line 2627 of file dblat3.f. logical function lderes (character*2 type, character*1 uplo, integer m, integer n, double precision, dimension( lda, * ) aa, double precision, dimension( lda, * ) as, integer lda) Definition at line 2659 of file dblat3.f. subroutine xerbla (character*6 srname, integer info) Definition at line 2815 of file dblat3.f. Author Generated automatically by Doxygen for LAPACK from the source code. LAPACK Version 3.12.0 BLAS/TESTING/dblat3.f(3)