Symbol Description Uses
act1 132



File Line number Procedure Code
./pkg/generic_advdiff/gad_advection.F 164 GAD_ADVECTION
          act1 = bi - myBxLo(myThid)
./pkg/generic_advdiff/gad_advection.F 172 GAD_ADVECTION
     &                      + act1*max0
./pkg/gmredi/gmredi_calc_psi_b.F 59 GMREDI_CALC_PSI_B
          act1 = bi - myBxLo(myThid)
./pkg/gmredi/gmredi_calc_psi_b.F 66 GMREDI_CALC_PSI_B
          igmkey = (act1 + 1) + act2*max1
./pkg/gmredi/gmredi_calc_tensor.F 117 GMREDI_CALC_TENSOR
          act1 = bi - myBxLo(myThid)
./pkg/gmredi/gmredi_calc_tensor.F 124 GMREDI_CALC_TENSOR
          igmkey = (act1 + 1) + act2*max1
./pkg/gmredi/gmredi_rtransport.F 64 GMREDI_RTRANSPORT
          act1 = bi - myBxLo(myThid)
./pkg/gmredi/gmredi_rtransport.F 72 GMREDI_RTRANSPORT
     &                      + act1*max0
./pkg/gmredi/gmredi_slope_limit.F 129 GMREDI_SLOPE_LIMIT
      act1 = bi - myBxLo(myThid)
./pkg/gmredi/gmredi_slope_limit.F 136 GMREDI_SLOPE_LIMIT
      ikey = (act1 + 1) + act2*max1
./pkg/gmredi/gmredi_slope_psi.F 74 GMREDI_SLOPE_PSI
      act1 = bi - myBxLo(myThid)
./pkg/gmredi/gmredi_slope_psi.F 81 GMREDI_SLOPE_PSI
      igmkey = (act1 + 1) + act2*max1
./pkg/gmredi/gmredi_xtransport.F 71 GMREDI_XTRANSPORT
          act1 = bi - myBxLo(myThid)
./pkg/gmredi/gmredi_xtransport.F 79 GMREDI_XTRANSPORT
     &                      + act1*max0
./pkg/gmredi/gmredi_ytransport.F 71 GMREDI_YTRANSPORT
          act1 = bi - myBxLo(myThid)
./pkg/gmredi/gmredi_ytransport.F 79 GMREDI_YTRANSPORT
     &                      + act1*max0
./pkg/kpp/kpp_calc.F 210 KPP_CALC
          act1 = bi - myBxLo(myThid)
./pkg/kpp/kpp_calc.F 217 KPP_CALC
          ikppkey = (act1 + 1) + act2*max1
./pkg/longstep/longstep_thermodynamics.F 161 LONGSTEP_THERMODYNAMICS
          act1 = bi - myBxLo(myThid)
./pkg/longstep/longstep_thermodynamics.F 168 LONGSTEP_THERMODYNAMICS
          itdkey = (act1 + 1) + act2*max1
./pkg/mom_common/mom_calc_hfacz.F 81 MOM_CALC_HFACZ
          act1 = bi - myBxLo(myThid)
./pkg/mom_common/mom_calc_hfacz.F 88 MOM_CALC_HFACZ
          ikey = (act1 + 1) + act2*max1
./pkg/mom_common/mom_calc_visc.F 146 MOM_CALC_VISC
          act1 = bi - myBxLo(myThid)
./pkg/mom_common/mom_calc_visc.F 153 MOM_CALC_VISC
          ikey = (act1 + 1) + act2*max1
./pkg/mom_fluxform/mom_fluxform.F 170 MOM_FLUXFORM
          act1 = bi - myBxLo(myThid)
./pkg/mom_fluxform/mom_fluxform.F 178 MOM_FLUXFORM
     &                    + act1*max0
./model/src/calc_gs.F 114 CALC_GS
          act1 = bi - myBxLo(myThid)
./model/src/calc_gs.F 121 CALC_GS
          itdkey = (act1 + 1) + act2*max1
./model/src/calc_gt.F 113 CALC_GT
          act1 = bi - myBxLo(myThid)
./model/src/calc_gt.F 120 CALC_GT
          itdkey = (act1 + 1) + act2*max1
./pkg/mom_vecinv/mom_vecinv.F 126 MOM_VECINV
          act1 = bi - myBxLo(myThid)
./pkg/mom_vecinv/mom_vecinv.F 134 MOM_VECINV
     &                    + act1*max0
./model/src/calc_phi_hyd.F 106 CALC_PHI_HYD
          act1 = bi - myBxLo(myThid)
./model/src/calc_phi_hyd.F 117 CALC_PHI_HYD
          ikey = (act1 + 1) + act2*max1
./pkg/obcs/obcs_sponge.F 429 OBCS_SPONGE_T
          act1 = bi - myBxLo(myThid)
./pkg/obcs/obcs_sponge.F 436 OBCS_SPONGE_T
          ikey = (act1 + 1) + act2*max1
./pkg/obcs/obcs_sponge.F 660 OBCS_SPONGE_S
          act1 = bi - myBxLo(myThid)
./pkg/obcs/obcs_sponge.F 667 OBCS_SPONGE_S
          ikey = (act1 + 1) + act2*max1
./model/src/cg2d_nsa.F 132 CG2D_NSA
          act1 = myThid - 1
./model/src/cg2d_nsa.F 135 CG2D_NSA
          ikey = (act1 + 1) + act2*max1
./model/src/convective_adjustment.F 102 CONVECTIVE_ADJUSTMENT
          ikey = (act1 + 1) + act2*max1
./model/src/convective_adjustment.F 95 CONVECTIVE_ADJUSTMENT
          act1 = bi - myBxLo(myThid)
./model/src/convective_adjustment_ini.F 102 CONVECTIVE_ADJUSTMENT_INI
          ikey = (act1 + 1) + act2*max1
./model/src/convective_adjustment_ini.F 95 CONVECTIVE_ADJUSTMENT_INI
          act1 = bi - myBxLo(myThid)
./pkg/ptracers/ptracers_advection.F 67 PTRACERS_ADVECTION
          act1 = bi - myBxLo(myThid)
./pkg/ptracers/ptracers_advection.F 75 PTRACERS_ADVECTION
     &                      + act1*max0
./pkg/ptracers/ptracers_implicit.F 76 PTRACERS_IMPLICIT
          act1 = bi - myBxLo(myThid)
./pkg/ptracers/ptracers_implicit.F 84 PTRACERS_IMPLICIT
     &                      + act1*max0
./pkg/ptracers/ptracers_integrate.F 109 PTRACERS_INTEGRATE
          act1 = bi - myBxLo(myThid)
./pkg/ptracers/ptracers_integrate.F 117 PTRACERS_INTEGRATE
     &                      + act1*max0
./model/src/do_oceanic_phys.F 345 DO_OCEANIC_PHYS
          act1 = bi - myBxLo(myThid)
./model/src/do_oceanic_phys.F 352 DO_OCEANIC_PHYS
          itdkey = (act1 + 1) + act2*max1
./pkg/seaice/seaice_advection.F 146 SEAICE_ADVECTION
          act1 = bi - myBxLo(myThid)
./pkg/seaice/seaice_advection.F 154 SEAICE_ADVECTION
     &                      + act1*max0
./pkg/seaice/seaice_growth.F 239 SEAICE_GROWTH
        act1 = bi - myBxLo(myThid)
./pkg/seaice/seaice_growth.F 246 SEAICE_GROWTH
        iicekey = (act1 + 1) + act2*max1
./pkg/seaice/seaice_growth_if.F 218 SEAICE_GROWTH_IF
            act1 = bi - myBxLo(myThid)
./pkg/seaice/seaice_growth_if.F 225 SEAICE_GROWTH_IF
            iicekey = (act1 + 1) + act2*max1
./model/src/dynamics.F 285 DYNAMICS
          act1 = bi - myBxLo(myThid)
./model/src/dynamics.F 292 DYNAMICS
          idynkey = (act1 + 1) + act2*max1
./pkg/thsice/thsice_advdiff.F 112 THSICE_ADVDIFF
          act1 = bi - myBxLo(myThid)
./pkg/thsice/thsice_advdiff.F 119 THSICE_ADVDIFF
          ticekey = (act1 + 1) + act2*max1
./pkg/thsice/thsice_advection.F 148 THSICE_ADVECTION
      act1 = bi - myBxLo(myThid)
./pkg/thsice/thsice_advection.F 155 THSICE_ADVECTION
      ticekey = (act1 + 1) + act2*max1
./pkg/thsice/thsice_advection.F 238 THSICE_ADVECTION
     &         + nipass*act1
./pkg/thsice/thsice_calc_thickn.F 225 THSICE_CALC_THICKN
      act1 = bi - myBxLo(myThid)
./pkg/thsice/thsice_calc_thickn.F 232 THSICE_CALC_THICKN
      ticekey = (act1 + 1) + act2*max1
./pkg/thsice/thsice_calc_thickn.F 885 THSICE_CALC_THICKN
     &       + sNx*sNy*act1
