Searched defs:ISNUM (Results 1 - 8 of 8) sorted by relevance

/external/eigen/blas/testing/
H A Dcblat2.f83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:CBLAT2
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 ), EP
2348 INTEGER ISNUM local in subroutine:CCHKE
[all...]
H A Dcblat3.f64 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable in program:CBLAT3
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 ), EP
1960 INTEGER ISNUM local in subroutine:CCHKE
[all...]
H A Ddblat2.f80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:DBLAT2
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 ), EP
2299 INTEGER ISNUM local in subroutine:DCHKE
[all...]
H A Ddblat3.f59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable in program:DBLAT3
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 ), EP
1816 INTEGER ISNUM local in subroutine:DCHKE
[all...]
H A Dsblat2.f80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:SBLAT2
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 ), EP
2299 INTEGER ISNUM local in subroutine:SCHKE
[all...]
H A Dsblat3.f59 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable in program:SBLAT3
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 ), EP
1816 INTEGER ISNUM local in subroutine:SCHKE
[all...]
H A Dzblat2.f84 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable in program:ZBLAT2
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 ), EP
2355 INTEGER ISNUM local in subroutine:ZCHKE
[all...]
H A Dzblat3.f65 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NOUT, NTRA variable in program:ZBLAT3
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 ), EP
1963 INTEGER ISNUM local in subroutine:ZCHKE
[all...]

Completed in 77 milliseconds