Symbol Description Uses
ilfld 60



File Line number Procedure Code
./pkg/ctrl/ctrl_obcsbal.F 68 CTRL_OBCSBAL
      integer ilfld
./pkg/ctrl/ctrl_obcsvol.F 145 CTRL_OBCSVOL
         ilfld=ilnblnk( xx_obcsn_file )
./pkg/ctrl/ctrl_obcsvol.F 147 CTRL_OBCSVOL
     &        xx_obcsn_file(1:ilfld),'.', optimcycle
./pkg/ctrl/ctrl_obcsvol.F 148 CTRL_OBCSVOL
         ilfld=ilnblnk( xx_obcss_file )
./pkg/ctrl/ctrl_obcsvol.F 150 CTRL_OBCSVOL
     &        xx_obcss_file(1:ilfld),'.',optimcycle
./pkg/ctrl/ctrl_obcsvol.F 151 CTRL_OBCSVOL
         ilfld=ilnblnk( xx_obcsw_file )
./pkg/ctrl/ctrl_obcsvol.F 153 CTRL_OBCSVOL
     &        xx_obcsw_file(1:ilfld),'.',optimcycle
./pkg/ctrl/ctrl_obcsvol.F 154 CTRL_OBCSVOL
         ilfld=ilnblnk( xx_obcse_file )
./pkg/ctrl/ctrl_obcsvol.F 156 CTRL_OBCSVOL
     &        xx_obcse_file(1:ilfld),'.',optimcycle
./pkg/ctrl/ctrl_obcsvol.F 65 CTRL_OBCSVOL
      integer ilfld
./pkg/ctrl/ctrl_volflux.F 145 CTRL_VOLFLUX
         ilfld=ilnblnk( xx_obcsn_file )
./pkg/ctrl/ctrl_volflux.F 147 CTRL_VOLFLUX
     &        xx_obcsn_file(1:ilfld),'.', optimcycle
./pkg/ctrl/ctrl_volflux.F 150 CTRL_VOLFLUX
         ilfld=ilnblnk( xx_obcss_file )
./pkg/ctrl/ctrl_volflux.F 152 CTRL_VOLFLUX
     &        xx_obcss_file(1:ilfld),'.',optimcycle
./pkg/ctrl/ctrl_volflux.F 155 CTRL_VOLFLUX
         ilfld=ilnblnk( xx_obcsw_file )
./pkg/ctrl/ctrl_volflux.F 157 CTRL_VOLFLUX
     &        xx_obcsw_file(1:ilfld),'.',optimcycle
./pkg/ctrl/ctrl_volflux.F 160 CTRL_VOLFLUX
         ilfld=ilnblnk( xx_obcse_file )
./pkg/ctrl/ctrl_volflux.F 162 CTRL_VOLFLUX
     &        xx_obcse_file(1:ilfld),'.',optimcycle
./pkg/ctrl/ctrl_volflux.F 71 CTRL_VOLFLUX
      integer ilfld
./pkg/ecco/cost_bottomdrag.F 47 COST_BOTTOMDRAG
      integer ilfld
./pkg/ecco/cost_bottomdrag.F 85 COST_BOTTOMDRAG
        ilfld = ilnblnk( xx_bottomdrag_file )
./pkg/ecco/cost_bottomdrag.F 87 COST_BOTTOMDRAG
     &       xx_bottomdrag_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_diffkr.F 47 COST_DIFFKR
      integer ilfld
./pkg/ecco/cost_diffkr.F 85 COST_DIFFKR
        ilfld = ilnblnk( xx_diffkr_file )
./pkg/ecco/cost_diffkr.F 87 COST_DIFFKR
     &       xx_diffkr_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_forcing_gen.F 128 COST_FORCING_GEN
        ilfld=ilnblnk( xx_gen_file )
./pkg/ecco/cost_forcing_gen.F 130 COST_FORCING_GEN
     &       xx_gen_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_forcing_gen.F 84 COST_FORCING_GEN
      integer ilfld
