Symbol Description Uses
act4 130



File Line number Procedure Code
./pkg/generic_advdiff/gad_advection.F 170 GAD_ADVECTION
          act4 = ikey_dynamics - 1
./pkg/generic_advdiff/gad_advection.F 175 GAD_ADVECTION
     &                      + act4*max0*max1*max2*max3
./pkg/gmredi/gmredi_calc_psi_b.F 65 GMREDI_CALC_PSI_B
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_calc_psi_b.F 68 GMREDI_CALC_PSI_B
     &                        + act4*max1*max2*max3
./pkg/gmredi/gmredi_calc_tensor.F 123 GMREDI_CALC_TENSOR
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_calc_tensor.F 126 GMREDI_CALC_TENSOR
     &                      + act4*max1*max2*max3
./pkg/gmredi/gmredi_rtransport.F 70 GMREDI_RTRANSPORT
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_rtransport.F 75 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 77 GMREDI_XTRANSPORT
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_xtransport.F 82 GMREDI_XTRANSPORT
     &                      + act4*max0*max1*max2*max3
./pkg/gmredi/gmredi_ytransport.F 77 GMREDI_YTRANSPORT
          act4 = ikey_dynamics - 1
./pkg/gmredi/gmredi_ytransport.F 82 GMREDI_YTRANSPORT
     &                      + act4*max0*max1*max2*max3
./pkg/kpp/kpp_calc.F 216 KPP_CALC
          act4 = ikey_dynamics - 1
./pkg/kpp/kpp_calc.F 219 KPP_CALC
     &                      + act4*max1*max2*max3
./pkg/longstep/longstep_thermodynamics.F 167 LONGSTEP_THERMODYNAMICS
          act4 = ikey_dynamics - 1
./pkg/longstep/longstep_thermodynamics.F 170 LONGSTEP_THERMODYNAMICS
     &                      + act4*max1*max2*max3
./pkg/mom_common/mom_calc_hfacz.F 87 MOM_CALC_HFACZ
          act4 = ikey_dynamics - 1
./pkg/mom_common/mom_calc_hfacz.F 90 MOM_CALC_HFACZ
     &                      + act4*max1*max2*max3
./pkg/mom_common/mom_calc_visc.F 152 MOM_CALC_VISC
          act4 = ikey_dynamics - 1
./pkg/mom_common/mom_calc_visc.F 155 MOM_CALC_VISC
     &                      + act4*max1*max2*max3
./pkg/mom_fluxform/mom_fluxform.F 176 MOM_FLUXFORM
          act4 = ikey_dynamics - 1
./pkg/mom_fluxform/mom_fluxform.F 181 MOM_FLUXFORM
     &                    + act4*max0*max1*max2*max3
./model/src/calc_gs.F 120 CALC_GS
          act4 = ikey_dynamics - 1
./model/src/calc_gs.F 123 CALC_GS
     &                      + act4*max1*max2*max3
./model/src/calc_gt.F 119 CALC_GT
          act4 = ikey_dynamics - 1
./model/src/calc_gt.F 122 CALC_GT
     &                      + act4*max1*max2*max3
./pkg/mom_vecinv/mom_vecinv.F 132 MOM_VECINV
          act4 = ikey_dynamics - 1
./pkg/mom_vecinv/mom_vecinv.F 137 MOM_VECINV
     &                    + act4*max0*max1*max2*max3
./model/src/calc_phi_hyd.F 115 CALC_PHI_HYD
          act4 = ikey_dynamics - 1
./model/src/calc_phi_hyd.F 119 CALC_PHI_HYD
     &                      + act4*max1*max2*max3
./pkg/obcs/obcs_sponge.F 435 OBCS_SPONGE_T
          act4 = ikey_dynamics - 1
./pkg/obcs/obcs_sponge.F 438 OBCS_SPONGE_T
     &                      + act4*max1*max2*max3
./pkg/obcs/obcs_sponge.F 666 OBCS_SPONGE_S
          act4 = ikey_dynamics - 1
./pkg/obcs/obcs_sponge.F 669 OBCS_SPONGE_S
     &                      + act4*max1*max2*max3
./model/src/convective_adjustment.F 101 CONVECTIVE_ADJUSTMENT
          act4 = ikey_dynamics - 1
