Lines Matching full:isnum
84 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB,
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,
326 170 CALL ZCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
332 180 CALL ZCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
338 190 CALL ZCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
2342 SUBROUTINE ZCHKE( ISNUM, SRNAMT, NOUT )
2355 INTEGER ISNUM, NOUT
2380 $ 170 )ISNUM