./pkg/ecco/cost_kapgm.F 50 COST_KAPGM
      integer ilfld
./pkg/ecco/cost_kapgm.F 88 COST_KAPGM
        ilfld = ilnblnk( xx_kapgm_file )
./pkg/ecco/cost_kapgm.F 90 COST_KAPGM
     &       xx_kapgm_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_kapredi.F 50 COST_KAPREDI
      integer ilfld
./pkg/ecco/cost_kapredi.F 88 COST_KAPREDI
        ilfld = ilnblnk( xx_kapredi_file )
./pkg/ecco/cost_kapredi.F 90 COST_KAPREDI
     &       xx_kapredi_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_obcsvol.F 144 COST_OBCSVOL
        ilfld=ilnblnk( xx_obcsn_file )
./pkg/ecco/cost_obcsvol.F 146 COST_OBCSVOL
     &        xx_obcsn_file(1:ilfld),'.', optimcycle
./pkg/ecco/cost_obcsvol.F 149 COST_OBCSVOL
        ilfld=ilnblnk( xx_obcss_file )
./pkg/ecco/cost_obcsvol.F 151 COST_OBCSVOL
     &        xx_obcss_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_obcsvol.F 154 COST_OBCSVOL
        ilfld=ilnblnk( xx_obcsw_file )
./pkg/ecco/cost_obcsvol.F 156 COST_OBCSVOL
     &        xx_obcsw_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_obcsvol.F 159 COST_OBCSVOL
        ilfld=ilnblnk( xx_obcse_file )
./pkg/ecco/cost_obcsvol.F 161 COST_OBCSVOL
     &        xx_obcse_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_obcsvol.F 68 COST_OBCSVOL
      integer ilfld
./pkg/ecco/cost_salt0.F 101 COST_SALT0
     &       xx_salt_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_salt0.F 59 COST_SALT0
      integer ilfld
./pkg/ecco/cost_salt0.F 99 COST_SALT0
        ilfld = ilnblnk( xx_salt_file )
./pkg/ecco/cost_salt_ini_fin.F 51 COST_SALT_INI_FIN
      integer ilfld
./pkg/ecco/cost_salt_ini_fin.F 88 COST_SALT_INI_FIN
      ilfld = ilnblnk( xx_salt_ini_fin_file )
./pkg/ecco/cost_salt_ini_fin.F 90 COST_SALT_INI_FIN
     &     xx_salt_ini_fin_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_tau_eddy.F 132 COST_TAU_EDDY
        ilfld = ilnblnk( xx_edtauy_file )
./pkg/ecco/cost_tau_eddy.F 134 COST_TAU_EDDY
     &       xx_edtauy_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_tau_eddy.F 50 COST_TAU_EDDY
      integer ilfld
./pkg/ecco/cost_tau_eddy.F 97 COST_TAU_EDDY
        ilfld = ilnblnk( xx_edtaux_file )
./pkg/ecco/cost_tau_eddy.F 99 COST_TAU_EDDY
     &       xx_edtaux_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_theta0.F 101 COST_THETA0
     &       xx_theta_file(1:ilfld),'.',optimcycle
./pkg/ecco/cost_theta0.F 59 COST_THETA0
      integer ilfld
./pkg/ecco/cost_theta0.F 99 COST_THETA0
        ilfld = ilnblnk( xx_theta_file )
./pkg/ecco/cost_theta_ini_fin.F 51 COST_THETA_INI_FIN
      integer ilfld
./pkg/ecco/cost_theta_ini_fin.F 88 COST_THETA_INI_FIN
      ilfld = ilnblnk( xx_theta_ini_fin_file )
./pkg/ecco/cost_theta_ini_fin.F 90 COST_THETA_INI_FIN
     &     xx_theta_ini_fin_file(1:ilfld),'.',optimcycle