Lines Matching refs:SNAME
367 SUBROUTINE ZCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
390 CHARACTER*6 SNAME
538 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
621 WRITE( NOUT, FMT = 9999 )SNAME, NC
623 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
628 WRITE( NOUT, FMT = 9996 )SNAME
629 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K,
652 SUBROUTINE ZCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
675 CHARACTER*6 SNAME
710 CONJ = SNAME( 2: 3 ).EQ.'HE'
768 CALL ZMAKE( SNAME( 2: 3 ), UPLO, ' ', NA, NA, A, NMAX,
809 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE,
900 WRITE( NOUT, FMT = 9999 )SNAME, NC
902 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
907 WRITE( NOUT, FMT = 9996 )SNAME
908 WRITE( NOUT, FMT = 9995 )NC, SNAME
931 SUBROUTINE ZCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
955 CHARACTER*6 SNAME
1080 IF( SNAME( 4: 5 ).EQ.'MM' )THEN
1082 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1089 ELSE IF( SNAME( 4: 5 ).EQ.'SM' )THEN
1091 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1142 IF( SNAME( 4: 5 ).EQ.'MM' )THEN
1159 ELSE IF( SNAME( 4: 5 ).EQ.'SM' )THEN
1211 WRITE( NOUT, FMT = 9999 )SNAME, NC
1213 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1218 WRITE( NOUT, FMT = 9996 )SNAME
1219 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, TRANSA, DIAG, M,
1242 SUBROUTINE ZCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1265 CHARACTER*6 SNAME
1300 CONJ = SNAME( 2: 3 ).EQ.'HE'
1371 CALL ZMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, C,
1405 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1413 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1450 ISAME( 9 ) = LZERES( SNAME( 2: 3 ), UPLO, N,
1530 WRITE( NOUT, FMT = 9999 )SNAME, NC
1532 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1541 WRITE( NOUT, FMT = 9996 )SNAME
1543 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, RALPHA,
1546 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1574 SUBROUTINE ZCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1598 CHARACTER*6 SNAME
1633 CONJ = SNAME( 2: 3 ).EQ.'HE'
1717 CALL ZMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, C,
1751 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1759 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1904 WRITE( NOUT, FMT = 9999 )SNAME, NC
1906 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1915 WRITE( NOUT, FMT = 9996 )SNAME
1917 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1920 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
