| /external/cblas/testing/ |
| D | c_sblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
172 READ( NIN, FMT = * )NINC
173 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
177 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
178 DO 30 I = 1, NINC
204 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
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,
[all …]
|
| D | c_dblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
172 READ( NIN, FMT = * )NINC
173 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
177 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
178 DO 30 I = 1, NINC
204 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
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,
[all …]
|
| D | c_cblat2.f | 82 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
176 READ( NIN, FMT = * )NINC
177 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
181 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
182 DO 30 I = 1, NINC
208 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
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,
[all …]
|
| D | c_zblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
177 READ( NIN, FMT = * )NINC
178 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
182 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
183 DO 30 I = 1, NINC
209 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
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,
[all …]
|
| /external/eigen/blas/testing/ |
| D | cblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
179 READ( NIN, FMT = * )NINC
180 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
184 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
185 DO 30 I = 1, NINC
211 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
309 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
315 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
321 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
326 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | dblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
174 READ( NIN, FMT = * )NINC
175 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
179 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
180 DO 30 I = 1, NINC
206 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
304 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
310 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
316 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
321 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | sblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
174 READ( NIN, FMT = * )NINC
175 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
179 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
180 DO 30 I = 1, NINC
206 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
304 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
310 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
316 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
321 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | zblat2.f | 84 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
180 READ( NIN, FMT = * )NINC
181 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN
185 READ( NIN, FMT = * )( INC( I ), I = 1, NINC )
186 DO 30 I = 1, NINC
212 WRITE( NOUT, FMT = 9990 )( INC( I ), I = 1, NINC )
310 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
316 $ NBET, BET, NINC, INC, NMAX, INCMAX, A, AA, AS,
322 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
327 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|