Lines Matching refs:FMT
174 READ( NIN, FMT = * )SUMMRY
175 READ( NIN, FMT = * )NOUT
181 READ( NIN, FMT = * )SNAPS
182 READ( NIN, FMT = * )NTRA
188 READ( NIN, FMT = * )REWI
191 READ( NIN, FMT = * )SFATAL
193 READ( NIN, FMT = * )TSTERR
195 READ( NIN, FMT = * )THRESH
200 READ( NIN, FMT = * )NIDIM
202 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
205 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
208 WRITE( NOUT, FMT = 9996 )NMAX
213 READ( NIN, FMT = * )NKB
215 WRITE( NOUT, FMT = 9997 )'K', NKBMAX
218 READ( NIN, FMT = * )( KB( I ), I = 1, NKB )
221 WRITE( NOUT, FMT = 9995 )
226 READ( NIN, FMT = * )NINC
228 WRITE( NOUT, FMT = 9997 )'INCX AND INCY', NINMAX
231 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
234 WRITE( NOUT, FMT = 9994 )INCMAX
239 READ( NIN, FMT = * )NALF
241 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
244 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
246 READ( NIN, FMT = * )NBET
248 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
251 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
255 WRITE( NOUT, FMT = 9993 )
256 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
257 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB )
258 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
259 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
260 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
262 WRITE( NOUT, FMT = * )
263 WRITE( NOUT, FMT = 9980 )
265 WRITE( NOUT, FMT = * )
266 WRITE( NOUT, FMT = 9999 )THRESH
267 WRITE( NOUT, FMT = * )
275 50 READ( NIN, FMT = 9984, END = 80 )SNAMET, LTESTT
280 WRITE( NOUT, FMT = 9986 )SNAMET
291 WRITE( NOUT, FMT = 9998 )EPS
313 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
321 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
328 WRITE( NOUT, FMT = * )
331 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
337 WRITE( NOUT, FMT = * )
386 WRITE( NOUT, FMT = 9982 )
390 WRITE( NOUT, FMT = 9981 )
394 WRITE( NOUT, FMT = 9987 )
626 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
636 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
649 WRITE( NOUT, FMT = 9993 )
700 $ WRITE( NOUT, FMT = 9998 )I
745 WRITE( NOUT, FMT = 9999 )SNAME, NC
747 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
752 WRITE( NOUT, FMT = 9996 )SNAME
754 WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
757 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANS, M, N, KL, KU,
958 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
966 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
975 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
986 WRITE( NOUT, FMT = 9992 )
1046 $ WRITE( NOUT, FMT = 9998 )I
1088 WRITE( NOUT, FMT = 9999 )SNAME, NC
1090 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1095 WRITE( NOUT, FMT = 9996 )SNAME
1097 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, LDA, INCX,
1100 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, K, ALPHA, LDA,
1103 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, N, ALPHA, INCX,
1295 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1303 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1311 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1321 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1329 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1337 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1349 WRITE( NOUT, FMT = 9992 )
1399 $ WRITE( NOUT, FMT = 9998 )I
1454 WRITE( NOUT, FMT = 9999 )SNAME, NC
1456 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1461 WRITE( NOUT, FMT = 9996 )SNAME
1463 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, DIAG, N, LDA,
1466 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, DIAG, N, K,
1469 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, TRANS, DIAG, N, INCX
1639 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, M, N,
1656 WRITE( NOUT, FMT = 9993 )
1684 $ WRITE( NOUT, FMT = 9998 )I
1739 WRITE( NOUT, FMT = 9999 )SNAME, NC
1741 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1746 WRITE( NOUT, FMT = 9995 )J
1749 WRITE( NOUT, FMT = 9996 )SNAME
1750 WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1909 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
1916 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
1926 WRITE( NOUT, FMT = 9992 )
1954 $ WRITE( NOUT, FMT = 9998 )I
2019 WRITE( NOUT, FMT = 9999 )SNAME, NC
2021 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2026 WRITE( NOUT, FMT = 9995 )J
2029 WRITE( NOUT, FMT = 9996 )SNAME
2031 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, RALPHA, INCX, LDA
2033 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, RALPHA, INCX
2213 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
2221 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
2232 WRITE( NOUT, FMT = 9992 )
2262 $ WRITE( NOUT, FMT = 9998 )I
2339 WRITE( NOUT, FMT = 9999 )SNAME, NC
2341 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2346 WRITE( NOUT, FMT = 9995 )J
2349 WRITE( NOUT, FMT = 9996 )SNAME
2351 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX,
2354 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX, INCY
2711 WRITE( NOUT, FMT = 9999 )SRNAMT
2713 WRITE( NOUT, FMT = 9998 )SRNAMT
3027 WRITE( NOUT, FMT = 9999 )
3030 WRITE( NOUT, FMT = 9998 )I, YT( I ),
3033 WRITE( NOUT, FMT = 9998 )I,
3222 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3265 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3267 WRITE( NOUT, FMT = 9997 )INFO
3272 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT