Lines Matching refs:SNAME
366 SUBROUTINE CCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
389 CHARACTER*6 SNAME
537 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
620 WRITE( NOUT, FMT = 9999 )SNAME, NC
622 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
627 WRITE( NOUT, FMT = 9996 )SNAME
628 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K,
651 SUBROUTINE CCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
674 CHARACTER*6 SNAME
709 CONJ = SNAME( 2: 3 ).EQ.'HE'
767 CALL CMAKE( SNAME( 2: 3 ), UPLO, ' ', NA, NA, A, NMAX,
808 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE,
899 WRITE( NOUT, FMT = 9999 )SNAME, NC
901 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
906 WRITE( NOUT, FMT = 9996 )SNAME
907 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, M, N, ALPHA, LDA,
930 SUBROUTINE CCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
953 CHARACTER*6 SNAME
1078 IF( SNAME( 4: 5 ).EQ.'MM' )THEN
1080 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1087 ELSE IF( SNAME( 4: 5 ).EQ.'SM' )THEN
1089 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1140 IF( SNAME( 4: 5 ).EQ.'MM' )THEN
1157 ELSE IF( SNAME( 4: 5 ).EQ.'SM' )THEN
1209 WRITE( NOUT, FMT = 9999 )SNAME, NC
1211 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1216 WRITE( NOUT, FMT = 9996 )SNAME
1217 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, TRANSA, DIAG, M,
1240 SUBROUTINE CCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1263 CHARACTER*6 SNAME
1298 CONJ = SNAME( 2: 3 ).EQ.'HE'
1369 CALL CMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, C,
1403 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1411 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1448 ISAME( 9 ) = LCERES( SNAME( 2: 3 ), UPLO, N,
1528 WRITE( NOUT, FMT = 9999 )SNAME, NC
1530 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1539 WRITE( NOUT, FMT = 9996 )SNAME
1541 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, RALPHA,
1544 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1572 SUBROUTINE CCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1595 CHARACTER*6 SNAME
1630 CONJ = SNAME( 2: 3 ).EQ.'HE'
1714 CALL CMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, C,
1748 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1756 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1901 WRITE( NOUT, FMT = 9999 )SNAME, NC
1903 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1912 WRITE( NOUT, FMT = 9996 )SNAME
1914 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1917 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,