Lines Matching full:nsubs
48 INTEGER NSUBS49 PARAMETER ( NSUBS = 6 )73 LOGICAL LTEST( NSUBS )74 CHARACTER*12 SNAMES( NSUBS )182 DO 20 I = 1, NSUBS186 DO 40 I = 1, NSUBS275 DO 200 ISNUM = 1, NSUBS