| /external/cblas/testing/ |
| D | c_dblat3.f | 58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
136 READ( NIN, FMT = * )NALF
137 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
141 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
154 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
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,
324 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
[all …]
|
| D | c_sblat3.f | 58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
135 READ( NIN, FMT = * )NALF
136 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
140 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
153 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
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,
323 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
[all …]
|
| D | c_zblat3.f | 64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
142 READ( NIN, FMT = * )NALF
143 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
147 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
160 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
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,
331 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
[all …]
|
| D | c_cblat3.f | 63 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
141 READ( NIN, FMT = * )NALF
142 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
146 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
159 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
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,
330 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
[all …]
|
| D | c_sblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
185 READ( NIN, FMT = * )NALF
186 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
190 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
205 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
317 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
323 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
331 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
337 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | c_dblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
185 READ( NIN, FMT = * )NALF
186 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
190 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
205 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
317 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
323 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
331 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
337 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | c_cblat2.f | 82 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
189 READ( NIN, FMT = * )NALF
190 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
194 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
209 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
321 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
327 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
335 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
341 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
364 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | c_zblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
190 READ( NIN, FMT = * )NALF
191 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
195 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
210 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
321 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
327 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
335 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
341 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
364 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| /external/eigen/blas/testing/ |
| D | cblat2.f | 129 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
238 READ( NIN, FMT = * )NALF
239 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
243 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
258 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
347 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
353 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
365 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
371 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
377 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | zblat2.f | 130 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
239 READ( NIN, FMT = * )NALF
240 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
244 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
259 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
348 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
354 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
366 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
372 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
378 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | sblat2.f | 126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
233 READ( NIN, FMT = * )NALF
234 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
238 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
253 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
342 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
348 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
366 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
372 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | dblat3.f | 105 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
182 READ( NIN, FMT = * )NALF
183 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
187 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
200 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
318 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
324 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
330 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
335 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
341 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | sblat3.f | 105 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
182 READ( NIN, FMT = * )NALF
183 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
187 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
200 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
318 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
324 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
330 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
335 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
341 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | dblat2.f | 126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
233 READ( NIN, FMT = * )NALF
234 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
238 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
253 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
342 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
348 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
366 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
372 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | cblat3.f | 110 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
189 READ( NIN, FMT = * )NALF
190 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
194 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
207 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
326 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
332 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
338 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
343 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
349 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | zblat3.f | 112 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
191 READ( NIN, FMT = * )NALF
192 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
196 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
209 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
328 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
334 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
340 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
345 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
351 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|