Symbol Description Uses
act3 158



File Line number Procedure Code
./pkg/exf/exf_bulkformulae.F 266 EXF_BULKFORMULAE
          act3 = myThid - 1
./pkg/exf/exf_bulkformulae.F 274 EXF_BULKFORMULAE
     &         + sNx*sNy*max1*max2*act3
./pkg/exf/exf_bulkformulae.F 366 EXF_BULKFORMULAE
     &           + sNx*sNy*niter_bulk*max1*max2*act3
./pkg/exf/exf_bulkformulae.F 481 EXF_BULKFORMULAE
     &          + sNx*sNy*max1*max2*act3
./pkg/exf/exf_mapfields.F 101 EXF_MAPFIELDS
     &                      + act3*max1*max2
./pkg/exf/exf_mapfields.F 97 EXF_MAPFIELDS
          act3 = myThid - 1
./pkg/exf/exf_wind.F 67 EXF_WIND
          act3 = myThid - 1
./pkg/exf/exf_wind.F 71 EXF_WIND
     &                      + act3*max1*max2
./pkg/generic_advdiff/gad_advection.F 176 GAD_ADVECTION
          act3 = myThid - 1
./pkg/generic_advdiff/gad_advection.F 182 GAD_ADVECTION
     &                      + act3*max0*max1*max2
./pkg/gmredi/gmredi_calc_psi_b.F 77 GMREDI_CALC_PSI_B
          act3 = myThid - 1
./pkg/gmredi/gmredi_calc_psi_b.F 81 GMREDI_CALC_PSI_B
     &                        + act3*max1*max2
./pkg/gmredi/gmredi_calc_tensor.F 127 GMREDI_CALC_TENSOR
          act3 = myThid - 1
./pkg/gmredi/gmredi_calc_tensor.F 131 GMREDI_CALC_TENSOR
     &                      + act3*max1*max2
./pkg/gmredi/gmredi_rtransport.F 67 GMREDI_RTRANSPORT
          act3 = myThid - 1
./pkg/gmredi/gmredi_rtransport.F 73 GMREDI_RTRANSPORT
     &                      + act3*max0*max1*max2
./pkg/gmredi/gmredi_slope_limit.F 133 GMREDI_SLOPE_LIMIT
      act3 = myThid - 1
./pkg/gmredi/gmredi_slope_limit.F 137 GMREDI_SLOPE_LIMIT
     &                  + act3*max1*max2
./pkg/gmredi/gmredi_slope_psi.F 78 GMREDI_SLOPE_PSI
      act3 = myThid - 1
./pkg/gmredi/gmredi_slope_psi.F 82 GMREDI_SLOPE_PSI
     &                    + act3*max1*max2
./pkg/gmredi/gmredi_xtransport.F 82 GMREDI_XTRANSPORT
          act3 = myThid - 1
./pkg/gmredi/gmredi_xtransport.F 88 GMREDI_XTRANSPORT
     &                      + act3*max0*max1*max2
./pkg/gmredi/gmredi_ytransport.F 82 GMREDI_YTRANSPORT
          act3 = myThid - 1
./pkg/gmredi/gmredi_ytransport.F 88 GMREDI_YTRANSPORT
     &                      + act3*max0*max1*max2
./pkg/kpp/kpp_calc.F 224 KPP_CALC
          act3 = myThid - 1
./pkg/kpp/kpp_calc.F 228 KPP_CALC
     &                      + act3*max1*max2
./pkg/longstep/longstep_thermodynamics.F 115 LONGSTEP_THERMODYNAMICS
          act3 = myThid - 1
./pkg/longstep/longstep_thermodynamics.F 119 LONGSTEP_THERMODYNAMICS
     &                      + act3*max1*max2
./pkg/mom_common/mom_calc_hfacz.F 92 MOM_CALC_HFACZ
          act3 = myThid - 1
./pkg/mom_common/mom_calc_hfacz.F 96 MOM_CALC_HFACZ
     &                      + act3*max1*max2
