Symbol Description Uses
ikey 40


File Line number Procedure Code
./pkg/exf/exf_mapfields.F 100 EXF_MAPFIELDS 
          ikey = (act1 + 1) + act2*max1
./pkg/exf/exf_wind.F 70 EXF_WIND 
          ikey = (act1 + 1) + act2*max1
./pkg/gmredi/gmredi_slope_limit.F 136 GMREDI_SLOPE_LIMIT 
      ikey = (act1 + 1) + act2*max1
./pkg/longstep/longstep_thermodynamics.F 103 LONGSTEP_THERMODYNAMICS 
      ikey = 1
./pkg/mom_common/mom_calc_hfacz.F 95 MOM_CALC_HFACZ 
          ikey = (act1 + 1) + act2*max1
./pkg/mom_common/mom_calc_hfacz.F 98 MOM_CALC_HFACZ 
          kkey = (ikey-1)*Nr + k
./pkg/mom_common/mom_calc_visc.F 154 MOM_CALC_VISC 
          ikey = (act1 + 1) + act2*max1
./pkg/mom_common/mom_calc_visc.F 157 MOM_CALC_VISC 
          lockey_1 = (ikey-1)*Nr + k
./model/src/calc_phi_hyd.F 131 CALC_PHI_HYD 
          ikey = (act1 + 1) + act2*max1
./model/src/calc_phi_hyd.F 159 CALC_PHI_HYD 
          kkey = (ikey-1)*Nr + k
./model/src/calc_phi_hyd.F 316 CALC_PHI_HYD 
          kkey = (ikey-1)*Nr + k
./model/src/cg2d_nsa.F 136 CG2D_NSA 
          ikey = (act1 + 1) + act2*max1
./model/src/cg2d_nsa.F 245 CG2D_NSA 
       icg2dkey = (ikey-1)*numItersMax + it2d
./pkg/obcs/obcs_calc_stevens.F 153 OBCS_CALC_STEVENS 
          ikey = (act1 + 1) + act2*max1
./model/src/convective_adjustment.F 107 CONVECTIVE_ADJUSTMENT 
          ikey = (act1 + 1) + act2*max1
./model/src/convective_adjustment.F 139 CONVECTIVE_ADJUSTMENT 
            kkey = (ikey-1)*Nr + k
./model/src/convective_adjustment_ini.F 107 CONVECTIVE_ADJUSTMENT_INI 
          ikey = (act1 + 1) + act2*max1
./model/src/convective_adjustment_ini.F 139 CONVECTIVE_ADJUSTMENT_INI 
            kkey = (ikey-1)*Nr + k
./pkg/obcs/obcs_sponge.F 453 OBCS_SPONGE_T 
          ikey = (act1 + 1) + act2*max1
./pkg/obcs/obcs_sponge.F 456 OBCS_SPONGE_T 
          kkey = (ikey-1)*Nr + k
./pkg/obcs/obcs_sponge.F 690 OBCS_SPONGE_S 
          ikey = (act1 + 1) + act2*max1
./pkg/obcs/obcs_sponge.F 693 OBCS_SPONGE_S 
          kkey = (ikey-1)*Nr + k
./pkg/salt_plume/salt_plume_calc_depth.F 100 SALT_PLUME_CALC_DEPTH 
          kkey = (ikey-1)*Nr + k
./pkg/salt_plume/salt_plume_calc_depth.F 147 SALT_PLUME_CALC_DEPTH 
          kkey = (ikey-1)*Nr + k
./pkg/salt_plume/salt_plume_calc_depth.F 71 SALT_PLUME_CALC_DEPTH 
        ikey = (act1 + 1) + act2*max1
./model/src/external_forcing_surf.F 190 EXTERNAL_FORCING_SURF 
          ikey = (act1 + 1) + act2*max1
./pkg/shelfice/shelfice_thermodynamics.F 228 SHELFICE_THERMODYNAMICS 
        ikey = (act1 + 1) + act2*max1
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F 63 COST_HFLUX 
         ikey = (act1 + 1) + act2*max1
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F 70 COST_TEMP 
         ikey = (act1 + 1) + act2*max1
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 187 EXTERNAL_FORCING_SURF 
          ikey = (act1 + 1) + act2*max1
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F 63 COST_HFLUX 
         ikey = (act1 + 1) + act2*max1
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F 70 COST_TEMP 
         ikey = (act1 + 1) + act2*max1
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 187 EXTERNAL_FORCING_SURF 
          ikey = (act1 + 1) + act2*max1
./model/src/thermodynamics.F 109 THERMODYNAMICS 
      ikey = 1
./pkg/autodiff/tamc_keys.h 8 NO PROCEDURE 
      integer           key, ikey
./pkg/autodiff/tamc_keys.h 9 NO PROCEDURE 
      common /tamckeys/ key, ikey
./pkg/ctrl/ctrl_map_ini_gen.F 284 CTRL_MAP_INI_GEN2D 
          ikey = (act3 + 1) + act4*max3
./pkg/ctrl/ctrl_map_ini_gen.F 87 CTRL_MAP_INI_GEN3D 
          ikey = (act3 + 1) + act4*max3
./pkg/ecco/cost_drifter.F 142 COST_DRIFTER 
          ikey = (act1 + 1) + act2*max1
./pkg/ecco/cost_tau_eddy.F 227 COST_TAU_EDDY 
        ikey = (act1 + 1) + act2*max1