Lines Matching refs:FMT
105 READ( NIN, FMT = * )SUMMRY
106 READ( NIN, FMT = * )NOUT
112 READ( NIN, FMT = * )SNAPS
113 READ( NIN, FMT = * )NTRA
119 READ( NIN, FMT = * )REWI
122 READ( NIN, FMT = * )SFATAL
124 READ( NIN, FMT = * )TSTERR
126 READ( NIN, FMT = * )THRESH
131 READ( NIN, FMT = * )NIDIM
133 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
136 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
139 WRITE( NOUT, FMT = 9996 )NMAX
144 READ( NIN, FMT = * )NALF
146 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
149 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
151 READ( NIN, FMT = * )NBET
153 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
156 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
160 WRITE( NOUT, FMT = 9995 )
161 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
162 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
163 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
165 WRITE( NOUT, FMT = * )
166 WRITE( NOUT, FMT = 9984 )
168 WRITE( NOUT, FMT = * )
169 WRITE( NOUT, FMT = 9999 )THRESH
170 WRITE( NOUT, FMT = * )
178 30 READ( NIN, FMT = 9988, END = 60 )SNAMET, LTESTT
183 WRITE( NOUT, FMT = 9990 )SNAMET
201 WRITE( NOUT, FMT = 9998 )EPS
226 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
235 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
253 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
262 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
269 WRITE( NOUT, FMT = * )
272 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
278 WRITE( NOUT, FMT = * )
319 WRITE( NOUT, FMT = 9986 )
323 WRITE( NOUT, FMT = 9985 )
327 WRITE( NOUT, FMT = 9991 )
538 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
549 WRITE( NOUT, FMT = 9994 )
582 $ WRITE( NOUT, FMT = 9998 )I
621 WRITE( NOUT, FMT = 9999 )SNAME, NC
623 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
628 WRITE( NOUT, FMT = 9996 )SNAME
629 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K,
809 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE,
824 WRITE( NOUT, FMT = 9994 )
856 $ WRITE( NOUT, FMT = 9998 )I
900 WRITE( NOUT, FMT = 9999 )SNAME, NC
902 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
907 WRITE( NOUT, FMT = 9996 )SNAME
908 WRITE( NOUT, FMT
1082 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1091 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1103 WRITE( NOUT, FMT = 9994 )
1134 $ WRITE( NOUT, FMT = 9998 )I
1211 WRITE( NOUT, FMT = 9999 )SNAME, NC
1213 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1218 WRITE( NOUT, FMT = 9996 )SNAME
1219 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, TRANSA, DIAG, M,
1405 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1413 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1424 WRITE( NOUT, FMT = 9992 )
1462 $ WRITE( NOUT, FMT = 9998 )I
1530 WRITE( NOUT, FMT = 9999 )SNAME, NC
1532 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1538 $ WRITE( NOUT, FMT = 9995 )J
1541 WRITE( NOUT, FMT = 9996 )SNAME
1543 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, RALPHA,
1546 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1751 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1759 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1770 WRITE( NOUT, FMT = 9992 )
1806 $ WRITE( NOUT, FMT = 9998 )I
1904 WRITE( NOUT, FMT = 9999 )SNAME, NC
1906 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1912 $ WRITE( NOUT, FMT = 9995 )J
1915 WRITE( NOUT, FMT = 9996 )SNAME
1917 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1920 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
2861 WRITE( NOUT, FMT = 9999 )SRNAMT
2863 WRITE( NOUT, FMT = 9998 )SRNAMT
3170 WRITE( NOUT, FMT = 9999 )
3173 WRITE( NOUT, FMT = 9998 )I, CT( I ), CC( I, J )
3175 WRITE( NOUT, FMT = 9998 )I, CC( I, J ), CT( I )
3179 $ WRITE( NOUT, FMT = 9997 )J
3378 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3423 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3425 WRITE( NOUT, FMT = 9997 )INFO
3430 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT
