!>
!> ZDRVHE_RK tests the driver routines ZHESV_RK.
!> 

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.
!> 

NN

!>          NN is INTEGER
!>          The number of values of N contained in the vector NVAL.
!> 

NVAL

!>          NVAL is INTEGER array, dimension (NN)
!>          The values of the matrix dimension N.
!> 

NRHS

!>          NRHS is INTEGER
!>          The number of right hand side vectors to be generated for
!>          each linear system.
!> 

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.
!> 

TSTERR

!>          TSTERR is LOGICAL
!>          Flag that indicates whether error exits are to be tested.
!> 

NMAX

!>          NMAX is INTEGER
!>          The maximum value permitted for N, used in dimensioning the
!>          work arrays.
!> 

A

!>          A is COMPLEX*16 array, dimension (NMAX*NMAX)
!> 

AFAC

!>          AFAC is COMPLEX*16 array, dimension (NMAX*NMAX)
!> 

E

!>          E is COMPLEX*16 array, dimension (NMAX)
!> 

AINV

!>          AINV is COMPLEX*16 array, dimension (NMAX*NMAX)
!> 

B

!>          B is COMPLEX*16 array, dimension (NMAX*NRHS)
!> 

X

!>          X is COMPLEX*16 array, dimension (NMAX*NRHS)
!> 

XACT

!>          XACT is COMPLEX*16 array, dimension (NMAX*NRHS)
!> 

WORK

!>          WORK is COMPLEX*16 array, dimension (NMAX*max(2,NRHS))
!> 

RWORK

!>          RWORK is DOUBLE PRECISION array, dimension (NMAX+2*NRHS)
!> 

IWORK

!>          IWORK is INTEGER array, dimension (NMAX)
!> 

NOUT

!>          NOUT is INTEGER
!>          The unit number for output.
!> 

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.