| /external/cblas/testing/ |
| 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_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_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_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_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 | 105 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
189 READ( NIN, FMT = * )NBET
190 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
194 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
201 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
318 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
324 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
335 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
341 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
396 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
[all …]
|
| D | dblat3.f | 105 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
189 READ( NIN, FMT = * )NBET
190 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
194 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
201 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
318 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
324 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
335 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
341 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
396 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
[all …]
|
| D | zblat3.f | 112 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
198 READ( NIN, FMT = * )NBET
199 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
203 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
210 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
328 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
334 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
345 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
351 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
408 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
[all …]
|
| D | cblat3.f | 110 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA 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 )
208 WRITE( NOUT, FMT = 9992 )( BET( I ), I = 1, NBET )
326 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
332 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
343 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
349 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
406 $ FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET, NMAX, argument
[all …]
|
| D | sblat2.f | 126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
240 READ( NIN, FMT = * )NBET
241 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
245 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
254 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
343 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
431 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
448 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
454 $ AS( NMAX*NMAX ), BET( NBET ), G( NMAX ),
[all …]
|
| D | dblat2.f | 126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
240 READ( NIN, FMT = * )NBET
241 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
245 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
254 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
343 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
431 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
448 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
454 $ AS( NMAX*NMAX ), BET( NBET ), G( NMAX ),
[all …]
|
| D | zblat2.f | 130 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
246 READ( NIN, FMT = * )NBET
247 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
251 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
260 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
349 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
355 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
439 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
459 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
465 $ AS( NMAX*NMAX ), BET( NBET ), X( NMAX ),
[all …]
|
| D | cblat2.f | 129 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
245 READ( NIN, FMT = * )NBET
246 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN
250 READ( NIN, FMT = * )( BET( I ), I = 1, NBET )
259 WRITE( NOUT, FMT = 9988 )( BET( I ), I = 1, NBET )
348 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
354 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
438 $ FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF, NBET, argument
457 INTEGER INCMAX, NALF, NBET, NIDIM, NINC, NKB, NMAX, local
463 $ AS( NMAX*NMAX ), BET( NBET ), X( NMAX ),
[all …]
|