| /external/eigen/blas/testing/ |
| D | dblat3.f | 59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
143 READ( NIN, FMT = * )NBET
144 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
148 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
155 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
279 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
285 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
296 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
302 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
357 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
[all …]
|
| D | sblat3.f | 59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
143 READ( NIN, FMT = * )NBET
144 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
148 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
155 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
279 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
285 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
296 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
302 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
357 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
[all …]
|
| D | cblat3.f | 64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
150 READ( NIN, FMT = * )NBET
151 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
155 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
162 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
287 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
293 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
304 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
310 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
367 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
[all …]
|
| D | zblat3.f | 65 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
151 READ( NIN, FMT = * )NBET
152 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
156 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
163 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
288 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
294 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
305 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
311 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
368 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
[all …]
|
| D | cblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
199 READ( NIN, FMT = * )NBET
200 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
204 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
213 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
309 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
315 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
399 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
418 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
424 $ AS( NMAX*NMAX ), BET( NBET ), X( NMAX ),
[all …]
|
| D | sblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
194 READ( NIN, FMT = * )NBET
195 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
199 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
208 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
304 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
310 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
392 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
409 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
415 $ AS( NMAX*NMAX ), BET( NBET ), G( NMAX ),
[all …]
|
| D | dblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
194 READ( NIN, FMT = * )NBET
195 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
199 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
208 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
304 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
310 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
392 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
409 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
415 $ AS( NMAX*NMAX ), BET( NBET ), G( NMAX ),
[all …]
|
| D | zblat2.f | 84 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
200 READ( NIN, FMT = * )NBET
201 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
205 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
214 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
310 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
316 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
400 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
420 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
426 $ AS( NMAX*NMAX ), BET( NBET ), X( NMAX ),
[all …]
|