Lines Matching defs:NOUT

84      $                   NOUT, NTRA
128 READ( NIN, FMT = * )NOUT
129 OPEN( NOUT, FILE = SUMMRY, STATUS = 'NEW' )
130 NOUTC = NOUT
155 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
161 WRITE( NOUT, FMT = 9996 )NMAX
168 WRITE( NOUT, FMT = 9997 )'K', NKBMAX
174 WRITE( NOUT, FMT = 9995 )
181 WRITE( NOUT, FMT = 9997 )'INCX AND INCY', NINMAX
187 WRITE( NOUT, FMT = 9994 )INCMAX
194 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
201 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
208 WRITE( NOUT, FMT = 9993 )
209 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
210 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB )
211 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
212 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
213 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
215 WRITE( NOUT, FMT = * )
216 WRITE( NOUT, FMT = 9980 )
218 WRITE( NOUT, FMT = * )
219 WRITE( NOUT, FMT = 9999 )THRESH
220 WRITE( NOUT, FMT = * )
233 WRITE( NOUT, FMT = 9986 )SNAMET
251 WRITE( NOUT, FMT = 9998 )EPS
270 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
273 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
278 $ YY, EPS, ERR, FATAL, NOUT, .TRUE. )
281 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
288 WRITE( NOUT, FMT = * )
291 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
296 CALL CCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
297 WRITE( NOUT, FMT = * )
307 140 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
313 150 CALL CCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
320 160 CALL CCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
325 170 CALL CCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
331 180 CALL CCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
337 190 CALL CCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
346 WRITE( NOUT, FMT = 9982 )
350 WRITE( NOUT, FMT = 9981 )
354 WRITE( NOUT, FMT = 9987 )
359 CLOSE ( NOUT )
398 SUBROUTINE CCHK1( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
419 $ NOUT, NTRA
608 WRITE( NOUT, FMT = 9993 )
659 $ WRITE( NOUT, FMT = 9998 )I
673 $ FATAL, NOUT, .TRUE. )
704 WRITE( NOUT, FMT = 9999 )SNAME, NC
706 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
711 WRITE( NOUT, FMT = 9996 )SNAME
713 WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
716 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANS, M, N, KL, KU,
743 SUBROUTINE CCHK2( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
764 $ NOUT, NTRA
944 WRITE( NOUT, FMT = 9992 )
1004 $ WRITE( NOUT, FMT = 9998 )I
1017 $ YY, EPS, ERR, FATAL, NOUT,
1046 WRITE( NOUT, FMT = 9999 )SNAME, NC
1048 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1053 WRITE( NOUT, FMT = 9996 )SNAME
1055 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, LDA, INCX,
1058 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, K, ALPHA, LDA,
1061 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, N, ALPHA, INCX,
1091 SUBROUTINE CCHK3( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1111 INTEGER INCMAX, NIDIM, NINC, NKB, NMAX, NOUT, NTRA
1306 WRITE( NOUT, FMT = 9992 )
1356 $ WRITE( NOUT, FMT = 9998 )I
1370 $ XX, EPS, ERR, FATAL, NOUT,
1384 $ XX, EPS, ERR, FATAL, NOUT,
1411 WRITE( NOUT, FMT = 9999 )SNAME, NC
1413 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1418 WRITE( NOUT, FMT = 9996 )SNAME
1420 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, DIAG, N, LDA,
1423 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, DIAG, N, K,
1426 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, TRANS, DIAG, N, INCX
1452 SUBROUTINE CCHK4( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1473 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
1612 WRITE( NOUT, FMT = 9993 )
1640 $ WRITE( NOUT, FMT = 9998 )I
1671 $ ERR, FATAL, NOUT, .TRUE. )
1695 WRITE( NOUT, FMT = 9999 )SNAME, NC
1697 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1702 WRITE( NOUT, FMT = 9995 )J
1705 WRITE( NOUT, FMT = 9996 )SNAME
1706 WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1729 SUBROUTINE CCHK5( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
1750 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
1881 WRITE( NOUT, FMT = 9992 )
1909 $ WRITE( NOUT, FMT = 9998 )I
1941 $ AA( JA ), EPS, ERR, FATAL, NOUT,
1974 WRITE( NOUT, FMT = 9999 )SNAME, NC
1976 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1981 WRITE( NOUT, FMT = 9995 )J
1984 WRITE( NOUT, FMT = 9996 )SNAME
1986 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, RALPHA, INCX, LDA
1988 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, RALPHA, INCX
2013 SUBROUTINE CCHK6( SNAME, EPS, THRESH, NOUT, NTRA, TRACE, REWI,
2034 INTEGER INCMAX, NALF, NIDIM, NINC, NMAX, NOUT, NTRA
2186 WRITE( NOUT, FMT = 9992 )
2216 $ WRITE( NOUT, FMT = 9998 )I
2259 $ NOUT, .TRUE. )
2293 WRITE( NOUT, FMT = 9999 )SNAME, NC
2295 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2300 WRITE( NOUT, FMT = 9995 )J
2303 WRITE( NOUT, FMT = 9996 )SNAME
2305 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX,
2308 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX, INCY
2335 SUBROUTINE CCHKE( ISNUM, SRNAMT, NOUT )
2348 INTEGER ISNUM, NOUT
2376 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2379 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2382 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2385 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2388 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2391 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2395 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2398 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2401 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2404 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2407 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2410 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2413 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2416 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2420 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2423 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2426 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2429 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2432 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2436 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2439 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2442 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2445 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2448 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2451 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2455 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2458 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2461 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2464 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2468 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2471 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2474 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2477 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2480 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2483 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2487 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2490 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2493 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2496 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2499 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2502 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2505 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2509 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2512 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2515 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2518 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2521 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2525 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2528 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2531 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2534 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2537 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2540 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2544 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2547 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2550 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2553 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2556 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2559 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2562 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2566 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2569 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2572 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2575 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2578 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2582 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2585 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2588 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2591 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2594 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2598 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2601 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2604 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2607 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2610 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2614 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2617 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2620 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2623 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2627 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2630 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2633 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2637 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2640 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2643 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2646 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2649 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2653 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2656 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2659 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2662 CALL CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
2665 WRITE( NOUT, FMT = 9999 )SRNAMT
2667 WRITE( NOUT, FMT = 9998 )SRNAMT
2871 $ INCY, YT, G, YY, EPS, ERR, FATAL, NOUT, MV )
2889 INTEGER INCX, INCY, M, N, NMAX, NOUT
2980 WRITE( NOUT, FMT = 9999 )
2983 WRITE( NOUT, FMT = 9998 )I, YT( I ),
2986 WRITE( NOUT, FMT = 9998 )I,
3160 SUBROUTINE CHKXER( SRNAMT, INFOT, NOUT, LERR, OK )
3171 INTEGER INFOT, NOUT
3176 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3209 INTEGER INFOT, NOUT
3213 COMMON /INFOC/INFOT, NOUT, OK, LERR
3219 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3221 WRITE( NOUT, FMT = 9997 )INFO
3226 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT