Symbol Description Uses
act4 144


File Line number Procedure Code
./pkg/exf/exf_bulkformulae.F 272 EXF_BULKFORMULAE 
          act4 = ikey_dynamics - 1
./pkg/exf/exf_bulkformulae.F 279 EXF_BULKFORMULAE 
     &         + sNx*sNy*max1*max2*max3*act4
./pkg/exf/exf_bulkformulae.F 369 EXF_BULKFORMULAE 
     &           + sNx*sNy*niter_bulk*max1*max2*max3*act4
./pkg/exf/exf_bulkformulae.F 484 EXF_BULKFORMULAE 
     &          + sNx*sNy*max1*max2*max3*act4
./pkg/exf/exf_mapfields.F 102 EXF_MAPFIELDS 
          act4 = ikey_dynamics - 1
./pkg/exf/exf_mapfields.F 105 EXF_MAPFIELDS 
     &                      + act4*max1*max2*max3
./pkg/exf/exf_wind.F 88 EXF_WIND 
          act4 = ikey_dynamics - 1
./pkg/exf/exf_wind.F 91 EXF_WIND 
     &                      + act4*max1*max2*max3
./pkg/generic_advdiff/gad_advection.F 182 GAD_ADVECTION 
          act4 = ikey_dynamics - 1
./pkg/generic_advdiff/gad_advection.F 187 GAD_ADVECTION 
     &                      + act4*max0*max1*max2*max3
./pkg/gmredi/gmredi_calc_psi_b.F 82 GMREDI_CALC_PSI_B 
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_calc_psi_b.F 85 GMREDI_CALC_PSI_B 
     &                        + act4*max1*max2*max3
./pkg/gmredi/gmredi_calc_tensor.F 132 GMREDI_CALC_TENSOR 
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_calc_tensor.F 135 GMREDI_CALC_TENSOR 
     &                      + act4*max1*max2*max3
./pkg/gmredi/gmredi_rtransport.F 83 GMREDI_RTRANSPORT 
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_rtransport.F 88 GMREDI_RTRANSPORT 
     &                      + act4*max0*max1*max2*max3
./pkg/gmredi/gmredi_slope_limit.F 138 GMREDI_SLOPE_LIMIT 
      act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_slope_limit.F 141 GMREDI_SLOPE_LIMIT 
     &                  + act4*max1*max2*max3
./pkg/gmredi/gmredi_slope_psi.F 83 GMREDI_SLOPE_PSI 
      act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_slope_psi.F 86 GMREDI_SLOPE_PSI 
     &                    + act4*max1*max2*max3
./pkg/gmredi/gmredi_xtransport.F 104 GMREDI_XTRANSPORT 
     &                      + act4*max0*max1*max2*max3
./pkg/gmredi/gmredi_xtransport.F 99 GMREDI_XTRANSPORT 
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_ytransport.F 103 GMREDI_YTRANSPORT 
     &                      + act4*max0*max1*max2*max3
./pkg/gmredi/gmredi_ytransport.F 98 GMREDI_YTRANSPORT 
          act4 = ikey_dynamics - 1
./pkg/kpp/kpp_calc.F 229 KPP_CALC 
          act4 = ikey_dynamics - 1
./pkg/kpp/kpp_calc.F 232 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
./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_common/mom_calc_hfacz.F 93 MOM_CALC_HFACZ 
          act4 = ikey_dynamics - 1
./pkg/mom_common/mom_calc_hfacz.F 96 MOM_CALC_HFACZ 
     &                      + act4*max1*max2*max3
./pkg/mom_common/mom_calc_visc.F 154 MOM_CALC_VISC 
          act4 = ikey_dynamics - 1
./pkg/mom_common/mom_calc_visc.F 157 MOM_CALC_VISC 
     &                      + 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
./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_calc_stevens.F 154 OBCS_CALC_STEVENS 
          act4 = ikey_dynamics - 1
./pkg/obcs/obcs_calc_stevens.F 157 OBCS_CALC_STEVENS 
     &                      + act4*max1*max2*max3
./pkg/obcs/obcs_sponge.F 459 OBCS_SPONGE_T 
       act4 = ikey_dynamics - 1
./pkg/obcs/obcs_sponge.F 462 OBCS_SPONGE_T 
     &      + act4*max1*max2*max3
./pkg/obcs/obcs_sponge.F 691 OBCS_SPONGE_S 
       act4 = ikey_dynamics - 1
./pkg/obcs/obcs_sponge.F 694 OBCS_SPONGE_S 
     &      + act4*max1*max2*max3
./model/src/do_oceanic_phys.F 628 DO_OCEANIC_PHYS 
          act4 = ikey_dynamics - 1
./model/src/do_oceanic_phys.F 631 DO_OCEANIC_PHYS 
     &                      + act4*max1*max2*max3
./pkg/ptracers/ptracers_convect.F 64 PTRACERS_CONVECT 
          act4 = ikey_dynamics - 1
./pkg/ptracers/ptracers_convect.F 69 PTRACERS_CONVECT 
     &                      + act4*max0*max1*max2*max3
./pkg/ptracers/ptracers_integrate.F 184 PTRACERS_INTEGRATE 
          act4 = ikey_dynamics - 1
./pkg/ptracers/ptracers_integrate.F 189 PTRACERS_INTEGRATE 
     &                      + act4*max0*max1*max2*max3
