Lines Matching full:isnum
80 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB,
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,
320 170 CALL DCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
326 180 CALL DCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
332 190 CALL DCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
2286 SUBROUTINE DCHKE( ISNUM, SRNAMT, NOUT )
2299 INTEGER ISNUM, NOUT
2323 $ 160 )ISNUM
