!>
!> Test program for the COMPLEX*16       Level 2 Blas.
!>
!> The program must be driven by a short data file. The first 18 records
!> of the file are read using list-directed input, the last 17 records
!> are read using the format ( A6, L2 ). An annotated example of a data
!> file can be obtained by deleting the first 3 characters from the
!> following 35 lines:
!> 'zblat2.out'      NAME OF SUMMARY OUTPUT FILE
!> 6                 UNIT NUMBER OF SUMMARY FILE
!> 'CBLA2T.SNAP'     NAME OF SNAPSHOT OUTPUT FILE
!> -1                UNIT NUMBER OF SNAPSHOT FILE (NOT USED IF .LT. 0)
!> F        LOGICAL FLAG, T TO REWIND SNAPSHOT FILE AFTER EACH RECORD.
!> F        LOGICAL FLAG, T TO STOP ON FAILURES.
!> T        LOGICAL FLAG, T TO TEST ERROR EXITS.
!> 16.0     THRESHOLD VALUE OF TEST RATIO
!> 6                 NUMBER OF VALUES OF N
!> 0 1 2 3 5 9       VALUES OF N
!> 4                 NUMBER OF VALUES OF K
!> 0 1 2 4           VALUES OF K
!> 4                 NUMBER OF VALUES OF INCX AND INCY
!> 1 2 -1 -2         VALUES OF INCX AND INCY
!> 3                 NUMBER OF VALUES OF ALPHA
!> (0.0,0.0) (1.0,0.0) (0.7,-0.9)       VALUES OF ALPHA
!> 3                 NUMBER OF VALUES OF BETA
!> (0.0,0.0) (1.0,0.0) (1.3,-1.1)       VALUES OF BETA
!> ZGEMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZGBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHEMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTRMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTRSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTBSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTPSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZGERC  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZGERU  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHER   T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHPR   T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHER2  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHPR2  T PUT F FOR NO TEST. SAME COLUMNS.
!>
!> Further Details
!> ===============
!>
!>    See:
!>
!>       Dongarra J. J., Du Croz J. J., Hammarling S.  and Hanson R. J..
!>       An  extended  set of Fortran  Basic Linear Algebra Subprograms.
!>
!>       Technical  Memoranda  Nos. 41 (revision 3) and 81,  Mathematics
!>       and  Computer Science  Division,  Argonne  National Laboratory,
!>       9700 South Cass Avenue, Argonne, Illinois 60439, US.
!>
!>       Or
!>
!>       NAG  Technical Reports TR3/87 and TR4/87,  Numerical Algorithms
!>       Group  Ltd.,  NAG  Central  Office,  256  Banbury  Road, Oxford
!>       OX2 7DE, UK,  and  Numerical Algorithms Group Inc.,  1101  31st
!>       Street,  Suite 100,  Downers Grove,  Illinois 60515-1263,  USA.
!>
!>
!> -- Written on 10-August-1987.
!>    Richard Hanson, Sandia National Labs.
!>    Jeremy Du Croz, NAG Central Office.
!>
!>    10-9-00:  Change STATUS='NEW' to 'UNKNOWN' so that the testers
!>              can be run multiple times without deleting generated
!>              output files (susan)
!> 

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.