Lines Matching refs:FMT

143       READ( NIN, FMT = * )SUMMRY
144 READ( NIN, FMT = * )NOUT
150 READ( NIN, FMT = * )SNAPS
151 READ( NIN, FMT = * )NTRA
157 READ( NIN, FMT = * )REWI
160 READ( NIN, FMT = * )SFATAL
162 READ( NIN, FMT = * )TSTERR
164 READ( NIN, FMT = * )THRESH
169 READ( NIN, FMT = * )NIDIM
171 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
174 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
177 WRITE( NOUT, FMT = 9996 )NMAX
182 READ( NIN, FMT = * )NALF
184 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
187 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
189 READ( NIN, FMT = * )NBET
191 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
194 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
198 WRITE( NOUT, FMT = 9995 )
199 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
200 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
201 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
203 WRITE( NOUT, FMT = * )
204 WRITE( NOUT, FMT = 9984 )
206 WRITE( NOUT, FMT = * )
207 WRITE( NOUT, FMT = 9999 )THRESH
208 WRITE( NOUT, FMT = * )
216 30 READ( NIN, FMT = 9988, END = 60 )SNAMET, LTESTT
221 WRITE( NOUT, FMT = 9990 )SNAMET
232 WRITE( NOUT, FMT = 9998 )EPS
257 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
266 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
284 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
293 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
300 WRITE( NOUT, FMT = * )
303 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
309 WRITE( NOUT, FMT = * )
349 WRITE( NOUT, FMT = 9986 )
353 WRITE( NOUT, FMT = 9985 )
357 WRITE( NOUT, FMT = 9991 )
562 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
573 WRITE( NOUT, FMT = 9994 )
606 $ WRITE( NOUT, FMT = 9998 )I
645 WRITE( NOUT, FMT = 9999 )SNAME, NC
647 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
652 WRITE( NOUT, FMT = 9996 )SNAME
653 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K,
829 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE,
839 WRITE( NOUT, FMT = 9994 )
871 $ WRITE( NOUT, FMT = 9998 )I
915 WRITE( NOUT, FMT = 9999 )SNAME, NC
917 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
922 WRITE( NOUT, FMT = 9996 )SNAME
923 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, M, N, ALPHA, LDA,
1092 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1101 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1113 WRITE( NOUT, FMT = 9994 )
1144 $ WRITE( NOUT, FMT = 9998 )I
1221 WRITE( NOUT, FMT = 9999 )SNAME, NC
1223 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1228 WRITE( NOUT, FMT = 9996 )SNAME
1229 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, TRANSA, DIAG, M,
1388 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1398 WRITE( NOUT, FMT = 9993 )
1428 $ WRITE( NOUT, FMT = 9998 )I
1491 WRITE( NOUT, FMT = 9999 )SNAME, NC
1493 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1499 $ WRITE( NOUT, FMT = 9995 )J
1502 WRITE( NOUT, FMT = 9996 )SNAME
1503 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1684 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1694 WRITE( NOUT, FMT = 9993 )
1726 $ WRITE( NOUT, FMT = 9998 )I
1804 WRITE( NOUT, FMT = 9999 )SNAME, NC
1806 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1812 $ WRITE( NOUT, FMT = 9995 )J
1815 WRITE( NOUT, FMT = 9996 )SNAME
1816 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
2382 WRITE( NOUT, FMT = 9999 )SRNAMT
2384 WRITE( NOUT, FMT = 9998 )SRNAMT
2607 WRITE( NOUT, FMT = 9999 )
2610 WRITE( NOUT, FMT = 9998 )I, CT( I ), CC( I, J )
2612 WRITE( NOUT, FMT = 9998 )I, CC( I, J ), CT( I )
2616 $ WRITE( NOUT, FMT = 9997 )J
2806 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
2851 WRITE( NOUT, FMT = 9999 )INFO, INFOT
2853 WRITE( NOUT, FMT = 9997 )INFO
2858 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT