!>
!> ZCHKPS tests ZPSTRF.
!> 

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

NNB

!>          NNB is INTEGER
!>          The number of values of NB contained in the vector NBVAL.
!> 

NBVAL

!>          NBVAL is INTEGER array, dimension (NNB)
!>          The values of the block size NB.
!> 

NRANK

!>          NRANK is INTEGER
!>          The number of values of RANK contained in the vector RANKVAL.
!> 

RANKVAL

!>          RANKVAL is INTEGER array, dimension (NBVAL)
!>          The values of the block size NB.
!> 

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

PERM

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

PIV

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

WORK

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

RWORK

!>          RWORK is DOUBLE PRECISION 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.