Lines Matching refs:FMT
122 READ( NIN, FMT = * )SUMMRY
123 READ( NIN, FMT = * )NOUT
129 READ( NIN, FMT = * )SNAPS
130 READ( NIN, FMT = * )NTRA
136 READ( NIN, FMT = * )REWI
139 READ( NIN, FMT = * )SFATAL
141 READ( NIN, FMT = * )TSTERR
143 READ( NIN, FMT = * )THRESH
148 READ( NIN, FMT = * )NIDIM
150 WRITE( NOUT, FMT = 9997 )'N', NIDMAX
153 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
156 WRITE( NOUT, FMT = 9996 )NMAX
161 READ( NIN, FMT = * )NKB
163 WRITE( NOUT, FMT = 9997 )'K', NKBMAX
166 READ( NIN, FMT = * )( KB( I ), I = 1, NKB )
169 WRITE( NOUT, FMT = 9995 )
174 READ( NIN, FMT = * )NINC
176 WRITE( NOUT, FMT = 9997 )'INCX AND INCY', NINMAX
179 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
182 WRITE( NOUT, FMT = 9994 )INCMAX
187 READ( NIN, FMT = * )NALF
189 WRITE( NOUT, FMT = 9997 )'ALPHA', NALMAX
192 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
194 READ( NIN, FMT = * )NBET
196 WRITE( NOUT, FMT = 9997 )'BETA', NBEMAX
199 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
203 WRITE( NOUT, FMT = 9993 )
204 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
205 WRITE( NOUT, FMT = 9991 )( KB( I ), I = 1, NKB )
206 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
207 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
208 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
210 WRITE( NOUT, FMT = * )
211 WRITE( NOUT, FMT = 9980 )
213 WRITE( NOUT, FMT = * )
214 WRITE( NOUT, FMT = 9999 )THRESH
215 WRITE( NOUT, FMT = * )
223 50 READ( NIN, FMT = 9984, END = 80 )SNAMET, LTESTT
228 WRITE( NOUT, FMT = 9986 )SNAMET
246 WRITE( NOUT, FMT = 9998 )EPS
268 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
276 WRITE( NOUT, FMT = 9985 )TRANS, SAME, ERR
283 WRITE( NOUT, FMT = * )
286 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
292 WRITE( NOUT, FMT = * )
341 WRITE( NOUT, FMT = 9982 )
345 WRITE( NOUT, FMT = 9981 )
349 WRITE( NOUT, FMT = 9987 )
575 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
585 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
598 WRITE( NOUT, FMT = 9993 )
649 $ WRITE( NOUT, FMT = 9998 )I
694 WRITE( NOUT, FMT = 9999 )SNAME, NC
696 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
701 WRITE( NOUT, FMT = 9996 )SNAME
703 WRITE( NOUT, FMT = 9994 )NC, SNAME, TRANS, M, N, ALPHA, LDA,
706 WRITE( NOUT, FMT = 9995 )NC, SNAME, TRANS, M, N, KL, KU,
902 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
910 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
919 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
930 WRITE( NOUT, FMT = 9992 )
990 $ WRITE( NOUT, FMT = 9998 )I
1032 WRITE( NOUT, FMT = 9999 )SNAME, NC
1034 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1039 WRITE( NOUT, FMT = 9996 )SNAME
1041 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, LDA, INCX,
1044 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, K, ALPHA, LDA,
1047 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, N, ALPHA, INCX,
1232 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1240 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1248 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1258 $ WRITE( NTRA, FMT = 9993 )NC, SNAME,
1266 $ WRITE( NTRA, FMT = 9994 )NC, SNAME,
1274 $ WRITE( NTRA, FMT = 9995 )NC, SNAME,
1286 WRITE( NOUT, FMT = 9992 )
1336 $ WRITE( NOUT, FMT = 9998 )I
1391 WRITE( NOUT, FMT = 9999 )SNAME, NC
1393 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1398 WRITE( NOUT, FMT = 9996 )SNAME
1400 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, TRANS, DIAG, N, LDA,
1403 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, TRANS, DIAG, N, K,
1406 WRITE( NOUT, FMT = 9995 )NC, SNAME, UPLO, TRANS, DIAG, N, INCX
1569 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, M, N,
1579 WRITE( NOUT, FMT = 9993 )
1607 $ WRITE( NOUT, FMT = 9998 )I
1660 WRITE( NOUT, FMT = 9999 )SNAME, NC
1662 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1667 WRITE( NOUT, FMT = 9995 )J
1670 WRITE( NOUT, FMT = 9996 )SNAME
1671 WRITE( NOUT, FMT = 9994 )NC, SNAME, M, N, ALPHA, INCX, INCY, LDA
1822 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
1829 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
1839 WRITE( NOUT, FMT = 9992 )
1867 $ WRITE( NOUT, FMT = 9998 )I
1932 WRITE( NOUT, FMT = 9999 )SNAME, NC
1934 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
1939 WRITE( NOUT, FMT = 9995 )J
1942 WRITE( NOUT, FMT = 9996 )SNAME
1944 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX, LDA
1946 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX
2120 $ WRITE( NTRA, FMT = 9993 )NC, SNAME, UPLO, N,
2128 $ WRITE( NTRA, FMT = 9994 )NC, SNAME, UPLO, N,
2139 WRITE( NOUT, FMT = 9992 )
2169 $ WRITE( NOUT, FMT = 9998 )I
2246 WRITE( NOUT, FMT = 9999 )SNAME, NC
2248 WRITE( NOUT, FMT = 9997 )SNAME, NC, ERRMAX
2253 WRITE( NOUT, FMT = 9995 )J
2256 WRITE( NOUT, FMT = 9996 )SNAME
2258 WRITE( NOUT, FMT = 9993 )NC, SNAME, UPLO, N, ALPHA, INCX,
2261 WRITE( NOUT, FMT = 9994 )NC, SNAME, UPLO, N, ALPHA, INCX, INCY
2599 WRITE( NOUT, FMT = 9999 )SRNAMT
2601 WRITE( NOUT, FMT = 9998 )SRNAMT
2883 WRITE( NOUT, FMT = 9999 )
2886 WRITE( NOUT, FMT = 9998 )I, YT( I ),
2889 WRITE( NOUT, FMT = 9998 )I,
3073 WRITE( NOUT, FMT = 9999 )INFOT, SRNAMT
3116 WRITE( NOUT, FMT = 9999 )INFO, INFOT
3118 WRITE( NOUT, FMT = 9997 )INFO
3123 WRITE( NOUT, FMT = 9998 )SRNAME, SRNAMT
