Lines Matching defs:NOUT

85      $                   NOUT, NTRA
129 READ( NIN, FMT = * )NOUT
130 OPEN( NOUT, FILE = SUMMRY, STATUS = 'NEW' )
131 NOUTC = NOUT
156 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
162 WRITE( NOUT, FMT = 9996 )NMAX
169 WRITE( NOUT, FMT = 9997 )'K', NKBMAX
175 WRITE( NOUT, FMT = 9995 )
182 WRITE( NOUT, FMT = 9997 )'INCX AND INCY', NINMAX
188 WRITE( NOUT, FMT = 9994 )INCMAX
195 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
202 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
209 WRITE( NOUT, FMT = 9993 )
210 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
211 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB )
212 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
213 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
214 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
216 WRITE( NOUT, FMT = * )
217 WRITE( NOUT, FMT = 9980 )
219 WRITE( NOUT, FMT = * )
220 WRITE( NOUT, FMT = 9999 )THRESH
221 WRITE( NOUT, FMT = * )
234 WRITE( NOUT, FMT = 9986 )SNAMET
252 WRITE( NOUT, FMT = 9998 )EPS
271 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
274 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
279 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
282 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
289 WRITE( NOUT, FMT = * )
292 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
297 CALL ZCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
298 WRITE( NOUT, FMT = * )
308 140 CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
314 150 CALL ZCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
321 160 CALL ZCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
326 170 CALL ZCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
332 180 CALL ZCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
338 190 CALL ZCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
347 WRITE( NOUT, FMT = 9982 )
351 WRITE( NOUT, FMT = 9981 )
355 WRITE( NOUT, FMT = 9987 )
360 CLOSE ( NOUT )
399 SUBROUTINE ZCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
421 $ NOUT, NTRA
610 WRITE( NOUT, FMT = 9993 )
661 $ WRITE( NOUT, FMT = 9998 )I
675 $ FATAL, NOUT, .TRUE. )
706 WRITE( NOUT, FMT = 9999 )SNAME, NC
708 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
713 WRITE( NOUT, FMT = 9996 )SNAME
715 WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
718 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANS, M, N, KL, KU,
745 SUBROUTINE ZCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
767 $ NOUT, NTRA
947 WRITE( NOUT, FMT = 9992 )
1007 $ WRITE( NOUT, FMT = 9998 )I
1020 $ YY, EPS, ERR, FATAL, NOUT,
1049 WRITE( NOUT, FMT = 9999 )SNAME, NC
1051 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1056 WRITE( NOUT, FMT = 9996 )SNAME
1058 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, LDA, INCX,
1061 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, K, ALPHA, LDA,
1064 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, N, ALPHA, INCX,
1094 SUBROUTINE ZCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1115 INTEGER INCMAX, NIDIM, NINC, NKB, NMAX, NOUT, NTRA
1310 WRITE( NOUT, FMT = 9992 )
1360 $ WRITE( NOUT, FMT = 9998 )I
1374 $ XX, EPS, ERR, FATAL, NOUT,
1388 $ XX, EPS, ERR, FATAL, NOUT,
1415 WRITE( NOUT, FMT = 9999 )SNAME, NC
1417 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1422 WRITE( NOUT, FMT = 9996 )SNAME
1424 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, DIAG, N, LDA,
1427 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, DIAG, N, K,
1430 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, TRANS, DIAG, N, INCX
1456 SUBROUTINE ZCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1478 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
1617 WRITE( NOUT, FMT = 9993 )
1645 $ WRITE( NOUT, FMT = 9998 )I
1676 $ ERR, FATAL, NOUT, .TRUE. )
1700 WRITE( NOUT, FMT = 9999 )SNAME, NC
1702 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1707 WRITE( NOUT, FMT = 9995 )J
1710 WRITE( NOUT, FMT = 9996 )SNAME
1711 WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1734 SUBROUTINE ZCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1756 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
1887 WRITE( NOUT, FMT = 9992 )
1915 $ WRITE( NOUT, FMT = 9998 )I
1947 $ AA( JA ), EPS, ERR, FATAL, NOUT,
1980 WRITE( NOUT, FMT = 9999 )SNAME, NC
1982 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1987 WRITE( NOUT, FMT = 9995 )J
1990 WRITE( NOUT, FMT = 9996 )SNAME
1992 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, RALPHA, INCX, LDA
1994 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, RALPHA, INCX
2019 SUBROUTINE ZCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
2041 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
2193 WRITE( NOUT, FMT = 9992 )
2223 $ WRITE( NOUT, FMT = 9998 )I
2266 $ NOUT, .TRUE. )
2300 WRITE( NOUT, FMT = 9999 )SNAME, NC
2302 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2307 WRITE( NOUT, FMT = 9995 )J
2310 WRITE( NOUT, FMT = 9996 )SNAME
2312 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX,
2315 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX, INCY
2342 SUBROUTINE ZCHKE( ISNUM, SRNAMT, NOUT )
2355 INTEGER ISNUM, NOUT
2383 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2386 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2389 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2392 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2395 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2398 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2402 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2405 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2408 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2411 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2414 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2417 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2420 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2423 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2427 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2430 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2433 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2436 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2439 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2443 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2446 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2449 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2452 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2455 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2458 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2462 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2465 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2468 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2471 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2475 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2478 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2481 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2484 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2487 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2490 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2494 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2497 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2500 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2503 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2506 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2509 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2512 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2516 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2519 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2522 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2525 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2528 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2532 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2535 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2538 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2541 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2544 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2547 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2551 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2554 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2557 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2560 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2563 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2566 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2569 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2573 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2576 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2579 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2582 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2585 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2589 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2592 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2595 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2598 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2601 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2605 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2608 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2611 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2614 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2617 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2621 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2624 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2627 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2630 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2634 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2637 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2640 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2644 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2647 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2650 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2653 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2656 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2660 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2663 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2666 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2669 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2672 WRITE( NOUT, FMT = 9999 )SRNAMT
2674 WRITE( NOUT, FMT = 9998 )SRNAMT
2879 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2897 INTEGER INCX, INCY, M, N, NMAX, NOUT
2988 WRITE( NOUT, FMT = 9999 )
2991 WRITE( NOUT, FMT = 9998 )I, YT( I ),
2994 WRITE( NOUT, FMT = 9998 )I,
3168 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
3179 INTEGER INFOT, NOUT
3184 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3217 INTEGER INFOT, NOUT
3221 COMMON /INFOC/INFOT, NOUT, OK, LERR
3227 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3229 WRITE( NOUT, FMT = 9997 )INFO
3234 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT