◆ sblat2()

program sblat2
SBLAT2
Purpose:
!>
!> Test program for the REAL 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:
!> 'sblat2.out'      NAME OF SUMMARY OUTPUT FILE
!> 6                 UNIT NUMBER OF SUMMARY FILE
!> 'SBLAT2.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 BETA
!> SGEMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> SGBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> SSYMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> SSBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> SSPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> STRMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> STBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> STPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> STRSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> STBSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> STPSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> SGER   T PUT F FOR NO TEST. SAME COLUMNS.
!> SSYR   T PUT F FOR NO TEST. SAME COLUMNS.
!> SSPR   T PUT F FOR NO TEST. SAME COLUMNS.
!> SSYR2  T PUT F FOR NO TEST. SAME COLUMNS.
!> SSPR2  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)
!>
Author: Univ. of Tennessee; Univ. of California Berkeley; Univ. of Colorado Denver; NAG Ltd.
Definition at line 101 of file sblat2.f.
Here is the call graph for this function: