complex16

Functions
program	zblat1
	ZBLAT1
program	zblat2
	ZBLAT2
program	zblat3
	ZBLAT3

Detailed Description

This is the group of complex16 BLAS TESTING routines.

Function Documentation

zblat1()

program zblat1

ZBLAT1

Purpose:

!>
!>    Test program for the COMPLEX*16 Level 1 BLAS.
!>
!>    Based upon the original BLAS test routine together with:
!>    F06GAF Example Program Text
!> 

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line 36 of file zblat1.f.

zblat2()

program zblat2

ZBLAT2

Purpose:

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

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line 102 of file zblat2.f.

zblat3()

program zblat3

ZBLAT3

Purpose:

!>
!> Test program for the COMPLEX*16       Level 3 Blas.
!>
!> The program must be driven by a short data file. The first 14 records
!> of the file are read using list-directed input, the last 9 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 23 lines:
!> 'zblat3.out'      NAME OF SUMMARY OUTPUT FILE
!> 6                 UNIT NUMBER OF SUMMARY FILE
!> 'ZBLAT3.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
!> 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
!> ZGEMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHEMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZSYMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTRMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZTRSM  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHERK  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZSYRK  T PUT F FOR NO TEST. SAME COLUMNS.
!> ZHER2K T PUT F FOR NO TEST. SAME COLUMNS.
!> ZSYR2K T PUT F FOR NO TEST. SAME COLUMNS.
!>
!>
!> Further Details
!> ===============
!>
!> See:
!>
!>    Dongarra J. J., Du Croz J. J., Duff I. S. and Hammarling S.
!>    A Set of Level 3 Basic Linear Algebra Subprograms.
!>
!>    Technical Memorandum No.88 (Revision 1), Mathematics and
!>    Computer Science Division, Argonne National Laboratory, 9700
!>    South Cass Avenue, Argonne, Illinois 60439, US.
!>
!> -- Written on 8-February-1989.
!>    Jack Dongarra, Argonne National Laboratory.
!>    Iain Duff, AERE Harwell.
!>    Jeremy Du Croz, Numerical Algorithms Group Ltd.
!>    Sven Hammarling, Numerical Algorithms Group Ltd.
!>
!>    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 85 of file zblat3.f.