Symbol Description Uses
nff 21


File Line number Procedure Code
./pkg/mnc/mnc_file.F 620 MNC_FILE_READALL 
      integer ierr, nff,nlf, indf
./pkg/mnc/mnc_file.F 623 MNC_FILE_READALL 
      nff = IFNBLNK(fname)
./pkg/mnc/mnc_file.F 627 MNC_FILE_READALL 
     &     fname(nff:nlf), ''' for read/write access'
./pkg/mnc/mnc_file.F 659 MNC_FILE_TRY_READ 
      integer dlen, id, xtype, nat, nff,nlf, iv
./pkg/mnc/mnc_file.F 670 MNC_FILE_TRY_READ 
      nff = IFNBLNK(fname)
./pkg/mnc/mnc_file.F 680 MNC_FILE_TRY_READ 
      mnc_f_names(indf)(1:(nlf-nff+1)) = fname(nff:nlf)
./pkg/mnc/mnc_file.F 686 MNC_FILE_TRY_READ 
     &     ' in file ''', fname(nff:nlf), ''''
./pkg/mnc/mnc_file.F 694 MNC_FILE_TRY_READ 
     &       fname(nff:nlf), ''''
./pkg/mnc/mnc_file.F 721 MNC_FILE_TRY_READ 
     &       fname(nff:nlf), ''''
./model/src/port_rand.F 36 NO PROCEDURE 
      INTEGER nff,idum
./model/src/port_rand.F 37 NO PROCEDURE 
      PARAMETER(nff=55)
./model/src/port_rand.F 43 NO PROCEDURE 
      INTEGER mj,mk,ma(nff)
./model/src/port_rand.F 48 NO PROCEDURE 
      real*8 mj,mk,ma(nff)
./model/src/port_rand.F 62 NO PROCEDURE 
        ma(nff)=mj
./model/src/port_rand.F 64 NO PROCEDURE 
        DO i=1,nff-1
./model/src/port_rand.F 65 NO PROCEDURE 
          ii=mod(21*i,nff)
./model/src/port_rand.F 72 NO PROCEDURE 
          DO i=1,nff
./model/src/port_rand.F 73 NO PROCEDURE 
            ma(i)=ma(i)-ma(1+mod(i+30,nff))
./model/src/port_rand.F 85 NO PROCEDURE 
        inext=mod(inext,nff)+1
./model/src/port_rand.F 86 NO PROCEDURE 
        inextp=mod(inextp,nff)+1