Lines Matching refs:FMT
152 READ( NIN, FMT = * )SUMMRY
153 READ( NIN, FMT = * )NOUT
159 READ( NIN, FMT = * )SNAPS
160 READ( NIN, FMT = * )NTRA
166 READ( NIN, FMT = * )REWI
169 READ( NIN, FMT = * )SFATAL
171 READ( NIN, FMT = * )TSTERR
173 READ( NIN, FMT = * )THRESH
178 READ( NIN, FMT = * )NIDIM
180 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
183 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
186 WRITE( NOUT, FMT = 9996 )NMAX
191 READ( NIN, FMT = * )NALF
193 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
196 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
198 READ( NIN, FMT = * )NBET
200 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
203 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
207 WRITE( NOUT, FMT = 9995 )
208 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
209 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
210 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
212 WRITE( NOUT, FMT = * )
213 WRITE( NOUT, FMT = 9984 )
215 WRITE( NOUT, FMT = * )
216 WRITE( NOUT, FMT = 9999 )THRESH
217 WRITE( NOUT, FMT = * )
225 30 READ( NIN, FMT = 9988, END = 60 )SNAMET, LTESTT
230 WRITE( NOUT, FMT = 9990 )SNAMET
241 WRITE( NOUT, FMT = 9998 )EPS
266 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
275 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
293 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
302 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
309 WRITE( NOUT, FMT = * )
312 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
318 WRITE( NOUT, FMT = * )
359 WRITE( NOUT, FMT = 9986 )
363 WRITE( NOUT, FMT = 9985 )
367 WRITE( NOUT, FMT = 9991 )
578 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
589 WRITE( NOUT, FMT = 9994 )
622 $ WRITE( NOUT, FMT = 9998 )I
661 WRITE( NOUT, FMT = 9999 )SNAME, NC
663 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
668 WRITE( NOUT, FMT = 9996 )SNAME
669 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K,
849 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE,
864 WRITE( NOUT, FMT = 9994 )
896 $ WRITE( NOUT, FMT = 9998 )I
940 WRITE( NOUT, FMT = 9999 )SNAME, NC
942 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
947 WRITE( NOUT, FMT = 9996 )SNAME
948 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, M, N, ALPHA, LDA,
1122 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1131 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1143 WRITE( NOUT, FMT = 9994 )
1174 $ WRITE( NOUT, FMT = 9998 )I
1251 WRITE( NOUT, FMT = 9999 )SNAME, NC
1253 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1258 WRITE( NOUT, FMT = 9996 )SNAME
1259 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, TRANSA, DIAG, M,
1445 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1453 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1464 WRITE( NOUT, FMT = 9992 )
1502 $ WRITE( NOUT, FMT = 9998 )I
1570 WRITE( NOUT, FMT = 9999 )SNAME, NC
1572 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1578 $ WRITE( NOUT, FMT = 9995 )J
1581 WRITE( NOUT, FMT = 9996 )SNAME
1583 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, RALPHA,
1586 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1791 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1799 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1810 WRITE( NOUT, FMT = 9992 )
1846 $ WRITE( NOUT, FMT = 9998 )I
1944 WRITE( NOUT, FMT = 9999 )SNAME, NC
1946 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1952 $ WRITE( NOUT, FMT = 9995 )J
1955 WRITE( NOUT, FMT = 9996 )SNAME
1957 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1960 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
2919 WRITE( NOUT, FMT = 9999 )SRNAMT
2921 WRITE( NOUT, FMT = 9998 )SRNAMT
3228 WRITE( NOUT, FMT = 9999 )
3231 WRITE( NOUT, FMT = 9998 )I, CT( I ), CC( I, J )
3233 WRITE( NOUT, FMT = 9998 )I, CC( I, J ), CT( I )
3237 $ WRITE( NOUT, FMT = 9997 )J
3435 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3480 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3482 WRITE( NOUT, FMT = 9997 )INFO
3487 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT