Lines Matching full:isnum
83 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NINC, NKB,
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 ), EPS, THRESH, NOUT, NTRA, TRACE,
320 160 CALL CCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
325 170 CALL CCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
331 180 CALL CCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
337 190 CALL CCHK6( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
2335 SUBROUTINE CCHKE( ISNUM, SRNAMT, NOUT )
2348 INTEGER ISNUM, NOUT
2373 $ 170 )ISNUM