![]() |
LAPACK 3.11.0
LAPACK: Linear Algebra PACKage
|
subroutine zdrvsy | ( | logical, dimension( * ) | dotype, |
integer | nn, | ||
integer, dimension( * ) | nval, | ||
integer | nrhs, | ||
double precision | thresh, | ||
logical | tsterr, | ||
integer | nmax, | ||
complex*16, dimension( * ) | a, | ||
complex*16, dimension( * ) | afac, | ||
complex*16, dimension( * ) | ainv, | ||
complex*16, dimension( * ) | b, | ||
complex*16, dimension( * ) | x, | ||
complex*16, dimension( * ) | xact, | ||
complex*16, dimension( * ) | work, | ||
double precision, dimension( * ) | rwork, | ||
integer, dimension( * ) | iwork, | ||
integer | nout | ||
) |
ZDRVSY
ZDRVSYX
ZDRVSY tests the driver routines ZSYSV and -SVX.
[in] | DOTYPE | DOTYPE is LOGICAL array, dimension (NTYPES) The matrix types to be used for testing. Matrices of type j (for 1 <= j <= NTYPES) are used for testing if DOTYPE(j) = .TRUE.; if DOTYPE(j) = .FALSE., then type j is not used. |
[in] | NN | NN is INTEGER The number of values of N contained in the vector NVAL. |
[in] | NVAL | NVAL is INTEGER array, dimension (NN) The values of the matrix dimension N. |
[in] | NRHS | NRHS is INTEGER The number of right hand side vectors to be generated for each linear system. |
[in] | THRESH | THRESH is DOUBLE PRECISION The threshold value for the test ratios. A result is included in the output file if RESULT >= THRESH. To have every test ratio printed, use THRESH = 0. |
[in] | TSTERR | TSTERR is LOGICAL Flag that indicates whether error exits are to be tested. |
[in] | NMAX | NMAX is INTEGER The maximum value permitted for N, used in dimensioning the work arrays. |
[out] | A | A is COMPLEX*16 array, dimension (NMAX*NMAX) |
[out] | AFAC | AFAC is COMPLEX*16 array, dimension (NMAX*NMAX) |
[out] | AINV | AINV is COMPLEX*16 array, dimension (NMAX*NMAX) |
[out] | B | B is COMPLEX*16 array, dimension (NMAX*NRHS) |
[out] | X | X is COMPLEX*16 array, dimension (NMAX*NRHS) |
[out] | XACT | XACT is COMPLEX*16 array, dimension (NMAX*NRHS) |
[out] | WORK | WORK is COMPLEX*16 array, dimension (NMAX*max(2,NRHS)) |
[out] | RWORK | RWORK is DOUBLE PRECISION array, dimension (NMAX+2*NRHS) |
[out] | IWORK | IWORK is INTEGER array, dimension (NMAX) |
[in] | NOUT | NOUT is INTEGER The unit number for output. |
ZDRVSY tests the driver routines ZSYSV, -SVX, and -SVXX. Note that this file is used only when the XBLAS are available, otherwise zdrvsy.f defines this subroutine.
[in] | DOTYPE | DOTYPE is LOGICAL array, dimension (NTYPES) The matrix types to be used for testing. Matrices of type j (for 1 <= j <= NTYPES) are used for testing if DOTYPE(j) = .TRUE.; if DOTYPE(j) = .FALSE., then type j is not used. |
[in] | NN | NN is INTEGER The number of values of N contained in the vector NVAL. |
[in] | NVAL | NVAL is INTEGER array, dimension (NN) The values of the matrix dimension N. |
[in] | NRHS | NRHS is INTEGER The number of right hand side vectors to be generated for each linear system. |
[in] | THRESH | THRESH is DOUBLE PRECISION The threshold value for the test ratios. A result is included in the output file if RESULT >= THRESH. To have every test ratio printed, use THRESH = 0. |
[in] | TSTERR | TSTERR is LOGICAL Flag that indicates whether error exits are to be tested. |
[in] | NMAX | NMAX is INTEGER The maximum value permitted for N, used in dimensioning the work arrays. |
[out] | A | A is COMPLEX*16 array, dimension (NMAX*NMAX) |
[out] | AFAC | AFAC is COMPLEX*16 array, dimension (NMAX*NMAX) |
[out] | AINV | AINV is COMPLEX*16 array, dimension (NMAX*NMAX) |
[out] | B | B is COMPLEX*16 array, dimension (NMAX*NRHS) |
[out] | X | X is COMPLEX*16 array, dimension (NMAX*NRHS) |
[out] | XACT | XACT is COMPLEX*16 array, dimension (NMAX*NRHS) |
[out] | WORK | WORK is COMPLEX*16 array, dimension (NMAX*max(2,NRHS)) |
[out] | RWORK | RWORK is DOUBLE PRECISION array, dimension (2*NMAX+2*NRHS) |
[out] | IWORK | IWORK is INTEGER array, dimension (NMAX) |
[in] | NOUT | NOUT is INTEGER The unit number for output. |