| /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_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_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_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_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_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 | sblat3.f | 59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, 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 )
279 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
285 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
291 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
296 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
302 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | dblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
187 READ( NIN, FMT = * )NALF
188 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
192 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
207 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
303 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
321 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
327 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
333 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | zblat2.f | 84 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
193 READ( NIN, FMT = * )NALF
194 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
198 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
213 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
315 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
327 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
333 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
339 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | dblat3.f | 59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, 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 )
279 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
285 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
291 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
296 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
302 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | cblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
192 READ( NIN, FMT = * )NALF
193 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
197 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
212 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
308 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
314 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
326 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
332 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
338 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | sblat2.f | 80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
187 READ( NIN, FMT = * )NALF
188 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
192 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
207 WRITE( NOUT, FMT = 9989 )( ALF( I ), I = 1, NALF )
303 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
321 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
327 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
333 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | cblat3.f | 64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
143 READ( NIN, FMT = * )NALF
144 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
148 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
161 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
287 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
293 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
299 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
304 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
310 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|
| D | zblat3.f | 65 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
144 READ( NIN, FMT = * )NALF
145 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN
149 READ( NIN, FMT = * )( ALF( I ), I = 1, NALF )
162 WRITE( NOUT, FMT = 9993 )( ALF( I ), I = 1, NALF )
288 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
294 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
300 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NMAX, AB,
305 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
311 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NBET, BET,
[all …]
|