| /external/cblas/testing/ |
| D | c_dblat3.f | 58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, 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 )
296 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
302 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
310 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
316 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
338 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | c_sblat3.f | 58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
142 READ( NIN, FMT = * )NBET
143 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
147 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
154 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
295 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
301 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
309 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
315 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
337 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | c_cblat3.f | 63 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
148 READ( NIN, FMT = * )NBET
149 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
153 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
160 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
302 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
308 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
316 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
322 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
344 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | c_zblat3.f | 64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
149 READ( NIN, FMT = * )NBET
150 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
154 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
161 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
303 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
309 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
317 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
323 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
345 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | c_sblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
192 READ( NIN, FMT = * )NBET
193 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
197 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
206 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
318 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
324 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
332 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
338 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
457 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
[all …]
|
| D | c_dblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
192 READ( NIN, FMT = * )NBET
193 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
197 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
206 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
318 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
324 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
332 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
338 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
457 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
[all …]
|
| D | c_cblat2.f | 82 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
196 READ( NIN, FMT = * )NBET
197 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
201 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
210 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
322 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
328 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
336 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
342 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
463 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
[all …]
|
| D | c_zblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
197 READ( NIN, FMT = * )NBET
198 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
202 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
211 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
322 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
328 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
336 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
342 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
463 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
[all …]
|
| /external/eigen/blas/testing/ |
| 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 | 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 | 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 | 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 …]
|
| 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 …]
|