./pkg/mom_common/mom_calc_visc.F 151 MOM_CALC_VISC
          act3 = myThid - 1
./pkg/mom_common/mom_calc_visc.F 155 MOM_CALC_VISC
     &                      + act3*max1*max2
./model/src/calc_phi_hyd.F 126 CALC_PHI_HYD
          act3 = myThid - 1
./model/src/calc_phi_hyd.F 132 CALC_PHI_HYD
     &                      + act3*max1*max2
./pkg/mom_fluxform/mom_fluxform.F 187 MOM_FLUXFORM
          act3 = myThid - 1
./pkg/mom_fluxform/mom_fluxform.F 193 MOM_FLUXFORM
     &                    + act3*max0*max1*max2
./pkg/mom_vecinv/mom_vecinv.F 154 MOM_VECINV
          act3 = myThid - 1
./pkg/mom_vecinv/mom_vecinv.F 160 MOM_VECINV
     &                    + act3*max0*max1*max2
./pkg/obcs/obcs_calc_stevens.F 150 OBCS_CALC_STEVENS
          act3 = myThid - 1
./pkg/obcs/obcs_calc_stevens.F 154 OBCS_CALC_STEVENS
     &                      + act3*max1*max2
./model/src/convective_adjustment.F 104 CONVECTIVE_ADJUSTMENT
          act3 = myThid - 1
./model/src/convective_adjustment.F 108 CONVECTIVE_ADJUSTMENT
     &                      + act3*max1*max2
./model/src/convective_adjustment_ini.F 104 CONVECTIVE_ADJUSTMENT_INI
          act3 = myThid - 1
./model/src/convective_adjustment_ini.F 108 CONVECTIVE_ADJUSTMENT_INI
     &                      + act3*max1*max2
./pkg/obcs/obcs_sponge.F 450 OBCS_SPONGE_T
          act3 = myThid - 1
./pkg/obcs/obcs_sponge.F 454 OBCS_SPONGE_T
     &                      + act3*max1*max2
./pkg/obcs/obcs_sponge.F 687 OBCS_SPONGE_S
          act3 = myThid - 1
./pkg/obcs/obcs_sponge.F 691 OBCS_SPONGE_S
     &                      + act3*max1*max2
./pkg/ptracers/ptracers_convect.F 59 PTRACERS_CONVECT
          act3 = myThid - 1
./pkg/ptracers/ptracers_convect.F 65 PTRACERS_CONVECT
     &                      + act3*max0*max1*max2
./pkg/ptracers/ptracers_integrate.F 171 PTRACERS_INTEGRATE
          act3 = myThid - 1
./pkg/ptracers/ptracers_integrate.F 177 PTRACERS_INTEGRATE
     &                      + act3*max0*max1*max2
./model/src/do_oceanic_phys.F 524 DO_OCEANIC_PHYS
          act3 = myThid - 1
./model/src/do_oceanic_phys.F 528 DO_OCEANIC_PHYS
     &                      + act3*max1*max2
./model/src/dynamics.F 286 DYNAMICS
          act3 = myThid - 1
./model/src/dynamics.F 290 DYNAMICS
     &                      + act3*max1*max2
./pkg/salt_plume/salt_plume_calc_depth.F 68 SALT_PLUME_CALC_DEPTH
        act3 = myThid - 1
./pkg/salt_plume/salt_plume_calc_depth.F 72 SALT_PLUME_CALC_DEPTH
     &                    + act3*max1*max2
./model/src/external_forcing_surf.F 187 EXTERNAL_FORCING_SURF
          act3 = myThid - 1
./model/src/external_forcing_surf.F 191 EXTERNAL_FORCING_SURF
     &                      + act3*max1*max2
./pkg/seaice/seaice_advdiff.F 170 SEAICE_ADVDIFF
        act3 = myThid - 1
./pkg/seaice/seaice_advdiff.F 174 SEAICE_ADVDIFF
     &                       + act3*max1*max2
./pkg/seaice/seaice_advection.F 157 SEAICE_ADVECTION
          act3 = myThid - 1
