Symbol Description Uses
act4 148


File Line number Procedure Code
./pkg/exf/exf_bulkformulae.F 268 EXF_BULKFORMULAE 
          act4 = ikey_dynamics - 1
./pkg/exf/exf_bulkformulae.F 275 EXF_BULKFORMULAE 
     &         + sNx*sNy*max1*max2*max3*act4
./pkg/exf/exf_bulkformulae.F 367 EXF_BULKFORMULAE 
     &           + sNx*sNy*niter_bulk*max1*max2*max3*act4
./pkg/exf/exf_bulkformulae.F 482 EXF_BULKFORMULAE 
     &          + sNx*sNy*max1*max2*max3*act4
./pkg/exf/exf_mapfields.F 102 EXF_MAPFIELDS 
     &                      + act4*max1*max2*max3
./pkg/exf/exf_mapfields.F 99 EXF_MAPFIELDS 
          act4 = ikey_dynamics - 1
./pkg/exf/exf_wind.F 69 EXF_WIND 
          act4 = ikey_dynamics - 1
./pkg/exf/exf_wind.F 72 EXF_WIND 
     &                      + act4*max1*max2*max3
./pkg/generic_advdiff/gad_advection.F 178 GAD_ADVECTION 
          act4 = ikey_dynamics - 1
./pkg/generic_advdiff/gad_advection.F 183 GAD_ADVECTION 
     &                      + act4*max0*max1*max2*max3
./pkg/gmredi/gmredi_calc_psi_b.F 79 GMREDI_CALC_PSI_B 
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_calc_psi_b.F 82 GMREDI_CALC_PSI_B 
     &                        + act4*max1*max2*max3
./pkg/gmredi/gmredi_calc_tensor.F 129 GMREDI_CALC_TENSOR 
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_calc_tensor.F 132 GMREDI_CALC_TENSOR 
     &                      + act4*max1*max2*max3
./pkg/gmredi/gmredi_rtransport.F 69 GMREDI_RTRANSPORT 
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_rtransport.F 74 GMREDI_RTRANSPORT 
     &                      + act4*max0*max1*max2*max3
./pkg/gmredi/gmredi_slope_limit.F 135 GMREDI_SLOPE_LIMIT 
      act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_slope_limit.F 138 GMREDI_SLOPE_LIMIT 
     &                  + act4*max1*max2*max3
./pkg/gmredi/gmredi_slope_psi.F 80 GMREDI_SLOPE_PSI 
      act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_slope_psi.F 83 GMREDI_SLOPE_PSI 
     &                    + act4*max1*max2*max3
./pkg/gmredi/gmredi_xtransport.F 84 GMREDI_XTRANSPORT 
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_xtransport.F 89 GMREDI_XTRANSPORT 
     &                      + act4*max0*max1*max2*max3
./pkg/gmredi/gmredi_ytransport.F 84 GMREDI_YTRANSPORT 
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_ytransport.F 89 GMREDI_YTRANSPORT 
     &                      + act4*max0*max1*max2*max3
./pkg/kpp/kpp_calc.F 226 KPP_CALC 
          act4 = ikey_dynamics - 1
./pkg/kpp/kpp_calc.F 229 KPP_CALC 
     &                      + act4*max1*max2*max3
./pkg/longstep/longstep_thermodynamics.F 117 LONGSTEP_THERMODYNAMICS 
          act4 = ikey_dynamics - 1
./pkg/longstep/longstep_thermodynamics.F 120 LONGSTEP_THERMODYNAMICS 
     &                      + act4*max1*max2*max3
./pkg/mom_common/mom_calc_hfacz.F 94 MOM_CALC_HFACZ 
          act4 = ikey_dynamics - 1
./pkg/mom_common/mom_calc_hfacz.F 97 MOM_CALC_HFACZ 
     &                      + act4*max1*max2*max3
./pkg/mom_common/mom_calc_visc.F 153 MOM_CALC_VISC 
          act4 = ikey_dynamics - 1
./pkg/mom_common/mom_calc_visc.F 156 MOM_CALC_VISC 
     &                      + act4*max1*max2*max3
