NAME

       sblat3.f -

SYNOPSIS

   Functions/Subroutines
       program sblat3
           SBLAT3
       subroutine schk1 (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 schk2 (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 schk3 (SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, FATAL, NIDIM, IDIM, NALF,
           ALF, NMAX, A, AA, AS, B, BB, BS, CT, G, C)
       subroutine schk4 (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 schk5 (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 schke (ISNUM, SRNAMT, NOUT)
       subroutine smake (TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, RESET, TRANSL)
       subroutine smmch (TRANSA, TRANSB, M, N, KK, ALPHA, A, LDA, B, LDB, BETA, C, LDC, CT, G,
           CC, LDCC, 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 xerbla (SRNAME, INFO)

Function/Subroutine Documentation

   subroutine chkxer (character*6 SRNAMT, integer INFOT, integer NOUT, logical LERR, logical OK)
   logical function lse (real, dimension( * ) RI, real, dimension( * ) RJ, integer LR)
   logical function lseres (character*2 TYPE, character*1 UPLO, integer M, integer N, real,
       dimension( lda, * ) AA, real, dimension( lda, * ) AS, integer LDA)
   real function sbeg (logical RESET)
   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 NALF, real, dimension( nalf ) ALF, integer NBET, real, dimension( nbet )
       BET, integer NMAX, real, dimension( nmax, nmax ) A, real, dimension( nmax*nmax ) AA, real,
       dimension( nmax*nmax ) AS, real, dimension( nmax, nmax ) B, real, dimension( nmax*nmax )
       BB, real, dimension( nmax*nmax ) BS, real, dimension( nmax, nmax ) C, real, dimension(
       nmax*nmax ) CC, real, dimension( nmax*nmax ) CS, real, dimension( nmax ) CT, real,
       dimension( nmax ) G)
   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 NALF, real, dimension( nalf ) ALF, integer NBET, real, dimension( nbet )
       BET, integer NMAX, real, dimension( nmax, nmax ) A, real, dimension( nmax*nmax ) AA, real,
       dimension( nmax*nmax ) AS, real, dimension( nmax, nmax ) B, real, dimension( nmax*nmax )
       BB, real, dimension( nmax*nmax ) BS, real, dimension( nmax, nmax ) C, real, dimension(
       nmax*nmax ) CC, real, dimension( nmax*nmax ) CS, real, dimension( nmax ) CT, real,
       dimension( nmax ) G)
   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 NALF, real, dimension( nalf ) ALF, integer NMAX, real, dimension( nmax, nmax
       ) A, real, dimension( nmax*nmax ) AA, real, dimension( nmax*nmax ) AS, real, dimension(
       nmax, nmax ) B, real, dimension( nmax*nmax ) BB, real, dimension( nmax*nmax ) BS, real,
       dimension( nmax ) CT, real, dimension( nmax ) G, real, dimension( nmax, nmax ) C)
   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 NBET, real, dimension( nbet )
       BET, integer NMAX, real, dimension( nmax, nmax ) A, real, dimension( nmax*nmax ) AA, real,
       dimension( nmax*nmax ) AS, real, dimension( nmax, nmax ) B, real, dimension( nmax*nmax )
       BB, real, dimension( nmax*nmax ) BS, real, dimension( nmax, nmax ) C, real, dimension(
       nmax*nmax ) CC, real, dimension( nmax*nmax ) CS, real, dimension( nmax ) CT, real,
       dimension( nmax ) G)
   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 NBET, real, dimension( nbet )
       BET, integer NMAX, real, dimension( 2*nmax*nmax ) AB, real, dimension( nmax*nmax ) AA,
       real, dimension( nmax*nmax ) AS, real, dimension( nmax*nmax ) BB, real, dimension(
       nmax*nmax ) BS, real, dimension( nmax, nmax ) C, real, dimension( nmax*nmax ) CC, real,
       dimension( nmax*nmax ) CS, real, dimension( nmax ) CT, real, dimension( nmax ) G, real,
       dimension( 2*nmax ) W)
   subroutine schke (integer ISNUM, character*6 SRNAMT, integer NOUT)
   real function sdiff (real X, real Y)
   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, logical
       RESET, real TRANSL)
   subroutine smmch (character*1 TRANSA, character*1 TRANSB, integer M, integer N, integer KK,
       real ALPHA, real, dimension( lda, * ) A, integer LDA, real, dimension( ldb, * ) B, integer
       LDB, real BETA, real, dimension( ldc, * ) C, integer LDC, real, dimension( * ) CT, real,
       dimension( * ) G, real, dimension( ldcc, * ) CC, integer LDCC, real EPS, real ERR, logical
       FATAL, integer NOUT, logical MV)
   subroutine xerbla (character*6 SRNAME, integer INFO)

Author

       Generated automatically by Doxygen for LAPACK from the source code.