Lines Matching refs:FMT
104 READ( NIN, FMT = * )SUMMRY
105 READ( NIN, FMT = * )NOUT
111 READ( NIN, FMT = * )SNAPS
112 READ( NIN, FMT = * )NTRA
118 READ( NIN, FMT = * )REWI
121 READ( NIN, FMT = * )SFATAL
123 READ( NIN, FMT = * )TSTERR
125 READ( NIN, FMT = * )THRESH
130 READ( NIN, FMT = * )NIDIM
132 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
135 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
138 WRITE( NOUT, FMT = 9996 )NMAX
143 READ( NIN, FMT = * )NALF
145 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
148 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
150 READ( NIN, FMT = * )NBET
152 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
155 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
159 WRITE( NOUT, FMT = 9995 )
160 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
161 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
162 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
164 WRITE( NOUT, FMT = * )
165 WRITE( NOUT, FMT = 9984 )
167 WRITE( NOUT, FMT = * )
168 WRITE( NOUT, FMT = 9999 )THRESH
169 WRITE( NOUT, FMT = * )
177 30 READ( NIN, FMT = 9988, END = 60 )SNAMET, LTESTT
182 WRITE( NOUT, FMT = 9990 )SNAMET
200 WRITE( NOUT, FMT = 9998 )EPS
225 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
234 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
252 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
261 WRITE( NOUT, FMT = 9989 )TRANSA, TRANSB, SAME, ERR
268 WRITE( NOUT, FMT = * )
271 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
277 WRITE( NOUT, FMT = * )
318 WRITE( NOUT, FMT = 9986 )
322 WRITE( NOUT, FMT = 9985 )
326 WRITE( NOUT, FMT = 9991 )
537 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
548 WRITE( NOUT, FMT = 9994 )
581 $ WRITE( NOUT, FMT = 9998 )I
620 WRITE( NOUT, FMT = 9999 )SNAME, NC
622 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
627 WRITE( NOUT, FMT = 9996 )SNAME
628 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANSA, TRANSB, M, N, K,
808 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE,
823 WRITE( NOUT, FMT = 9994 )
855 $ WRITE( NOUT, FMT = 9998 )I
899 WRITE( NOUT, FMT = 9999 )SNAME, NC
901 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
906 WRITE( NOUT, FMT = 9996 )SNAME
907 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, M, N, ALPHA, LDA,
1080 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1089 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1101 WRITE( NOUT, FMT = 9994 )
1132 $ WRITE( NOUT, FMT = 9998 )I
1209 WRITE( NOUT, FMT = 9999 )SNAME, NC
1211 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1216 WRITE( NOUT, FMT = 9996 )SNAME
1217 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, TRANSA, DIAG, M,
1403 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1411 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1422 WRITE( NOUT, FMT = 9992 )
1460 $ WRITE( NOUT, FMT = 9998 )I
1528 WRITE( NOUT, FMT = 9999 )SNAME, NC
1530 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1536 $ WRITE( NOUT, FMT = 9995 )J
1539 WRITE( NOUT, FMT = 9996 )SNAME
1541 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, RALPHA,
1544 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1748 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO,
1756 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO,
1767 WRITE( NOUT, FMT = 9992 )
1803 $ WRITE( NOUT, FMT = 9998 )I
1901 WRITE( NOUT, FMT = 9999 )SNAME, NC
1903 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1909 $ WRITE( NOUT, FMT = 9995 )J
1912 WRITE( NOUT, FMT = 9996 )SNAME
1914 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
1917 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, N, K, ALPHA,
2858 WRITE( NOUT, FMT = 9999 )SRNAMT
2860 WRITE( NOUT, FMT = 9998 )SRNAMT
3164 WRITE( NOUT, FMT = 9999 )
3167 WRITE( NOUT, FMT = 9998 )I, CT( I ), CC( I, J )
3169 WRITE( NOUT, FMT = 9998 )I, CC( I, J ), CT( I )
3173 $ WRITE( NOUT, FMT = 9997 )J
3372 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3417 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3419 WRITE( NOUT, FMT = 9997 )INFO
3424 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT