Lines Matching full:isnum
58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA,
276 DO 200 ISNUM = 1, NSUBS
278 IF( .NOT.LTEST( ISNUM ) )THEN
280 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
282 SRNAMT = SNAMES( ISNUM )
285 CALL CD3CHKE( SNAMES( ISNUM ) )
292 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM
295 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
301 CALL DCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
309 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
315 CALL DCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
323 CALL DCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
329 CALL DCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
337 CALL DCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
343 CALL DCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
351 CALL DCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
357 CALL DCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
