Lines Matching refs:ISNUM
58 INTEGER I, ISNUM, J, N, NALF, NBET, NIDIM, NTRA, variable
275 DO 200 ISNUM = 1, NSUBS
277 IF( .NOT.LTEST( ISNUM ) )THEN
279 WRITE( NOUT, FMT = 9987 )SNAMES( ISNUM )
281 SRNAMT = SNAMES( ISNUM )
284 CALL CS3CHKE( SNAMES( ISNUM ) )
291 GO TO ( 140, 150, 160, 160, 170, 180 )ISNUM
294 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
300 CALL SCHK1( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
308 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
314 CALL SCHK2( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
322 CALL SCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
328 CALL SCHK3( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
336 CALL SCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
342 CALL SCHK4( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
350 CALL SCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,
356 CALL SCHK5( SNAMES( ISNUM ), EPS, THRESH, NOUT, NTRA, TRACE,