Lines Matching refs:ISNUM
84 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,
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 ) argument
2355 INTEGER ISNUM, NOUT local
2380 $ 170 )ISNUM