./model/src/convective_adjustment.F 104 CONVECTIVE_ADJUSTMENT
     &                      + act4*max1*max2*max3
./model/src/convective_adjustment_ini.F 101 CONVECTIVE_ADJUSTMENT_INI
          act4 = 0
./model/src/convective_adjustment_ini.F 104 CONVECTIVE_ADJUSTMENT_INI
     &                      + act4*max1*max2*max3
./pkg/ptracers/ptracers_advection.F 73 PTRACERS_ADVECTION
          act4 = ikey_dynamics - 1
./pkg/ptracers/ptracers_advection.F 78 PTRACERS_ADVECTION
     &                      + act4*max0*max1*max2*max3
./pkg/ptracers/ptracers_implicit.F 82 PTRACERS_IMPLICIT
          act4 = ikey_dynamics - 1
./pkg/ptracers/ptracers_implicit.F 87 PTRACERS_IMPLICIT
     &                      + act4*max0*max1*max2*max3
./pkg/ptracers/ptracers_integrate.F 115 PTRACERS_INTEGRATE
          act4 = ikey_dynamics - 1
./pkg/ptracers/ptracers_integrate.F 120 PTRACERS_INTEGRATE
     &                      + act4*max0*max1*max2*max3
./model/src/do_oceanic_phys.F 351 DO_OCEANIC_PHYS
          act4 = ikey_dynamics - 1
./model/src/do_oceanic_phys.F 354 DO_OCEANIC_PHYS
     &                      + act4*max1*max2*max3
./pkg/seaice/seaice_advection.F 152 SEAICE_ADVECTION
          act4 = ikey_dynamics - 1
./pkg/seaice/seaice_advection.F 157 SEAICE_ADVECTION
     &                      + act4*max0*max1*max2*max3
./pkg/seaice/seaice_growth.F 245 SEAICE_GROWTH
        act4 = ikey_dynamics - 1
./pkg/seaice/seaice_growth.F 248 SEAICE_GROWTH
     &                       + act4*max1*max2*max3
./pkg/seaice/seaice_growth_if.F 224 SEAICE_GROWTH_IF
            act4 = ikey_dynamics - 1
./pkg/seaice/seaice_growth_if.F 227 SEAICE_GROWTH_IF
     &           + act4*max1*max2*max3
./model/src/dynamics.F 291 DYNAMICS
          act4 = ikey_dynamics - 1
./model/src/dynamics.F 294 DYNAMICS
     &                      + act4*max1*max2*max3
./pkg/thsice/thsice_advdiff.F 118 THSICE_ADVDIFF
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_advdiff.F 121 THSICE_ADVDIFF
     &                         + act4*max1*max2*max3
./pkg/thsice/thsice_advection.F 154 THSICE_ADVECTION
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_advection.F 157 THSICE_ADVECTION
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_advection.F 241 THSICE_ADVECTION
     &         + nipass*max1*max2*max3*act4
./pkg/thsice/thsice_calc_thickn.F 231 THSICE_CALC_THICKN
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_calc_thickn.F 234 THSICE_CALC_THICKN
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_calc_thickn.F 888 THSICE_CALC_THICKN
     &       + sNx*sNy*max1*max2*max3*act4
./pkg/thsice/thsice_extend.F 130 THSICE_EXTEND
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_extend.F 133 THSICE_EXTEND
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_main.F 102 THSICE_MAIN
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_main.F 105 THSICE_MAIN
     &                         + act4*max1*max2*max3
./pkg/thsice/thsice_solve4temp.F 189 THSICE_SOLVE4TEMP
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_solve4temp.F 192 THSICE_SOLVE4TEMP
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_step_fwd.F 118 THSICE_STEP_FWD
      act4 = ikey_dynamics - 1
./pkg/thsice/thsice_step_fwd.F 121 THSICE_STEP_FWD
     &                     + act4*max1*max2*max3
./pkg/thsice/thsice_step_temp.F 95 THSICE_STEP_TEMP
          act4 = ikey_dynamics - 1
./pkg/thsice/thsice_step_temp.F 98 THSICE_STEP_TEMP
     &                         + act4*max1*max2*max3
