Home
last modified time | relevance | path

Searched refs:ISNUM (Results 1 – 16 of 16) sorted by relevance

/external/cblas/testing/
Dc_sblat2.f79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
295 DO 210 ISNUM = 1, NSUBS
297 IF( .NOT.LTEST( ISNUM ) )THEN
299 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
301 SRNAMT = SNAMES( ISNUM )
304 CALL CS2CHKE( SNAMES( ISNUM ) )
313 $ 190, 190 )ISNUM
316 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
322 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
330 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dc_dblat2.f79 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
295 DO 210 ISNUM = 1, NSUBS
297 IF( .NOT.LTEST( ISNUM ) )THEN
299 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
301 SRNAMT = SNAMES( ISNUM )
304 CALL CD2CHKE( SNAMES( ISNUM ) )
313 $ 190, 190 )ISNUM
316 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
322 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
330 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dc_dblat3.f58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
276 DO 200 ISNUM = 1, NSUBS
278 IF( .NOT.LTEST( ISNUM ) )THEN
280 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
282 SRNAMT = SNAMES( ISNUM )
285 CALL CD3CHKE( SNAMES( ISNUM ) )
292 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM
295 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
301 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
309 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dc_sblat3.f58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
275 DO 200 ISNUM = 1, NSUBS
277 IF( .NOT.LTEST( ISNUM ) )THEN
279 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
281 SRNAMT = SNAMES( ISNUM )
284 CALL CS3CHKE( SNAMES( ISNUM ) )
291 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM
294 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
300 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
308 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dc_cblat2.f82 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
299 DO 210 ISNUM = 1, NSUBS
301 IF( .NOT.LTEST( ISNUM ) )THEN
303 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
305 SRNAMT = SNAMES( ISNUM )
308 CALL CC2CHKE( SNAMES( ISNUM ) )
317 $ 180, 190, 190 )ISNUM
320 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
326 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
334 CALL CCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dc_zblat2.f83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
299 DO 210 ISNUM = 1, NSUBS
301 IF( .NOT.LTEST( ISNUM ) )THEN
303 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
305 SRNAMT = SNAMES( ISNUM )
308 CALL CZ2CHKE( SNAMES( ISNUM ) )
317 $ 180, 190, 190 )ISNUM
320 CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
326 CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
334 CALL ZCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dc_cblat3.f63 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
281 DO 200 ISNUM = 1, NSUBS
283 IF( .NOT.LTEST( ISNUM ) )THEN
285 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
287 SRNAMT = SNAMES( ISNUM )
290 CALL CC3CHKE( SNAMES( ISNUM ) )
298 $ 180, 180 )ISNUM
301 CALL CCHK1(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
307 CALL CCHK1(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
315 CALL CCHK2(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dc_zblat3.f64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
282 DO 200 ISNUM = 1, NSUBS
284 IF( .NOT.LTEST( ISNUM ) )THEN
286 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
288 SRNAMT = SNAMES( ISNUM )
291 CALL CZ3CHKE( SNAMES( ISNUM ) )
299 $ 180, 180 )ISNUM
302 CALL ZCHK1(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
308 CALL ZCHK1(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
316 CALL ZCHK2(SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
/external/eigen/blas/testing/
Ddblat2.f80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
282 DO 210 ISNUM = 1, NSUBS
284 IF( .NOT.LTEST( ISNUM ) )THEN
286 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
288 SRNAMT = SNAMES( ISNUM )
291 CALL DCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
300 $ 190, 190 )ISNUM
302 140 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
308 150 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
315 160 CALL DCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dzblat2.f84 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
288 DO 210 ISNUM = 1, NSUBS
290 IF( .NOT.LTEST( ISNUM ) )THEN
292 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
294 SRNAMT = SNAMES( ISNUM )
297 CALL ZCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
306 $ 180, 190, 190 )ISNUM
308 140 CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
314 150 CALL ZCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
321 160 CALL ZCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dcblat2.f83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
287 DO 210 ISNUM = 1, NSUBS
289 IF( .NOT.LTEST( ISNUM ) )THEN
291 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
293 SRNAMT = SNAMES( ISNUM )
296 CALL CCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
305 $ 180, 190, 190 )ISNUM
307 140 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
313 150 CALL CCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
320 160 CALL CCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dsblat2.f80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
282 DO 210 ISNUM = 1, NSUBS
284 IF( .NOT.LTEST( ISNUM ) )THEN
286 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
288 SRNAMT = SNAMES( ISNUM )
291 CALL SCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
300 $ 190, 190 )ISNUM
302 140 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
308 150 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
315 160 CALL SCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dsblat3.f59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
260 DO 200 ISNUM = 1, NSUBS
262 IF( .NOT.LTEST( ISNUM ) )THEN
264 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
266 SRNAMT = SNAMES( ISNUM )
269 CALL SCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
276 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM
278 140 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
284 150 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
290 160 CALL SCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Ddblat3.f59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
260 DO 200 ISNUM = 1, NSUBS
262 IF( .NOT.LTEST( ISNUM ) )THEN
264 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
266 SRNAMT = SNAMES( ISNUM )
269 CALL DCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
276 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM
278 140 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
284 150 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
290 160 CALL DCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dcblat3.f64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
267 DO 200 ISNUM = 1, NSUBS
269 IF( .NOT.LTEST( ISNUM ) )THEN
271 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
273 SRNAMT = SNAMES( ISNUM )
276 CALL CCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
284 $ 180, 180 )ISNUM
286 140 CALL CCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
292 150 CALL CCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
298 160 CALL CCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]
Dzblat3.f65 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable
268 DO 200 ISNUM = 1, NSUBS
270 IF( .NOT.LTEST( ISNUM ) )THEN
272 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
274 SRNAMT = SNAMES( ISNUM )
277 CALL ZCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
285 $ 180, 180 )ISNUM
287 140 CALL ZCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
293 150 CALL ZCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
299 160 CALL ZCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
[all …]