./pkg/seaice/seaice_advection.F 163 SEAICE_ADVECTION
     &                      + act3*max0*max1*max2
./pkg/seaice/seaice_growth.F 384 SEAICE_GROWTH
        act3 = myThid - 1
./pkg/seaice/seaice_growth.F 388 SEAICE_GROWTH
     &                       + act3*max1*max2
./pkg/seaice/seaice_lsr.F 682 SEAICE_LSR
          act3 = myThid - 1
./pkg/seaice/seaice_lsr.F 686 SEAICE_LSR
     &                          + act3*max1*max2
./pkg/seaice/seaice_reg_ridge.F 91 SEAICE_REG_RIDGE
        act3 = myThid - 1
./pkg/seaice/seaice_reg_ridge.F 95 SEAICE_REG_RIDGE
     &                       + act3*max1*max2
./pkg/shelfice/shelfice_thermodynamics.F 225 SHELFICE_THERMODYNAMICS
        act3 = myThid - 1
./pkg/shelfice/shelfice_thermodynamics.F 229 SHELFICE_THERMODYNAMICS
     &                    + act3*max1*max2
./pkg/streamice/streamice_adv_front.F 128 STREAMICE_ADV_FRONT
          act3 = myThid - 1
./pkg/streamice/streamice_adv_front.F 135 STREAMICE_ADV_FRONT
     &         + (sNx+2)*(sNy+2)*max1*max2*act3
./pkg/streamice/streamice_visc_beta_hybrid.F 110 STREAMICE_VISC_BETA_HYBRID
          act3 = myThid - 1
./pkg/streamice/streamice_visc_beta_hybrid.F 119 STREAMICE_VISC_BETA_HYBRID
     &         + Nr*sNx*sNy*max1*max2*act3
./pkg/thsice/thsice_advdiff.F 117 THSICE_ADVDIFF
          act3 = myThid - 1
./pkg/thsice/thsice_advdiff.F 121 THSICE_ADVDIFF
     &                         + act3*max1*max2
./pkg/thsice/thsice_advection.F 158 THSICE_ADVECTION
      act3 = myThid - 1
./pkg/thsice/thsice_advection.F 162 THSICE_ADVECTION
     &                     + act3*max1*max2
./pkg/thsice/thsice_advection.F 263 THSICE_ADVECTION
     &         + nipass*max1*max2*act3
./pkg/thsice/thsice_calc_thickn.F 230 THSICE_CALC_THICKN
      act3 = myThid - 1
./pkg/thsice/thsice_calc_thickn.F 234 THSICE_CALC_THICKN
     &                     + act3*max1*max2
./pkg/thsice/thsice_calc_thickn.F 893 THSICE_CALC_THICKN
     &       + sNx*sNy*max1*max2*act3
./pkg/thsice/thsice_do_advect.F 75 THSICE_DO_ADVECT
          act3 = myThid - 1
./pkg/thsice/thsice_do_advect.F 79 THSICE_DO_ADVECT
     &                         + act3*max1*max2
./pkg/thsice/thsice_extend.F 139 THSICE_EXTEND
      act3 = myThid - 1
./pkg/thsice/thsice_extend.F 143 THSICE_EXTEND
     &                     + act3*max1*max2
./pkg/thsice/thsice_get_exf.F 217 THSICE_GET_EXF
          act3 = myThid - 1
./pkg/thsice/thsice_get_exf.F 225 THSICE_GET_EXF
     &         + sNx*sNy*MaxTsf*max1*max2*act3
./pkg/thsice/thsice_get_exf.F 287 THSICE_GET_EXF
          act3 = myThid - 1
./pkg/thsice/thsice_get_exf.F 295 THSICE_GET_EXF
     &         + sNx*sNy*MaxTsf*max1*max2*act3
./pkg/thsice/thsice_get_exf.F 343 THSICE_GET_EXF
     &                  + niter_bulk*sNx*sNy*MaxTsf*max1*max2*act3
./pkg/thsice/thsice_main.F 280 THSICE_MAIN
          act3 = myThid - 1