./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/global1x1_tot/code/tamc.h 119 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/global1x1_tot/code_seaice_adj/tamc.h 117 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/global1x1_tot/code_taueddy/tamc.h 111 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/global2x2_tot/code/tamc.h 115 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_ad_nlfs/tamc.h 123 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/global_ocean.90x40x15/code_ad_vecinv/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/hs94.1x64x5/code_ad/tamc.h 114 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/lab_sea/code_ad/tamc.h 125 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/lab_sea/code_ad_seaice_ocean/tamc.h 125 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/lab_sea/code_ad_seaice_only/tamc.h 125 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/natl_box_adjoint/code/tamc.h 126 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/natl_box_adjoint/code_bulk/tamc.h 127 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/natl_box_adjoint/code_pack/tamc.h 127 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/natl_box_adjoint/code_seaice/tamc.h 127 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./verification/offline_exf_seaice/code_ad/tamc.h 125 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./model/src/momentum_correction_step.F 163 MOMENTUM_CORRECTION_STEP
          act4 = ikey_dynamics - 1
./model/src/momentum_correction_step.F 166 MOMENTUM_CORRECTION_STEP
     &                      + 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/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
./model/src/thermodynamics.F 250 THERMODYNAMICS
          act4 = ikey_dynamics - 1
./model/src/thermodynamics.F 253 THERMODYNAMICS
     &                      + act4*max1*max2*max3
./model/src/update_r_star.F 59 UPDATE_R_STAR
          act4 = ikey_dynamics - 1
./model/src/update_r_star.F 62 UPDATE_R_STAR
     &                      + act4*max1*max2*max3
./model/src/update_surf_dr.F 60 UPDATE_SURF_DR
          act4 = ikey_dynamics - 1
./model/src/update_surf_dr.F 63 UPDATE_SURF_DR
     &                      + act4*max1*max2*max3
./pkg/autodiff/tamc.h 124 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./pkg/ctrl/ctrl_map_ini_ecco.F 92 CTRL_MAP_INI_ECCO
          act4 = 0
./pkg/ctrl/ctrl_map_ini_ecco.F 93 CTRL_MAP_INI_ECCO
          ikey = (act3 + 1) + act4*max3
./pkg/ctrl/ctrl_map_ini_gen.F 255 CTRL_MAP_INI_GEN2D
          act4 = 0
./pkg/ctrl/ctrl_map_ini_gen.F 256 CTRL_MAP_INI_GEN2D
          ikey = (act3 + 1) + act4*max3
./pkg/ctrl/ctrl_map_ini_gen.F 83 CTRL_MAP_INI_GEN3D
          act4 = 0
./pkg/ctrl/ctrl_map_ini_gen.F 84 CTRL_MAP_INI_GEN3D
          ikey = (act3 + 1) + act4*max3
./pkg/ebm/ebm_atmosphere.F 72 EBM_ATMOSPHERE
          act4 = ikey_dynamics - 1
./pkg/ebm/ebm_atmosphere.F 75 EBM_ATMOSPHERE
     &                      + act4*max1*max2*max3
./pkg/ecco/cost_drifter.F 140 COST_DRIFTER
          act4 = 0
./pkg/ecco/cost_drifter.F 143 COST_DRIFTER
     &                      + act4*max1*max2*max3
./pkg/exf/exf_bulkformulae.F 262 EXF_BULKFORMULAE
          act4 = ikey_dynamics - 1
./pkg/exf/exf_bulkformulae.F 269 EXF_BULKFORMULAE
     &         + sNx*sNy*max1*max2*max3*act4
./pkg/exf/exf_bulkformulae.F 353 EXF_BULKFORMULAE
     &           + sNx*sNy*niter_bulk*max1*max2*max3*act4
./pkg/exf/exf_bulkformulae.F 471 EXF_BULKFORMULAE
     &          + sNx*sNy*max1*max2*max3*act4
./pkg/exf/exf_mapfields.F 91 EXF_MAPFIELDS
          act4 = ikey_dynamics - 1
./pkg/exf/exf_mapfields.F 94 EXF_MAPFIELDS
     &                      + act4*max1*max2*max3
./pkg/exf/exf_wind.F 72 EXF_WIND
          act4 = ikey_dynamics - 1
./pkg/exf/exf_wind.F 75 EXF_WIND
     &                      + act4*max1*max2*max3