Lines Matching refs:SNAME
417 SUBROUTINE DCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
438 CHARACTER*12 SNAME
584 $ CALL DPRCN1(NTRA, NC, SNAME, IORDER,
668 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
669 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
671 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, NC, ERRMAX
672 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10003 )SNAME, NC, ERRMAX
677 WRITE( NOUT, FMT = 9996 )SNAME
678 CALL DPRCN1(NOUT, NC, SNAME, IORDER, TRANSA, TRANSB,
706 SUBROUTINE DPRCN1(NOUT, NC, SNAME, IORDER, TRANSA, TRANSB, M, N,
711 CHARACTER*12 SNAME
733 WRITE(NOUT, FMT = 9995)NC,SNAME,CRC, CTA,CTB
741 SUBROUTINE DCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
762 CHARACTER*12 SNAME
894 $ CALL DPRCN2(NTRA, NC, SNAME, IORDER,
981 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
982 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
984 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, NC, ERRMAX
985 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10003 )SNAME, NC, ERRMAX
990 WRITE( NOUT, FMT = 9996 )SNAME
991 CALL DPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPLO, M, N, ALPHA, LDA,
1020 SUBROUTINE DPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPLO, M, N,
1025 CHARACTER*12 SNAME
1043 WRITE(NOUT, FMT = 9995)NC,SNAME,CRC, CS,CU
1051 SUBROUTINE DCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1072 CHARACTER*12 SNAME
1195 IF( SNAME( 10: 11 ).EQ.'mm' )THEN
1197 $ CALL DPRCN3( NTRA, NC, SNAME, IORDER,
1205 ELSE IF( SNAME( 10: 11 ).EQ.'sm' )THEN
1207 $ CALL DPRCN3( NTRA, NC, SNAME, IORDER,
1259 IF( SNAME( 10: 11 ).EQ.'mm' )THEN
1276 ELSE IF( SNAME( 10: 11 ).EQ.'sm' )THEN
1328 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
1329 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1331 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, NC, ERRMAX
1332 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10003 )SNAME, NC, ERRMAX
1337 WRITE( NOUT, FMT = 9996 )SNAME
1338 CALL DPRCN3( NTRA, NC, SNAME, IORDER, SIDE, UPLO, TRANSA, DIAG,
1366 SUBROUTINE DPRCN3(NOUT, NC, SNAME, IORDER, SIDE, UPLO, TRANSA,
1371 CHARACTER*12 SNAME
1401 WRITE(NOUT, FMT = 9995)NC,SNAME,CRC, CS,CU
1409 SUBROUTINE DCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1430 CHARACTER*12 SNAME
1546 $ CALL DPRCN4( NTRA, NC, SNAME, IORDER, UPLO,
1649 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
1650 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
1652 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, NC, ERRMAX
1653 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10003 )SNAME, NC, ERRMAX
1662 WRITE( NOUT, FMT = 9996 )SNAME
1663 CALL DPRCN4( NOUT, NC, SNAME, IORDER, UPLO, TRANS, N, K, ALPHA,
1692 SUBROUTINE DPRCN4(NOUT, NC, SNAME, IORDER, UPLO, TRANSA,
1697 CHARACTER*12 SNAME
1717 WRITE(NOUT, FMT = 9995)NC, SNAME, CRC, CU, CA
1725 SUBROUTINE DCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1747 CHARACTER*12 SNAME
1884 $ CALL DPRCN5( NTRA, NC, SNAME, IORDER, UPLO,
2005 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10000 )SNAME, NC
2006 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10001 )SNAME, NC
2008 IF ( IORDER.EQ.0) WRITE( NOUT, FMT = 10002 )SNAME, NC, ERRMAX
2009 IF ( IORDER.EQ.1) WRITE( NOUT, FMT = 10003 )SNAME, NC, ERRMAX
2018 WRITE( NOUT, FMT = 9996 )SNAME
2019 CALL DPRCN5( NOUT, NC, SNAME, IORDER, UPLO, TRANS, N, K, ALPHA,
2049 SUBROUTINE DPRCN5(NOUT, NC, SNAME, IORDER, UPLO, TRANSA,
2054 CHARACTER*12 SNAME
2074 WRITE(NOUT, FMT = 9995)NC, SNAME, CRC, CU, CA