./model/src/calc_phi_hyd.F 129 CALC_PHI_HYD 
          act4 = ikey_dynamics - 1
./model/src/calc_phi_hyd.F 133 CALC_PHI_HYD 
     &                      + act4*max1*max2*max3
./pkg/mom_fluxform/mom_fluxform.F 189 MOM_FLUXFORM 
          act4 = ikey_dynamics - 1
./pkg/mom_fluxform/mom_fluxform.F 194 MOM_FLUXFORM 
     &                    + act4*max0*max1*max2*max3
./pkg/mom_vecinv/mom_vecinv.F 156 MOM_VECINV 
          act4 = ikey_dynamics - 1
./pkg/mom_vecinv/mom_vecinv.F 161 MOM_VECINV 
     &                    + act4*max0*max1*max2*max3
./pkg/obcs/obcs_calc_stevens.F 152 OBCS_CALC_STEVENS 
          act4 = ikey_dynamics - 1
./pkg/obcs/obcs_calc_stevens.F 155 OBCS_CALC_STEVENS 
     &                      + act4*max1*max2*max3
./model/src/convective_adjustment.F 106 CONVECTIVE_ADJUSTMENT 
          act4 = ikey_dynamics - 1
./model/src/convective_adjustment.F 109 CONVECTIVE_ADJUSTMENT 
     &                      + act4*max1*max2*max3
./model/src/convective_adjustment_ini.F 106 CONVECTIVE_ADJUSTMENT_INI 
          act4 = 0
./model/src/convective_adjustment_ini.F 109 CONVECTIVE_ADJUSTMENT_INI 
     &                      + act4*max1*max2*max3
./pkg/obcs/obcs_sponge.F 452 OBCS_SPONGE_T 
          act4 = ikey_dynamics - 1
./pkg/obcs/obcs_sponge.F 455 OBCS_SPONGE_T 
     &                      + act4*max1*max2*max3
./pkg/obcs/obcs_sponge.F 689 OBCS_SPONGE_S 
          act4 = ikey_dynamics - 1
./pkg/obcs/obcs_sponge.F 692 OBCS_SPONGE_S 
     &                      + act4*max1*max2*max3
./pkg/ptracers/ptracers_convect.F 61 PTRACERS_CONVECT 
          act4 = ikey_dynamics - 1
./pkg/ptracers/ptracers_convect.F 66 PTRACERS_CONVECT 
     &                      + act4*max0*max1*max2*max3
./pkg/ptracers/ptracers_integrate.F 173 PTRACERS_INTEGRATE 
          act4 = ikey_dynamics - 1
./pkg/ptracers/ptracers_integrate.F 178 PTRACERS_INTEGRATE 
     &                      + act4*max0*max1*max2*max3
./model/src/do_oceanic_phys.F 526 DO_OCEANIC_PHYS 
          act4 = ikey_dynamics - 1
./model/src/do_oceanic_phys.F 529 DO_OCEANIC_PHYS 
     &                      + act4*max1*max2*max3
./model/src/dynamics.F 288 DYNAMICS 
          act4 = ikey_dynamics - 1
./model/src/dynamics.F 291 DYNAMICS 
     &                      + act4*max1*max2*max3
./pkg/salt_plume/salt_plume_calc_depth.F 70 SALT_PLUME_CALC_DEPTH 
        act4 = ikey_dynamics - 1
./pkg/salt_plume/salt_plume_calc_depth.F 73 SALT_PLUME_CALC_DEPTH 
     &                    + act4*max1*max2*max3
./model/src/external_forcing_surf.F 189 EXTERNAL_FORCING_SURF 
          act4 = ikey_dynamics - 1
./model/src/external_forcing_surf.F 192 EXTERNAL_FORCING_SURF 
     &                      + act4*max1*max2*max3
./pkg/seaice/seaice_advdiff.F 172 SEAICE_ADVDIFF 
        act4 = ikey_dynamics - 1
./pkg/seaice/seaice_advdiff.F 175 SEAICE_ADVDIFF 
     &                       + act4*max1*max2*max3
./pkg/seaice/seaice_advection.F 159 SEAICE_ADVECTION 
          act4 = ikey_dynamics - 1
