LAPACK
3.4.2
LAPACK: Linear Algebra PACKage
|
Go to the source code of this file.
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) |
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 | ||
) |
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 | ||
) |