| /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_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_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_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_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_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 | sblat3.f | 59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, 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 )
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,
[all …]
|
| D | dblat3.f | 59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, 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 )
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,
[all …]
|
| D | cblat2.f | 83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
153 READ( NIN, FMT = * )NIDIM
154 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
158 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
159 DO 10 I = 1, NIDIM
209 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
308 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
314 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
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
148 READ( NIN, FMT = * )NIDIM
149 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
153 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
154 DO 10 I = 1, NIDIM
204 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
303 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
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
148 READ( NIN, FMT = * )NIDIM
149 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
153 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
154 DO 10 I = 1, NIDIM
204 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
303 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
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
154 READ( NIN, FMT = * )NIDIM
155 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
159 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
160 DO 10 I = 1, NIDIM
210 WRITE( NOUT, FMT = 9992 )( IDIM( I ), I = 1, NIDIM )
309 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
315 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NALF, ALF,
322 $ REWI, FATAL, NIDIM, IDIM, NKB, KB, NINC, INC,
327 $ REWI, FATAL, NIDIM, IDIM, NALF, ALF, NINC, INC,
[all …]
|
| D | cblat3.f | 64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
130 READ( NIN, FMT = * )NIDIM
131 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
135 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
136 DO 10 I = 1, NIDIM
160 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|
| D | zblat3.f | 65 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
131 READ( NIN, FMT = * )NIDIM
132 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN
136 READ( NIN, FMT = * )( IDIM( I ), I = 1, NIDIM )
137 DO 10 I = 1, NIDIM
161 WRITE( NOUT, FMT = 9994 )( IDIM( I ), I = 1, NIDIM )
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,
[all …]
|