./model/src/dynamics.F 288 DYNAMICS 
          act4 = ikey_dynamics - 1
./model/src/dynamics.F 291 DYNAMICS 
     &                      + act4*max1*max2*max3
./model/src/external_forcing_surf.F 192 EXTERNAL_FORCING_SURF 
          act4 = ikey_dynamics - 1
./model/src/external_forcing_surf.F 195 EXTERNAL_FORCING_SURF 
     &                      + act4*max1*max2*max3
./pkg/salt_plume/salt_plume_calc_depth.F 73 SALT_PLUME_CALC_DEPTH 
        act4 = ikey_dynamics - 1
./pkg/salt_plume/salt_plume_calc_depth.F 76 SALT_PLUME_CALC_DEPTH 
     &                    + act4*max1*max2*max3
./pkg/seaice/seaice_advdiff.F 175 SEAICE_ADVDIFF 
        act4 = ikey_dynamics - 1
./pkg/seaice/seaice_advdiff.F 178 SEAICE_ADVDIFF 
     &                       + act4*max1*max2*max3
./pkg/seaice/seaice_advection.F 162 SEAICE_ADVECTION 
          act4 = ikey_dynamics - 1
./pkg/seaice/seaice_advection.F 167 SEAICE_ADVECTION 
     &                      + act4*max0*max1*max2*max3
./pkg/seaice/seaice_evp.F 343 SEAICE_EVP 
          act4 = ikeyloc - 1
./pkg/seaice/seaice_evp.F 346 SEAICE_EVP 
     &                         + act4*max1*max2*max3
./pkg/seaice/seaice_growth.F 404 SEAICE_GROWTH 
        act4 = ikey_dynamics - 1
./pkg/seaice/seaice_growth.F 407 SEAICE_GROWTH 
     &                       + act4*max1*max2*max3
./pkg/seaice/seaice_lsr.F 767 SEAICE_LSR 
          act4 = itmpkey2 - 1
./pkg/seaice/seaice_lsr.F 770 SEAICE_LSR 
     &                          + act4*max1*max2*max3
./pkg/seaice/seaice_mom_advection.F 104 SEAICE_MOM_ADVECTION 
     &         + act4*max0*max1*max2*max3
./pkg/seaice/seaice_mom_advection.F 99 SEAICE_MOM_ADVECTION 
      act4 = ikey_dynamics - 1
./pkg/seaice/seaice_reg_ridge.F 96 SEAICE_REG_RIDGE 
        act4 = ikey_dynamics - 1
./pkg/seaice/seaice_reg_ridge.F 99 SEAICE_REG_RIDGE 
     &                       + act4*max1*max2*max3
./pkg/shelfice/shelfice_thermodynamics.F 250 SHELFICE_THERMODYNAMICS 
        act4 = ikey_dynamics - 1
./pkg/shelfice/shelfice_thermodynamics.F 253 SHELFICE_THERMODYNAMICS 
     &                    + act4*max1*max2*max3
./pkg/streamice/streamice_adv_front.F 131 STREAMICE_ADV_FRONT 
          act4 = ikey_front - 1
./pkg/streamice/streamice_adv_front.F 137 STREAMICE_ADV_FRONT 
     &         + (sNx+2)*(sNy+2)*max1*max2*max3*act4
./pkg/streamice/streamice_visc_beta_hybrid.F 123 STREAMICE_VISC_BETA_HYBRID 
          act4 = ikey_dynamics - 1
./pkg/streamice/streamice_visc_beta_hybrid.F 131 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 286 THSICE_MAIN 
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_main.F 289 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/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.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/global_with_exf/code_ad/tamc.h 127 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/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/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
./model/src/salt_integrate.F 178 SALT_INTEGRATE 
          act4 = ikey_dynamics - 1
./model/src/salt_integrate.F 181 SALT_INTEGRATE 
     &                      + act4*max1*max2*max3
./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_optim/code_ad/external_forcing_surf.F 192 EXTERNAL_FORCING_SURF 
          act4 = ikey_dynamics - 1
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 195 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 192 EXTERNAL_FORCING_SURF 
          act4 = ikey_dynamics - 1
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 195 EXTERNAL_FORCING_SURF 
     &                      + act4*max1*max2*max3
./verification/tutorial_tracer_adjsens/code_ad/tamc.h 129 NO PROCEDURE 
      INTEGER act0, act1, act2, act3, act4
./model/src/temp_integrate.F 186 TEMP_INTEGRATE 
          act4 = ikey_dynamics - 1
./model/src/temp_integrate.F 189 TEMP_INTEGRATE 
     &                      + act4*max1*max2*max3
./model/src/thermodynamics.F 177 THERMODYNAMICS 
          act4 = ikey_dynamics - 1
./model/src/thermodynamics.F 180 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 299 CTRL_MAP_INI_GEN2D 
          act4 = 0
./pkg/ctrl/ctrl_map_ini_gen.F 300 CTRL_MAP_INI_GEN2D 
          ikey = (act3 + 1) + act4*max3
./pkg/ctrl/ctrl_map_ini_gen.F 85 CTRL_MAP_INI_GEN3D 
          act4 = 0
./pkg/ctrl/ctrl_map_ini_gen.F 86 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