!>
!> Test program for the DOUBLE PRECISION 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 16 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 34 lines:
!> 'dblat2.out'      NAME OF SUMMARY OUTPUT FILE
!> 6                 UNIT NUMBER OF SUMMARY FILE
!> 'DBLAT2.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 1.0 0.7       VALUES OF ALPHA
!> 3                 NUMBER OF VALUES OF BETA
!> 0.0 1.0 0.9       VALUES OF BETAC
!> DGEMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DGBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DSYMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DSBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DSPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DTRMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DTBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DTPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DTRSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DTBSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DTPSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> DGER   T PUT F FOR NO TEST. SAME COLUMNS.
!> DSYR   T PUT F FOR NO TEST. SAME COLUMNS.
!> DSPR   T PUT F FOR NO TEST. SAME COLUMNS.
!> DSYR2  T PUT F FOR NO TEST. SAME COLUMNS.
!> DSPR2  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.