sblat2.f - Man Page

BLAS/TESTING/sblat2.f

Synopsis

Functions/Subroutines

program sblat2
SBLAT2
subroutine schk1 (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 schk2 (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 schk3 (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 schk4 (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 schk5 (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 schk6 (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 schke (isnum, srnamt, nout)
subroutine smake (type, uplo, diag, m, n, a, nmax, aa, lda, kl, ku, reset, transl)
subroutine smvch (trans, m, n, alpha, a, nmax, x, incx, beta, y, incy, yt, g, yy, eps, err, fatal, nout, mv)
logical function lse (ri, rj, lr)
logical function lseres (type, uplo, m, n, aa, as, lda)
real function sbeg (reset)
real function sdiff (x, y)
subroutine chkxer (srnamt, infot, nout, lerr, ok)
subroutine sregr1 (trans, m, n, ly, kl, ku, alpha, a, lda, x, incx, beta, y, incy, ys)
subroutine xerbla (srname, info)

Function/Subroutine Documentation

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

Definition at line 3120 of file sblat2.f.

logical function lse (real, dimension( * ) ri, real, dimension( * ) rj, integer lr)

Definition at line 2969 of file sblat2.f.

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

Definition at line 2999 of file sblat2.f.

real function sbeg (logical reset)

Definition at line 3058 of file sblat2.f.

program sblat2

SBLAT2

Purpose:

 Test program for the REAL Level 2 Blas.

 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 16 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 34 lines:
 'sblat2.out'      NAME OF SUMMARY OUTPUT FILE
 6                 UNIT NUMBER OF SUMMARY FILE
 'SBLAT2.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 1.0 0.7       VALUES OF ALPHA
 3                 NUMBER OF VALUES OF BETA
 0.0 1.0 0.9       VALUES OF BETA
 SGEMV  T PUT F FOR NO TEST. SAME COLUMNS.
 SGBMV  T PUT F FOR NO TEST. SAME COLUMNS.
 SSYMV  T PUT F FOR NO TEST. SAME COLUMNS.
 SSBMV  T PUT F FOR NO TEST. SAME COLUMNS.
 SSPMV  T PUT F FOR NO TEST. SAME COLUMNS.
 STRMV  T PUT F FOR NO TEST. SAME COLUMNS.
 STBMV  T PUT F FOR NO TEST. SAME COLUMNS.
 STPMV  T PUT F FOR NO TEST. SAME COLUMNS.
 STRSV  T PUT F FOR NO TEST. SAME COLUMNS.
 STBSV  T PUT F FOR NO TEST. SAME COLUMNS.
 STPSV  T PUT F FOR NO TEST. SAME COLUMNS.
 SGER   T PUT F FOR NO TEST. SAME COLUMNS.
 SSYR   T PUT F FOR NO TEST. SAME COLUMNS.
 SSPR   T PUT F FOR NO TEST. SAME COLUMNS.
 SSYR2  T PUT F FOR NO TEST. SAME COLUMNS.
 SSPR2  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 101 of file sblat2.f.

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

Definition at line 427 of file sblat2.f.

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

Definition at line 796 of file sblat2.f.

subroutine schk3 (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, real, dimension( nmax, nmax ) a, real, dimension( nmax*nmax ) aa, real, dimension( nmax*nmax ) as, real, dimension( nmax ) x, real, dimension( nmax*incmax ) xx, real, dimension( nmax*incmax ) xs, real, dimension( nmax ) xt, real, dimension( nmax ) g, real, dimension( nmax ) z)

Definition at line 1139 of file sblat2.f.

subroutine schk4 (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, real, dimension( nalf ) alf, integer ninc, integer, dimension( ninc ) inc, integer nmax, integer incmax, real, dimension( nmax, nmax ) a, real, dimension( nmax*nmax ) aa, real, dimension( nmax*nmax ) as, real, dimension( nmax ) x, real, dimension( nmax*incmax ) xx, real, dimension( nmax*incmax ) xs, real, dimension( nmax ) y, real, dimension( nmax*incmax ) yy, real, dimension( nmax*incmax ) ys, real, dimension( nmax ) yt, real, dimension( nmax ) g, real, dimension( nmax ) z)

Definition at line 1496 of file sblat2.f.

subroutine schk5 (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, real, dimension( nalf ) alf, integer ninc, integer, dimension( ninc ) inc, integer nmax, integer incmax, real, dimension( nmax, nmax ) a, real, dimension( nmax*nmax ) aa, real, dimension( nmax*nmax ) as, real, dimension( nmax ) x, real, dimension( nmax*incmax ) xx, real, dimension( nmax*incmax ) xs, real, dimension( nmax ) y, real, dimension( nmax*incmax ) yy, real, dimension( nmax*incmax ) ys, real, dimension( nmax ) yt, real, dimension( nmax ) g, real, dimension( nmax ) z)

Definition at line 1757 of file sblat2.f.

subroutine schk6 (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, real, dimension( nalf ) alf, integer ninc, integer, dimension( ninc ) inc, integer nmax, integer incmax, real, dimension( nmax, nmax ) a, real, dimension( nmax*nmax ) aa, real, dimension( nmax*nmax ) as, real, dimension( nmax ) x, real, dimension( nmax*incmax ) xx, real, dimension( nmax*incmax ) xs, real, dimension( nmax ) y, real, dimension( nmax*incmax ) yy, real, dimension( nmax*incmax ) ys, real, dimension( nmax ) yt, real, dimension( nmax ) g, real, dimension( nmax, 2 ) z)

Definition at line 2035 of file sblat2.f.

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

Definition at line 2350 of file sblat2.f.

real function sdiff (real x, real y)

Definition at line 3104 of file sblat2.f.

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

Definition at line 2676 of file sblat2.f.

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

Definition at line 2852 of file sblat2.f.

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

Definition at line 3148 of file sblat2.f.

subroutine xerbla (character*6 srname, integer info)

Definition at line 3181 of file sblat2.f.

Author

Generated automatically by Doxygen for LAPACK from the source code.

Referenced By

The man pages lse(3), lseres(3), sbeg(3), sblat2(3), schk1(3), schk2(3), schk3(3), schk4(3), schk5(3), schk6(3), schke(3), smake(3), smvch(3) and sregr1(3) are aliases of sblat2.f(3).

Tue Nov 28 2023 12:08:41 Version 3.12.0 LAPACK