./pkg/thsice/thsice_main.F 284 THSICE_MAIN
     &                         + act3*max1*max2
./pkg/thsice/thsice_main.F 93 THSICE_MAIN
          act3 = myThid - 1
./pkg/thsice/thsice_main.F 97 THSICE_MAIN
     &                         + act3*max1*max2
./pkg/thsice/thsice_solve4temp.F 199 THSICE_SOLVE4TEMP
      act3 = myThid - 1
./pkg/thsice/thsice_solve4temp.F 203 THSICE_SOLVE4TEMP
     &                     + act3*max1*max2
./pkg/thsice/thsice_solve4temp.F 246 THSICE_SOLVE4TEMP
     &         + sNx*sNy*max1*max2*act3
./pkg/thsice/thsice_step_fwd.F 119 THSICE_STEP_FWD
      act3 = myThid - 1
./pkg/thsice/thsice_step_fwd.F 123 THSICE_STEP_FWD
     &                     + act3*max1*max2
./pkg/thsice/thsice_step_temp.F 91 THSICE_STEP_TEMP
      act3 = myThid - 1
./pkg/thsice/thsice_step_temp.F 95 THSICE_STEP_TEMP
     &                     + act3*max1*max2
./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 168 SALT_INTEGRATE
          act3 = myThid - 1
./model/src/salt_integrate.F 172 SALT_INTEGRATE
     &                      + act3*max1*max2
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F 62 COST_HFLUX
         act3 = myThid - 1
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F 64 COST_HFLUX
     &                      + act3*max1*max2
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F 69 COST_TEMP
         act3 = myThid - 1
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F 71 COST_TEMP
     &                     + act3*max1*max2
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 184 EXTERNAL_FORCING_SURF
          act3 = myThid - 1
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F 188 EXTERNAL_FORCING_SURF
     &                      + act3*max1*max2
./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/cost_hflux.F 62 COST_HFLUX
         act3 = myThid - 1
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F 64 COST_HFLUX
     &                      + act3*max1*max2
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F 69 COST_TEMP
         act3 = myThid - 1
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F 71 COST_TEMP
     &                     + act3*max1*max2
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 184 EXTERNAL_FORCING_SURF
          act3 = myThid - 1
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F 188 EXTERNAL_FORCING_SURF
     &                      + act3*max1*max2
./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 176 TEMP_INTEGRATE
          act3 = myThid - 1
./model/src/temp_integrate.F 180 TEMP_INTEGRATE
     &                      + act3*max1*max2
./model/src/thermodynamics.F 145 THERMODYNAMICS
          act3 = myThid - 1
./model/src/thermodynamics.F 149 THERMODYNAMICS
     &                      + act3*max1*max2
./pkg/autodiff/tamc.h 126 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./pkg/ctrl/ctrl_map_ini_gen.F 281 CTRL_MAP_INI_GEN2D
          act3 = myThid - 1
./pkg/ctrl/ctrl_map_ini_gen.F 284 CTRL_MAP_INI_GEN2D
          ikey = (act3 + 1) + act4*max3
./pkg/ctrl/ctrl_map_ini_gen.F 84 CTRL_MAP_INI_GEN3D
          act3 = myThid - 1
./pkg/ctrl/ctrl_map_ini_gen.F 87 CTRL_MAP_INI_GEN3D
          ikey = (act3 + 1) + act4*max3
./pkg/ebm/ebm_atmosphere.F 93 EBM_ATMOSPHERE
          act3 = myThid - 1
./pkg/ebm/ebm_atmosphere.F 97 EBM_ATMOSPHERE
     &                      + act3*max1*max2
./pkg/ecco/cost_drifter.F 139 COST_DRIFTER
          act3 = myThid - 1
./pkg/ecco/cost_drifter.F 143 COST_DRIFTER
     &                      + act3*max1*max2
./pkg/ecco/cost_tau_eddy.F 226 COST_TAU_EDDY
        act3 = myThid - 1
./pkg/ecco/cost_tau_eddy.F 228 COST_TAU_EDDY
     &                    + act3*max1*max2