Lines Matching refs:SNAME
430 SUBROUTINE SCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
451 SNAME
486 FULL = SNAME( 3: 3 ).EQ.'E'
487 BANDED = SNAME( 3: 3 ).EQ.'B'
539 CALL SMAKE( SNAME( 2: 3 ), ' ', ' ', M, N, A, NMAX, AA,
614 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
624 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
733 WRITE( NOUT, FMT = 9999 )SNAME, NC
735 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
740 WRITE( NOUT, FMT = 9996 )SNAME
742 WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
745 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANS, M, N, KL, KU,
771 SUBROUTINE SCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
792 CHARACTER*6 SNAME
826 FULL = SNAME( 3: 3 ).EQ.'Y'
827 BANDED = SNAME( 3: 3 ).EQ.'B'
828 PACKED = SNAME( 3: 3 ).EQ.'P'
880 CALL SMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A, NMAX, AA,
941 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
949 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
958 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1071 WRITE( NOUT, FMT = 9999 )SNAME, NC
1073 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1078 WRITE( NOUT, FMT = 9996 )SNAME
1080 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, LDA, INCX,
1083 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, K, ALPHA, LDA,
1086 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, N, ALPHA, INCX,
1114 SUBROUTINE SCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1133 CHARACTER*6 SNAME
1166 FULL = SNAME( 3: 3 ).EQ.'R'
1167 BANDED = SNAME( 3: 3 ).EQ.'B'
1168 PACKED = SNAME( 3: 3 ).EQ.'P'
1230 CALL SMAKE( SNAME( 2: 3 ), UPLO, DIAG, N, N, A,
1268 IF( SNAME( 4: 5 ).EQ.'MV' )THEN
1271 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1279 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1287 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1294 ELSE IF( SNAME( 4: 5 ).EQ.'SV' )THEN
1297 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1305 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1313 SNAME,
1383 IF( SNAME( 4: 5 ).EQ.'MV' )THEN
1391 ELSE IF( SNAME( 4: 5 ).EQ.'SV' )THEN
1430 WRITE( NOUT, FMT = 9999 )SNAME, NC
1432 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1437 WRITE( NOUT, FMT = 9996 )SNAME
1439 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, DIAG, N, LDA,
1442 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, DIAG, N, K,
1445 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, TRANS, DIAG, N, INCX
1471 SUBROUTINE SCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1491 CHARACTER*6 SNAME
1582 CALL SMAKE( SNAME( 2: 3 ), ' ', ' ', M, N, A, NMAX,
1608 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, M, N,
1699 WRITE( NOUT, FMT = 9999 )SNAME, NC
1701 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1709 WRITE( NOUT, FMT = 9996 )SNAME
1710 WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1732 SUBROUTINE SCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1752 CHARACTER*6 SNAME
1785 FULL = SNAME( 3: 3 ).EQ.'Y'
1786 PACKED = SNAME( 3: 3 ).EQ.'P'
1838 CALL SMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A, NMAX,
1861 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
1868 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
1893 ISAME( 6 ) = LSERES( SNAME( 2: 3 ), UPLO, N, N, AS,
1971 WRITE( NOUT, FMT = 9999 )SNAME, NC
1973 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1981 WRITE( NOUT, FMT = 9996 )SNAME
1983 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX, LDA
1985 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX
2010 SUBROUTINE SCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
2030 CHARACTER*6 SNAME
2064 FULL = SNAME( 3: 3 ).EQ.'Y'
2065 PACKED = SNAME( 3: 3 ).EQ.'P'
2131 CALL SMAKE( SNAME( 2: 3 ), UPLO, ' ', N, N, A,
2159 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
2167 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
2195 ISAME( 8 ) = LSERES( SNAME( 2: 3 ), UPLO, N, N,
2285 WRITE( NOUT, FMT = 9999 )SNAME, NC
2287 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2295 WRITE( NOUT, FMT = 9996 )SNAME
2297 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX,
2300 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX, INCY
