| /external/cblas/testing/ |
| D | c_dblat3.f | 58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
123 READ( NIN, FMT = * )NIDIM
124 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
128 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
129 DO 10 I = 1, NIDIM
153 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | c_sblat3.f | 58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
122 READ( NIN, FMT = * )NIDIM
123 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
127 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
128 DO 10 I = 1, NIDIM
152 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | c_dblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
146 READ( NIN, FMT = * )NIDIM
147 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
151 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
152 DO 10 I = 1, NIDIM
202 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | c_zblat3.f | 64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
129 READ( NIN, FMT = * )NIDIM
130 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
134 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
135 DO 10 I = 1, NIDIM
159 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | c_cblat3.f | 63 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
128 READ( NIN, FMT = * )NIDIM
129 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
133 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
134 DO 10 I = 1, NIDIM
158 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | c_sblat2.f | 79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
146 READ( NIN, FMT = * )NIDIM
147 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
151 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
152 DO 10 I = 1, NIDIM
202 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | c_cblat2.f | 82 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
150 READ( NIN, FMT = * )NIDIM
151 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
155 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
156 DO 10 I = 1, NIDIM
206 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | c_zblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
151 READ( NIN, FMT = * )NIDIM
152 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
156 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
157 DO 10 I = 1, NIDIM
207 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| /external/eigen/blas/testing/ |
| D | dblat3.f | 105 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
169 READ( NIN, FMT = * )NIDIM
170 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
174 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
175 DO 10 I = 1, NIDIM
199 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | sblat3.f | 105 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
169 READ( NIN, FMT = * )NIDIM
170 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
174 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
175 DO 10 I = 1, NIDIM
199 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | dblat2.f | 126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
194 READ( NIN, FMT = * )NIDIM
195 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
199 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
200 DO 10 I = 1, NIDIM
250 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
342 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
348 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
355 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | zblat2.f | 130 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
200 READ( NIN, FMT = * )NIDIM
201 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
205 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
206 DO 10 I = 1, NIDIM
256 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
348 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
354 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
361 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
366 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | cblat2.f | 129 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
199 READ( NIN, FMT = * )NIDIM
200 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
204 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
205 DO 10 I = 1, NIDIM
255 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
347 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
353 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
360 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
365 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | sblat2.f | 126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
194 READ( NIN, FMT = * )NIDIM
195 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
199 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
200 DO 10 I = 1, NIDIM
250 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
342 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
348 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
355 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
360 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | zblat3.f | 112 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
178 READ( NIN, FMT = * )NIDIM
179 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
183 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
184 DO 10 I = 1, NIDIM
208 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | cblat3.f | 110 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
176 READ( NIN, FMT = * )NIDIM
177 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
181 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
182 DO 10 I = 1, NIDIM
206 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|