Symbol Description Uses
nff 21


File Line number Procedure Code
./model/src/port_rand.F 31 NO PROCEDURE 
      integer nff,idum
./model/src/port_rand.F 32 NO PROCEDURE 
      parameter(nff=55)
./model/src/port_rand.F 38 NO PROCEDURE 
      integer mj,mk,ma(nff)
./model/src/port_rand.F 43 NO PROCEDURE 
      real*8 mj,mk,ma(nff)
./model/src/port_rand.F 57 NO PROCEDURE 
        ma(nff)=mj
./model/src/port_rand.F 59 NO PROCEDURE 
        do i=1,nff-1
./model/src/port_rand.F 60 NO PROCEDURE 
          ii=mod(21*i,nff)
./model/src/port_rand.F 67 NO PROCEDURE 
          do i=1,nff
./model/src/port_rand.F 68 NO PROCEDURE 
            ma(i)=ma(i)-ma(1+mod(i+30,nff))
./model/src/port_rand.F 80 NO PROCEDURE 
        inext=mod(inext,nff)+1
./model/src/port_rand.F 81 NO PROCEDURE 
        inextp=mod(inextp,nff)+1
./pkg/mnc/mnc_file.F 611 MNC_FILE_READALL 
      integer ierr, nff,nlf, indf
./pkg/mnc/mnc_file.F 614 MNC_FILE_READALL 
      nff = IFNBLNK(fname)
./pkg/mnc/mnc_file.F 618 MNC_FILE_READALL 
     &     fname(nff:nlf), ''' for read/write access'
./pkg/mnc/mnc_file.F 650 MNC_FILE_TRY_READ 
      integer dlen, id, xtype, nat, nff,nlf, iv
./pkg/mnc/mnc_file.F 661 MNC_FILE_TRY_READ 
      nff = IFNBLNK(fname)
./pkg/mnc/mnc_file.F 670 MNC_FILE_TRY_READ 
      mnc_f_names(indf)(1:(nlf-nff+1)) = fname(nff:nlf)
./pkg/mnc/mnc_file.F 676 MNC_FILE_TRY_READ 
     &     ' in file ''', fname(nff:nlf), ''''
./pkg/mnc/mnc_file.F 684 MNC_FILE_TRY_READ 
     &       fname(nff:nlf), ''''
./pkg/mnc/mnc_file.F 711 MNC_FILE_TRY_READ 
     &       fname(nff:nlf), ''''