Lines Matching refs:ISNUM
126 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB, variable
321 DO 210 ISNUM = 1, NSUBS
323 IF( .NOT.LTEST( ISNUM ) )THEN
325 WRITE( NOUT, FMT = 9983 )SNAMES( ISNUM )
327 SRNAMT = SNAMES( ISNUM )
330 CALL SCHKE( ISNUM, SNAMES( ISNUM ), NOUT )
339 $ 190, 190 )ISNUM
341 140 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
347 150 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
354 160 CALL SCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
359 170 CALL SCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
365 180 CALL SCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
371 190 CALL SCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
2325 SUBROUTINE SCHKE( ISNUM, SRNAMT, NOUT ) argument
2338 INTEGER ISNUM, NOUT local
2362 $ 160 )ISNUM