Lines Matching full:nsubs
51 INTEGER NSUBS52 PARAMETER ( NSUBS = 9 )80 LOGICAL LTEST( NSUBS )81 CHARACTER*12 SNAMES( NSUBS )189 DO 20 I = 1, NSUBS193 DO 40 I = 1, NSUBS282 DO 200 ISNUM = 1, NSUBS