Lines Matching full:nsubs
52 INTEGER NSUBS53 PARAMETER ( NSUBS = 9 )80 LOGICAL LTEST( NSUBS )81 CHARACTER*6 SNAMES( NSUBS )175 DO 20 I = 1, NSUBS179 DO 40 I = 1, NSUBS268 DO 200 ISNUM = 1, NSUBS