![]() |
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 | ||
| ) |