Lines Matching full:nsubs
70 INTEGER NSUBS71 PARAMETER ( NSUBS = 17 )100 LOGICAL LTEST( NSUBS )101 CHARACTER*6 SNAMES( NSUBS )226 DO 40 I = 1, NSUBS230 DO 60 I = 1, NSUBS288 DO 210 ISNUM = 1, NSUBS