Home | History | Annotate | Download | only in testing

Lines Matching refs:SNAME

438       SUBROUTINE ZCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
462 CHARACTER*6 SNAME
498 FULL = SNAME( 3: 3 ).EQ.'E'
499 BANDED = SNAME( 3: 3 ).EQ.'B'
551 CALL ZMAKE( SNAME( 2: 3 ), ' ', ' ', M, N, A, NMAX, AA,
626 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
636 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
745 WRITE( NOUT, FMT = 9999 )SNAME, NC
747 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
752 WRITE( NOUT, FMT = 9996 )SNAME
754 WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
757 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANS, M, N, KL, KU,
784 SUBROUTINE ZCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
808 CHARACTER*6 SNAME
843 FULL = SNAME( 3: 3 ).EQ.'E'
844 BANDED = SNAME( 3: 3 ).EQ.'B'
845 PACKED = SNAME( 3: 3 ).EQ.'P'
897 CALL ZMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A, NMAX, AA,
958 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
966 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
975 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1088 WRITE( NOUT, FMT = 9999 )SNAME, NC
1090 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1095 WRITE( NOUT, FMT = 9996 )SNAME
1097 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, LDA, INCX,
1100 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, K, ALPHA, LDA,
1103 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, N, ALPHA, INCX,
1133 SUBROUTINE ZCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1156 CHARACTER*6 SNAME
1190 FULL = SNAME( 3: 3 ).EQ.'R'
1191 BANDED = SNAME( 3: 3 ).EQ.'B'
1192 PACKED = SNAME( 3: 3 ).EQ.'P'
1254 CALL ZMAKE( SNAME( 2: 3 ), UPLO, DIAG, N, N, A,
1292 IF( SNAME( 4: 5 ).EQ.'MV' )THEN
1295 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1303 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1311 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1318 ELSE IF( SNAME( 4: 5 ).EQ.'SV' )THEN
1321 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1329 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1337 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1407 IF( SNAME( 4: 5 ).EQ.'MV' )THEN
1415 ELSE IF( SNAME( 4: 5 ).EQ.'SV' )THEN
1454 WRITE( NOUT, FMT = 9999 )SNAME, NC
1456 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1461 WRITE( NOUT, FMT = 9996 )SNAME
1463 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, DIAG, N, LDA,
1466 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, DIAG, N, K,
1469 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, TRANS, DIAG, N, INCX
1495 SUBROUTINE ZCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1519 CHARACTER*6 SNAME
1551 CONJ = SNAME( 5: 5 ).EQ.'C'
1613 CALL ZMAKE( SNAME( 2: 3 ), ' ', ' ', M, N, A, NMAX,
1639 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, M, N,
1739 WRITE( NOUT, FMT = 9999 )SNAME, NC
1741 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1749 WRITE( NOUT, FMT = 9996 )SNAME
1750 WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1773 SUBROUTINE ZCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1797 CHARACTER*6 SNAME
1832 FULL = SNAME( 3: 3 ).EQ.'E'
1833 PACKED = SNAME( 3: 3 ).EQ.'P'
1886 CALL ZMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A, NMAX,
1909 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
1916 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
1941 ISAME( 6 ) = LZERES( SNAME( 2: 3 ), UPLO, N, N, AS,
2019 WRITE( NOUT, FMT = 9999 )SNAME, NC
2021 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2029 WRITE( NOUT, FMT = 9996 )SNAME
2031 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, RALPHA, INCX, LDA
2033 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, RALPHA, INCX
2058 SUBROUTINE ZCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
2082 CHARACTER*6 SNAME
2118 FULL = SNAME( 3: 3 ).EQ.'E'
2119 PACKED = SNAME( 3: 3 ).EQ.'P'
2185 CALL ZMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A,
2213 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
2221 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
2249 ISAME( 8 ) = LZERES( SNAME( 2: 3 ), UPLO, N, N,
2339 WRITE( NOUT, FMT = 9999 )SNAME, NC
2341 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2349 WRITE( NOUT, FMT = 9996 )SNAME
2351 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX,
2354 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX, INCY