./pkg/seaice/seaice_advection.F 164 SEAICE_ADVECTION 
     &                      + act4*max0*max1*max2*max3
./pkg/seaice/seaice_growth.F 386 SEAICE_GROWTH 
        act4 = ikey_dynamics - 1
./pkg/seaice/seaice_growth.F 389 SEAICE_GROWTH 
     &                       + act4*max1*max2*max3
./pkg/seaice/seaice_lsr.F 684 SEAICE_LSR 
          act4 = itmpkey2 - 1
./pkg/seaice/seaice_lsr.F 687 SEAICE_LSR 
     &                          + act4*max1*max2*max3
./pkg/seaice/seaice_reg_ridge.F 93 SEAICE_REG_RIDGE 
        act4 = ikey_dynamics - 1
./pkg/seaice/seaice_reg_ridge.F 96 SEAICE_REG_RIDGE 
     &                       + act4*max1*max2*max3
./pkg/shelfice/shelfice_thermodynamics.F 227 SHELFICE_THERMODYNAMICS 
        act4 = ikey_dynamics - 1
./pkg/shelfice/shelfice_thermodynamics.F 230 SHELFICE_THERMODYNAMICS 
     &                    + act4*max1*max2*max3
./pkg/streamice/streamice_adv_front.F 130 STREAMICE_ADV_FRONT 
          act4 = ikey_front - 1
./pkg/streamice/streamice_adv_front.F 136 STREAMICE_ADV_FRONT 
     &         + (sNx+2)*(sNy+2)*max1*max2*max3*act4
./pkg/streamice/streamice_visc_beta_hybrid.F 112 STREAMICE_VISC_BETA_HYBRID 
          act4 = ikey_dynamics - 1
./pkg/streamice/streamice_visc_beta_hybrid.F 120 STREAMICE_VISC_BETA_HYBRID 
     &         + Nr*sNx*sNy*max1*max2*max3*act4
./pkg/thsice/thsice_advdiff.F 119 THSICE_ADVDIFF 
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_advdiff.F 122 THSICE_ADVDIFF 
     &                         + act4*max1*max2*max3
./pkg/thsice/thsice_advection.F 160 THSICE_ADVECTION 
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_advection.F 163 THSICE_ADVECTION 
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_advection.F 264 THSICE_ADVECTION 
     &         + nipass*max1*max2*max3*act4
./pkg/thsice/thsice_calc_thickn.F 232 THSICE_CALC_THICKN 
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_calc_thickn.F 235 THSICE_CALC_THICKN 
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_calc_thickn.F 894 THSICE_CALC_THICKN 
     &       + sNx*sNy*max1*max2*max3*act4
./pkg/thsice/thsice_do_advect.F 77 THSICE_DO_ADVECT 
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_do_advect.F 80 THSICE_DO_ADVECT 
     &                         + act4*max1*max2*max3
./pkg/thsice/thsice_extend.F 141 THSICE_EXTEND 
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_extend.F 144 THSICE_EXTEND 
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_get_exf.F 219 THSICE_GET_EXF 
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_get_exf.F 226 THSICE_GET_EXF 
     &         + sNx*sNy*MaxTsf*max1*max2*max3*act4
./pkg/thsice/thsice_get_exf.F 289 THSICE_GET_EXF 
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_get_exf.F 296 THSICE_GET_EXF 
     &         + sNx*sNy*MaxTsf*max1*max2*max3*act4
./pkg/thsice/thsice_get_exf.F 344 THSICE_GET_EXF 
     &                  + niter_bulk*sNx*sNy*MaxTsf*max1*max2*max3*act4
./pkg/thsice/thsice_main.F 282 THSICE_MAIN 
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_main.F 285 THSICE_MAIN 
     &                         + act4*max1*max2*max3
./pkg/thsice/thsice_main.F 95 THSICE_MAIN 
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_main.F 98 THSICE_MAIN 
     &                         + act4*max1*max2*max3
./pkg/thsice/thsice_solve4temp.F 201 THSICE_SOLVE4TEMP 
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_solve4temp.F 204 THSICE_SOLVE4TEMP 
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_solve4temp.F 247 THSICE_SOLVE4TEMP 
     &         + sNx*sNy*max1*max2*max3*act4
