Lines Matching refs:FMT
173 READ( NIN, FMT = * )SUMMRY
174 READ( NIN, FMT = * )NOUT
180 READ( NIN, FMT = * )SNAPS
181 READ( NIN, FMT = * )NTRA
187 READ( NIN, FMT = * )REWI
190 READ( NIN, FMT = * )SFATAL
192 READ( NIN, FMT = * )TSTERR
194 READ( NIN, FMT = * )THRESH
199 READ( NIN, FMT = * )NIDIM
201 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
204 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
207 WRITE( NOUT, FMT = 9996 )NMAX
212 READ( NIN, FMT = * )NKB
214 WRITE( NOUT, FMT = 9997 )'K', NKBMAX
217 READ( NIN, FMT = * )( KB( I ), I = 1, NKB )
220 WRITE( NOUT, FMT = 9995 )
225 READ( NIN, FMT = * )NINC
227 WRITE( NOUT, FMT = 9997 )'INCX AND INCY', NINMAX
230 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
233 WRITE( NOUT, FMT = 9994 )INCMAX
238 READ( NIN, FMT = * )NALF
240 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
243 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
245 READ( NIN, FMT = * )NBET
247 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
250 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
254 WRITE( NOUT, FMT = 9993 )
255 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
256 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB )
257 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
258 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
259 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
261 WRITE( NOUT, FMT = * )
262 WRITE( NOUT, FMT = 9980 )
264 WRITE( NOUT, FMT = * )
265 WRITE( NOUT, FMT = 9999 )THRESH
266 WRITE( NOUT, FMT = * )
274 50 READ( NIN, FMT = 9984, END = 80 )SNAMET, LTESTT
279 WRITE( NOUT, FMT = 9986 )SNAMET
290 WRITE( NOUT, FMT = 9998 )EPS
312 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
320 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
327 WRITE( NOUT, FMT = * )
330 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
336 WRITE( NOUT, FMT = * )
385 WRITE( NOUT, FMT = 9982 )
389 WRITE( NOUT, FMT = 9981 )
393 WRITE( NOUT, FMT = 9987 )
624 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
634 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
647 WRITE( NOUT, FMT = 9993 )
698 $ WRITE( NOUT, FMT = 9998 )I
743 WRITE( NOUT, FMT = 9999 )SNAME, NC
745 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
750 WRITE( NOUT, FMT = 9996 )SNAME
752 WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
755 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANS, M, N, KL, KU,
955 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
963 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
972 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
983 WRITE( NOUT, FMT = 9992 )
1043 $ WRITE( NOUT, FMT = 9998 )I
1085 WRITE( NOUT, FMT = 9999 )SNAME, NC
1087 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1092 WRITE( NOUT, FMT = 9996 )SNAME
1094 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, LDA, INCX,
1097 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, K, ALPHA, LDA,
1100 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, N, ALPHA, INCX,
1291 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1299 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1307 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1317 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1325 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1333 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1345 WRITE( NOUT, FMT = 9992 )
1395 $ WRITE( NOUT, FMT = 9998 )I
1450 WRITE( NOUT, FMT = 9999 )SNAME, NC
1452 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1457 WRITE( NOUT, FMT = 9996 )SNAME
1459 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, DIAG, N, LDA,
1462 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, DIAG, N, K,
1465 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, TRANS, DIAG, N, INCX
1634 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, M, N,
1651 WRITE( NOUT, FMT = 9993 )
1679 $ WRITE( NOUT, FMT = 9998 )I
1734 WRITE( NOUT, FMT = 9999 )SNAME, NC
1736 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1741 WRITE( NOUT, FMT = 9995 )J
1744 WRITE( NOUT, FMT = 9996 )SNAME
1745 WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1903 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
1910 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
1920 WRITE( NOUT, FMT = 9992 )
1948 $ WRITE( NOUT, FMT = 9998 )I
2013 WRITE( NOUT, FMT = 9999 )SNAME, NC
2015 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2020 WRITE( NOUT, FMT = 9995 )J
2023 WRITE( NOUT, FMT = 9996 )SNAME
2025 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, RALPHA, INCX, LDA
2027 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, RALPHA, INCX
2206 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
2214 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
2225 WRITE( NOUT, FMT = 9992 )
2255 $ WRITE( NOUT, FMT = 9998 )I
2332 WRITE( NOUT, FMT = 9999 )SNAME, NC
2334 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2339 WRITE( NOUT, FMT = 9995 )J
2342 WRITE( NOUT, FMT = 9996 )SNAME
2344 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX,
2347 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX, INCY
2704 WRITE( NOUT, FMT = 9999 )SRNAMT
2706 WRITE( NOUT, FMT = 9998 )SRNAMT
3019 WRITE( NOUT, FMT = 9999 )
3022 WRITE( NOUT, FMT = 9998 )I, YT( I ),
3025 WRITE( NOUT, FMT = 9998 )I,
3214 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3257 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3259 WRITE( NOUT, FMT = 9997 )INFO
3264 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT