Lines Matching refs:NOUT
67 INTEGER NIN, NOUT variable
68 PARAMETER ( NIN = 5, NOUT = 6 )
125 NOUTC = NOUT
152 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
158 WRITE( NOUT, FMT = 9996 )NMAX
165 WRITE( NOUT, FMT = 9997 )'K', NKBMAX
171 WRITE( NOUT, FMT = 9995 )
178 WRITE( NOUT, FMT = 9997 )'INCX AND INCY', NINMAX
184 WRITE( NOUT, FMT = 9994 )INCMAX
191 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
198 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
205 WRITE( NOUT, FMT = 9993 )
206 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
207 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB )
208 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
209 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
210 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
212 WRITE( NOUT, FMT = * )
213 WRITE( NOUT, FMT = 9980 )
215 WRITE( NOUT, FMT = * )
216 WRITE( NOUT, FMT = 9999 )THRESH
217 WRITE( NOUT, FMT = * )
245 WRITE( NOUT, FMT = 9986 )SNAMET
263 WRITE( NOUT, FMT = 9998 )EPS
282 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
285 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
290 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
293 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
300 WRITE( NOUT, FMT = * )
303 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
309 WRITE( NOUT, FMT = * )
320 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
326 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
334 CALL CCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
340 CALL CCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
349 CALL CCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
355 CALL CCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
363 CALL CCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
369 CALL CCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
377 CALL CCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
383 CALL CCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
391 CALL CCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
397 CALL CCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
407 WRITE( NOUT, FMT = 9982 )
411 WRITE( NOUT, FMT = 9981 )
415 WRITE( NOUT, FMT = 9987 )
420 CLOSE ( NOUT )
462 SUBROUTINE CCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, argument
483 $ NOUT, NTRA, IORDER local
680 WRITE( NOUT, FMT = 9993 )
732 $ WRITE( NOUT, FMT = 9998 )I
746 $ FATAL, NOUT, .TRUE. )
778 WRITE( NOUT, FMT = 9999 )SNAME, NC
780 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
785 WRITE( NOUT, FMT = 9996 )SNAME
787 WRITE( NOUT, FMT = 9994 )NC, SNAME, CTRANS, M, N, ALPHA, LDA,
790 WRITE( NOUT, FMT = 9995 )NC, SNAME, CTRANS, M, N, KL, KU,
817 SUBROUTINE CCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, argument
838 $ NOUT, NTRA, IORDER local
1026 WRITE( NOUT, FMT = 9992 )
1086 $ WRITE( NOUT, FMT = 9998 )I
1099 $ YY, EPS, ERR, FATAL, NOUT,
1128 WRITE( NOUT, FMT = 9999 )SNAME, NC
1130 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1135 WRITE( NOUT, FMT = 9996 )SNAME
1137 WRITE( NOUT, FMT = 9993 )NC, SNAME, CUPLO, N, ALPHA, LDA, INCX,
1140 WRITE( NOUT, FMT = 9994 )NC, SNAME, CUPLO, N, K, ALPHA, LDA,
1143 WRITE( NOUT, FMT = 9995 )NC, SNAME, CUPLO, N, ALPHA, INCX,
1173 SUBROUTINE CCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, argument
1193 INTEGER INCMAX, NIDIM, NINC, NKB, NMAX, NOUT, NTRA, local
1407 WRITE( NOUT, FMT = 9992 )
1457 $ WRITE( NOUT, FMT = 9998 )I
1471 $ XX, EPS, ERR, FATAL, NOUT,
1485 $ XX, EPS, ERR, FATAL, NOUT,
1512 WRITE( NOUT, FMT = 9999 )SNAME, NC
1514 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1519 WRITE( NOUT, FMT = 9996 )SNAME
1521 WRITE( NOUT, FMT = 9993 )NC, SNAME, CUPLO, CTRANS, CDIAG, N,
1524 WRITE( NOUT, FMT = 9994 )NC, SNAME, CUPLO, CTRANS, CDIAG, N, K,
1527 WRITE( NOUT, FMT = 9995 )NC, SNAME, CUPLO, CTRANS, CDIAG, N,
1554 SUBROUTINE CCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, argument
1575 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA, local
1715 WRITE( NOUT, FMT = 9993 )
1743 $ WRITE( NOUT, FMT = 9998 )I
1774 $ ERR, FATAL, NOUT, .TRUE. )
1798 WRITE( NOUT, FMT = 9999 )SNAME, NC
1800 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1805 WRITE( NOUT, FMT = 9995 )J
1808 WRITE( NOUT, FMT = 9996 )SNAME
1809 WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1831 SUBROUTINE CCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, argument
1852 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA, local
1992 WRITE( NOUT, FMT = 9992 )
2020 $ WRITE( NOUT, FMT = 9998 )I
2052 $ AA( JA ), EPS, ERR, FATAL, NOUT,
2085 WRITE( NOUT, FMT = 9999 )SNAME, NC
2087 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2092 WRITE( NOUT, FMT = 9995 )J
2095 WRITE( NOUT, FMT = 9996 )SNAME
2097 WRITE( NOUT, FMT = 9993 )NC, SNAME, CUPLO, N, RALPHA, INCX, LDA
2099 WRITE( NOUT, FMT = 9994 )NC, SNAME, CUPLO, N, RALPHA, INCX
2124 SUBROUTINE CCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI, argument
2145 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA, local
2304 WRITE( NOUT, FMT = 9992 )
2334 $ WRITE( NOUT, FMT = 9998 )I
2377 $ NOUT, .TRUE. )
2411 WRITE( NOUT, FMT = 9999 )SNAME, NC
2413 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2418 WRITE( NOUT, FMT = 9995 )J
2421 WRITE( NOUT, FMT = 9996 )SNAME
2423 WRITE( NOUT, FMT = 9993 )NC, SNAME, CUPLO, N, ALPHA, INCX,
2426 WRITE( NOUT, FMT = 9994 )NC, SNAME, CUPLO, N, ALPHA, INCX, INCY
2452 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV ) argument
2470 INTEGER INCX, INCY, M, N, NMAX, NOUT local
2561 WRITE( NOUT, FMT = 9999 )
2564 WRITE( NOUT, FMT = 9998 )I, YT( I ),
2567 WRITE( NOUT, FMT = 9998 )I,