OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches

Functions

program cblat1
 CBLAT1
program cblat2
 CBLAT2
program cblat3
 CBLAT3

Detailed Description

This is the group of complex BLAS TESTING routines.

Function Documentation

◆ cblat1()

program cblat1

CBLAT1

Purpose:
!>
!>    Test program for the COMPLEX 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 cblat1.f.

◆ cblat2()

program cblat2

CBLAT2

Purpose:
!>
!> Test program for the COMPLEX          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:
!> 'cblat2.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
!> CGEMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CGBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHEMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTRMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTBMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTPMV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTRSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTBSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTPSV  T PUT F FOR NO TEST. SAME COLUMNS.
!> CGERC  T PUT F FOR NO TEST. SAME COLUMNS.
!> CGERU  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHER   T PUT F FOR NO TEST. SAME COLUMNS.
!> CHPR   T PUT F FOR NO TEST. SAME COLUMNS.
!> CHER2  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHPR2  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 cblat2.f.

◆ cblat3()

program cblat3

CBLAT3

Purpose:
!>
!> Test program for the COMPLEX          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:
!> 'cblat3.out'      NAME OF SUMMARY OUTPUT FILE
!> 6                 UNIT NUMBER OF SUMMARY FILE
!> 'CBLAT3.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
!> CGEMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHEMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> CSYMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTRMM  T PUT F FOR NO TEST. SAME COLUMNS.
!> CTRSM  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHERK  T PUT F FOR NO TEST. SAME COLUMNS.
!> CSYRK  T PUT F FOR NO TEST. SAME COLUMNS.
!> CHER2K T PUT F FOR NO TEST. SAME COLUMNS.
!> CSYR2K 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 84 of file cblat3.f.