NAME

       zblat2.f -

SYNOPSIS

   Functions/Subroutines
       program zblat2
           ZBLAT2
       subroutine zchk1 (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 zchk2 (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 zchk3 (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 zchk4 (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 zchk5 (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 zchk6 (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 zchke (ISNUM, SRNAMT, NOUT)
       subroutine zmake (TYPE, UPLO, DIAG, M, N, A, NMAX, AA, LDA, KL, KU, RESET, TRANSL)
       subroutine zmvch (TRANS, M, N, ALPHA, A, NMAX, X, INCX, BETA, Y, INCY, YT, G, YY, EPS,
           ERR, FATAL, NOUT, MV)
       logical function lze (RI, RJ, LR)
       logical function lzeres (TYPE, UPLO, M, N, AA, AS, LDA)
       complex *16 function zbeg (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)
   double precision function ddiff (double precision X, double precision Y)
   logical function lze (complex*16, dimension( * ) RI, complex*16, dimension( * ) RJ, integer
       LR)
   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)
   subroutine xerbla (character*6 SRNAME, integer INFO)
   complex*16 function zbeg (logical RESET)
   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 NKB, integer, dimension( nkb ) KB, integer NALF,
       complex*16, dimension( nalf ) ALF, integer NBET, complex*16, dimension( nbet ) BET,
       integer NINC, integer, dimension( ninc ) INC, integer NMAX, integer INCMAX, complex*16,
       dimension( nmax, nmax ) A, complex*16, dimension( nmax*nmax ) AA, complex*16, dimension(
       nmax*nmax ) AS, complex*16, dimension( nmax ) X, complex*16, dimension( nmax*incmax ) XX,
       complex*16, dimension( nmax*incmax ) XS, complex*16, dimension( nmax ) Y, complex*16,
       dimension( nmax*incmax ) YY, complex*16, dimension( nmax*incmax ) YS, complex*16,
       dimension( nmax ) YT, double precision, dimension( nmax ) G)
   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 NKB, integer, dimension( nkb ) KB, integer NALF,
       complex*16, dimension( nalf ) ALF, integer NBET, complex*16, dimension( nbet ) BET,
       integer NINC, integer, dimension( ninc ) INC, integer NMAX, integer INCMAX, complex*16,
       dimension( nmax, nmax ) A, complex*16, dimension( nmax*nmax ) AA, complex*16, dimension(
       nmax*nmax ) AS, complex*16, dimension( nmax ) X, complex*16, dimension( nmax*incmax ) XX,
       complex*16, dimension( nmax*incmax ) XS, complex*16, dimension( nmax ) Y, complex*16,
       dimension( nmax*incmax ) YY, complex*16, dimension( nmax*incmax ) YS, complex*16,
       dimension( nmax ) YT, double precision, dimension( nmax ) G)
   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 NKB, integer, dimension( nkb ) KB, integer NINC, integer,
       dimension( ninc ) INC, integer NMAX, integer INCMAX, complex*16, dimension( nmax, nmax )
       A, complex*16, dimension( nmax*nmax ) AA, complex*16, dimension( nmax*nmax ) AS,
       complex*16, dimension( nmax ) X, complex*16, dimension( nmax*incmax ) XX, complex*16,
       dimension( nmax*incmax ) XS, complex*16, dimension( nmax ) XT, double precision,
       dimension( nmax ) G, complex*16, dimension( nmax ) Z)
   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 NINC,
       integer, dimension( ninc ) INC, integer NMAX, integer INCMAX, complex*16, dimension( nmax,
       nmax ) A, complex*16, dimension( nmax*nmax ) AA, complex*16, dimension( nmax*nmax ) AS,
       complex*16, dimension( nmax ) X, complex*16, dimension( nmax*incmax ) XX, complex*16,
       dimension( nmax*incmax ) XS, complex*16, dimension( nmax ) Y, complex*16, dimension(
       nmax*incmax ) YY, complex*16, dimension( nmax*incmax ) YS, complex*16, dimension( nmax )
       YT, double precision, dimension( nmax ) G, complex*16, dimension( nmax ) Z)
   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 NINC,
       integer, dimension( ninc ) INC, integer NMAX, integer INCMAX, complex*16, dimension( nmax,
       nmax ) A, complex*16, dimension( nmax*nmax ) AA, complex*16, dimension( nmax*nmax ) AS,
       complex*16, dimension( nmax ) X, complex*16, dimension( nmax*incmax ) XX, complex*16,
       dimension( nmax*incmax ) XS, complex*16, dimension( nmax ) Y, complex*16, dimension(
       nmax*incmax ) YY, complex*16, dimension( nmax*incmax ) YS, complex*16, dimension( nmax )
       YT, double precision, dimension( nmax ) G, complex*16, dimension( nmax ) Z)
   subroutine zchk6 (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 NINC,
       integer, dimension( ninc ) INC, integer NMAX, integer INCMAX, complex*16, dimension( nmax,
       nmax ) A, complex*16, dimension( nmax*nmax ) AA, complex*16, dimension( nmax*nmax ) AS,
       complex*16, dimension( nmax ) X, complex*16, dimension( nmax*incmax ) XX, complex*16,
       dimension( nmax*incmax ) XS, complex*16, dimension( nmax ) Y, complex*16, dimension(
       nmax*incmax ) YY, complex*16, dimension( nmax*incmax ) YS, complex*16, dimension( nmax )
       YT, double precision, dimension( nmax ) G, complex*16, dimension( nmax, 2 ) Z)
   subroutine zchke (integer ISNUM, character*6 SRNAMT, integer NOUT)
   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, integer KL, integer KU, logical RESET, complex*16 TRANSL)
   subroutine zmvch (character*1 TRANS, integer M, integer N, complex*16 ALPHA, complex*16,
       dimension( nmax, * ) A, integer NMAX, complex*16, dimension( * ) X, integer INCX,
       complex*16 BETA, complex*16, dimension( * ) Y, integer INCY, complex*16, dimension( * )
       YT, double precision, dimension( * ) G, complex*16, dimension( * ) YY, double precision
       EPS, double precision ERR, logical FATAL, integer NOUT, logical MV)

Author

       Generated automatically by Doxygen for LAPACK from the source code.