./pkg/thsice/thsice_step_fwd.F 121 THSICE_STEP_FWD 
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_step_fwd.F 124 THSICE_STEP_FWD 
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_step_temp.F 93 THSICE_STEP_TEMP 
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_step_temp.F 96 THSICE_STEP_TEMP 
     &                     + act4*max1*max2*max3
./verification/1D_ocean_ice_column/code_ad/tamc.h 125 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/OpenAD/code_ad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/OpenAD/code_ad_singlelayer/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/OpenAD/code_oad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/bottom_ctrl_5x5/code_ad/tamc.h 126 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/front_relax/code_ad/tamc.h 117 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/global_ocean.90x40x15/code_ad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/global_ocean.90x40x15/code_oad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/global_ocean.cs32x15/code_ad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/global_ocean_ebm/code_ad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/halfpipe_streamice/code_ad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/halfpipe_streamice/code_oad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/hs94.1x64x5/code_ad/tamc.h 112 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/isomip/code_ad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/isomip/code_oad/tamc.h 123 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/lab_sea/code_ad/tamc.h 127 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/obcs_ctrl/code_ad/tamc.h 118 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/offline_exf_seaice/code_ad/tamc.h 115 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/tutorial_dic_adjoffline/code_ad/tamc.h 126 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/tutorial_global_oce_biogeo/code_ad/tamc.h 126 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/tutorial_global_oce_biogeo/code_oad/tamc.h 126 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./model/src/salt_integrate.F 170 SALT_INTEGRATE 
          act4 = ikey_dynamics - 1
./model/src/salt_integrate.F 173 SALT_INTEGRATE 
     &                      + act4*max1*max2*max3
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 186 EXTERNAL_FORCING_SURF 
          act4 = ikey_dynamics - 1
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 189 EXTERNAL_FORCING_SURF 
     &                      + act4*max1*max2*max3
./verification/tutorial_global_oce_optim/code_ad/tamc.h 121 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 186 EXTERNAL_FORCING_SURF 
          act4 = ikey_dynamics - 1
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 189 EXTERNAL_FORCING_SURF 
     &                      + act4*max1*max2*max3
./verification/tutorial_global_oce_optim/code_oad/tamc.h 121 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/tutorial_tracer_adjsens/code_ad/tamc.h 129 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./verification/tutorial_tracer_adjsens/code_oad/tamc.h 129 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./model/src/temp_integrate.F 178 TEMP_INTEGRATE 
          act4 = ikey_dynamics - 1
./model/src/temp_integrate.F 181 TEMP_INTEGRATE 
     &                      + act4*max1*max2*max3
./model/src/thermodynamics.F 147 THERMODYNAMICS 
          act4 = ikey_dynamics - 1
./model/src/thermodynamics.F 150 THERMODYNAMICS 
     &                      + act4*max1*max2*max3
./pkg/autodiff/tamc.h 126 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./pkg/ctrl/ctrl_map_ini_gen.F 283 CTRL_MAP_INI_GEN2D 
          act4 = 0
./pkg/ctrl/ctrl_map_ini_gen.F 284 CTRL_MAP_INI_GEN2D 
          ikey = (act3 + 1) + act4*max3
./pkg/ctrl/ctrl_map_ini_gen.F 86 CTRL_MAP_INI_GEN3D 
          act4 = 0
./pkg/ctrl/ctrl_map_ini_gen.F 87 CTRL_MAP_INI_GEN3D 
          ikey = (act3 + 1) + act4*max3
./pkg/ebm/ebm_atmosphere.F 95 EBM_ATMOSPHERE 
          act4 = ikey_dynamics - 1
./pkg/ebm/ebm_atmosphere.F 98 EBM_ATMOSPHERE 
     &                      + act4*max1*max2*max3
./pkg/ecco/cost_drifter.F 141 COST_DRIFTER 
          act4 = 0
./pkg/ecco/cost_drifter.F 144 COST_DRIFTER 
     &                      + act4*max1*max2*max3