./pkg/thsice/thsice_extend.F 124 THSICE_EXTEND
      act1 = bi - myBxLo(myThid)
./pkg/thsice/thsice_extend.F 131 THSICE_EXTEND
      ticekey = (act1 + 1) + act2*max1
./pkg/thsice/thsice_main.F 103 THSICE_MAIN
          ticekey = (act1 + 1) + act2*max1
./pkg/thsice/thsice_main.F 96 THSICE_MAIN
          act1 = bi - myBxLo(myThid)
./pkg/thsice/thsice_solve4temp.F 183 THSICE_SOLVE4TEMP
      act1 = bi - myBxLo(myThid)
./pkg/thsice/thsice_solve4temp.F 190 THSICE_SOLVE4TEMP
      ticekey = (act1 + 1) + act2*max1
./pkg/thsice/thsice_step_fwd.F 112 THSICE_STEP_FWD
      act1 = bi - myBxLo(myThid)
./pkg/thsice/thsice_step_fwd.F 119 THSICE_STEP_FWD
      ticekey = (act1 + 1) + act2*max1
./pkg/thsice/thsice_step_temp.F 89 THSICE_STEP_TEMP
          act1 = bi - myBxLo(myThid)
./pkg/thsice/thsice_step_temp.F 96 THSICE_STEP_TEMP
          ticekey = (act1 + 1) + act2*max1
./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 157 MOMENTUM_CORRECTION_STEP
          act1 = bi - myBxLo(myThid)
./model/src/momentum_correction_step.F 164 MOMENTUM_CORRECTION_STEP
          idynkey = (act1 + 1) + act2*max1
./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/cost_hflux.F 59 COST_HFLUX
         act1 = bi - myBxLo(myThid)
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F 64 COST_HFLUX
         ikey = (act1 + 1) + act2*max1
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F 65 COST_TEMP
         act1 = bi - myBxLo(myThid)
./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/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 244 THERMODYNAMICS
          act1 = bi - myBxLo(myThid)
./model/src/thermodynamics.F 251 THERMODYNAMICS
          itdkey = (act1 + 1) + act2*max1
./model/src/update_r_star.F 53 UPDATE_R_STAR
          act1 = bi - myBxLo(myThid)
./model/src/update_r_star.F 60 UPDATE_R_STAR
          idynkey = (act1 + 1) + act2*max1
./model/src/update_surf_dr.F 54 UPDATE_SURF_DR
          act1 = bi - myBxLo(myThid)
./model/src/update_surf_dr.F 61 UPDATE_SURF_DR
          idynkey = (act1 + 1) + act2*max1
./pkg/autodiff/tamc.h 124 NO PROCEDURE
      INTEGER act0, act1, act2, act3, act4
./pkg/ebm/ebm_atmosphere.F 66 EBM_ATMOSPHERE
          act1 = bi - myBxLo(myThid)
./pkg/ebm/ebm_atmosphere.F 73 EBM_ATMOSPHERE
          iebmkey = (act1 + 1) + act2*max1
./pkg/ecco/cost_drifter.F 134 COST_DRIFTER
          act1 = bi - myBxLo(myThid)
./pkg/ecco/cost_drifter.F 141 COST_DRIFTER
          ikey = (act1 + 1) + act2*max1
./pkg/ecco/cost_tau_eddy.F 221 COST_TAU_EDDY
        act1 = bi - myBxLo(myThid)
./pkg/ecco/cost_tau_eddy.F 226 COST_TAU_EDDY
        ikey = (act1 + 1) + act2*max1
./pkg/exf/exf_bulkformulae.F 256 EXF_BULKFORMULAE
          act1 = bi - myBxLo(myThid)
./pkg/exf/exf_bulkformulae.F 266 EXF_BULKFORMULAE
     &         + sNx*sNy*act1
./pkg/exf/exf_bulkformulae.F 350 EXF_BULKFORMULAE
     &           + sNx*sNy*niter_bulk*act1
./pkg/exf/exf_bulkformulae.F 468 EXF_BULKFORMULAE
     &          + sNx*sNy*act1
./pkg/exf/exf_mapfields.F 85 EXF_MAPFIELDS
          act1 = bi - myBxLo(myThid)
./pkg/exf/exf_mapfields.F 92 EXF_MAPFIELDS
          ikey = (act1 + 1) + act2*max1
./pkg/exf/exf_wind.F 66 EXF_WIND
          act1 = bi - myBxLo(myThid)
./pkg/exf/exf_wind.F 73 EXF_WIND
          ikey = (act1 + 1) + act2*max1