| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_bulkformulae.F |
262 |
EXF_BULKFORMULAE |
act1 = bi - myBxLo(myThid) |
|
./pkg/exf/exf_bulkformulae.F |
272 |
EXF_BULKFORMULAE |
& + sNx*sNy*act1 |
|
./pkg/exf/exf_bulkformulae.F |
364 |
EXF_BULKFORMULAE |
& + sNx*sNy*niter_bulk*act1 |
|
./pkg/exf/exf_bulkformulae.F |
479 |
EXF_BULKFORMULAE |
& + sNx*sNy*act1 |
|
./pkg/exf/exf_mapfields.F |
100 |
EXF_MAPFIELDS |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/exf/exf_mapfields.F |
93 |
EXF_MAPFIELDS |
act1 = bi - myBxLo(myThid) |
|
./pkg/exf/exf_wind.F |
63 |
EXF_WIND |
act1 = bi - myBxLo(myThid) |
|
./pkg/exf/exf_wind.F |
70 |
EXF_WIND |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/generic_advdiff/gad_advection.F |
172 |
GAD_ADVECTION |
act1 = bi - myBxLo(myThid) |
|
./pkg/generic_advdiff/gad_advection.F |
180 |
GAD_ADVECTION |
& + act1*max0 |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
73 |
GMREDI_CALC_PSI_B |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
80 |
GMREDI_CALC_PSI_B |
igmkey = (act1 + 1) + act2*max1 |
|
./pkg/gmredi/gmredi_calc_tensor.F |
123 |
GMREDI_CALC_TENSOR |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
130 |
GMREDI_CALC_TENSOR |
igmkey = (act1 + 1) + act2*max1 |
|
./pkg/gmredi/gmredi_rtransport.F |
63 |
GMREDI_RTRANSPORT |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_rtransport.F |
71 |
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 |
78 |
GMREDI_XTRANSPORT |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_xtransport.F |
86 |
GMREDI_XTRANSPORT |
& + act1*max0 |
|
./pkg/gmredi/gmredi_ytransport.F |
78 |
GMREDI_YTRANSPORT |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_ytransport.F |
86 |
GMREDI_YTRANSPORT |
& + act1*max0 |
|
./pkg/kpp/kpp_calc.F |
220 |
KPP_CALC |
act1 = bi - myBxLo(myThid) |
|
./pkg/kpp/kpp_calc.F |
227 |
KPP_CALC |
ikppkey = (act1 + 1) + act2*max1 |
|
./pkg/longstep/longstep_thermodynamics.F |
111 |
LONGSTEP_THERMODYNAMICS |
act1 = bi - myBxLo(myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
118 |
LONGSTEP_THERMODYNAMICS |
itdkey = (act1 + 1) + act2*max1 |
|
./pkg/mom_common/mom_calc_hfacz.F |
88 |
MOM_CALC_HFACZ |
act1 = bi - myBxLo(myThid) |
|
./pkg/mom_common/mom_calc_hfacz.F |
95 |
MOM_CALC_HFACZ |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/mom_common/mom_calc_visc.F |
147 |
MOM_CALC_VISC |
act1 = bi - myBxLo(myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
154 |
MOM_CALC_VISC |
ikey = (act1 + 1) + act2*max1 |
|
./model/src/calc_phi_hyd.F |
120 |
CALC_PHI_HYD |
act1 = bi - myBxLo(myThid) |
|
./model/src/calc_phi_hyd.F |
131 |
CALC_PHI_HYD |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/mom_fluxform/mom_fluxform.F |
183 |
MOM_FLUXFORM |
act1 = bi - myBxLo(myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
191 |
MOM_FLUXFORM |
& + act1*max0 |
|
./pkg/mom_vecinv/mom_vecinv.F |
150 |
MOM_VECINV |
act1 = bi - myBxLo(myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
158 |
MOM_VECINV |
& + act1*max0 |
|
./model/src/cg2d_nsa.F |
133 |
CG2D_NSA |
act1 = myThid - 1 |
|
./model/src/cg2d_nsa.F |
136 |
CG2D_NSA |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/obcs/obcs_calc_stevens.F |
146 |
OBCS_CALC_STEVENS |
act1 = bi - myBxLo(myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
153 |
OBCS_CALC_STEVENS |
ikey = (act1 + 1) + act2*max1 |
|
./model/src/convective_adjustment.F |
100 |
CONVECTIVE_ADJUSTMENT |
act1 = bi - myBxLo(myThid) |
|
./model/src/convective_adjustment.F |
107 |
CONVECTIVE_ADJUSTMENT |
ikey = (act1 + 1) + act2*max1 |
|
./model/src/convective_adjustment_ini.F |
100 |
CONVECTIVE_ADJUSTMENT_INI |
act1 = bi - myBxLo(myThid) |
|
./model/src/convective_adjustment_ini.F |
107 |
CONVECTIVE_ADJUSTMENT_INI |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/obcs/obcs_sponge.F |
446 |
OBCS_SPONGE_T |
act1 = bi - myBxLo(myThid) |
|
./pkg/obcs/obcs_sponge.F |
453 |
OBCS_SPONGE_T |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/obcs/obcs_sponge.F |
683 |
OBCS_SPONGE_S |
act1 = bi - myBxLo(myThid) |
|
./pkg/obcs/obcs_sponge.F |
690 |
OBCS_SPONGE_S |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/ptracers/ptracers_convect.F |
55 |
PTRACERS_CONVECT |
act1 = bi - myBxLo(myThid) |
|
./pkg/ptracers/ptracers_convect.F |
63 |
PTRACERS_CONVECT |
& + act1*max0 |
|
./pkg/ptracers/ptracers_integrate.F |
167 |
PTRACERS_INTEGRATE |
act1 = bi - myBxLo(myThid) |
|
./pkg/ptracers/ptracers_integrate.F |
175 |
PTRACERS_INTEGRATE |
& + act1*max0 |
|
./model/src/do_oceanic_phys.F |
520 |
DO_OCEANIC_PHYS |
act1 = bi - myBxLo(myThid) |
|
./model/src/do_oceanic_phys.F |
527 |
DO_OCEANIC_PHYS |
itdkey = (act1 + 1) + act2*max1 |
|
./model/src/dynamics.F |
282 |
DYNAMICS |
act1 = bi - myBxLo(myThid) |
|
./model/src/dynamics.F |
289 |
DYNAMICS |
idynkey = (act1 + 1) + act2*max1 |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
64 |
SALT_PLUME_CALC_DEPTH |
act1 = bi - myBxLo(myThid) |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
71 |
SALT_PLUME_CALC_DEPTH |
ikey = (act1 + 1) + act2*max1 |
|
./model/src/external_forcing_surf.F |
183 |
EXTERNAL_FORCING_SURF |
act1 = bi - myBxLo(myThid) |
|
./model/src/external_forcing_surf.F |
190 |
EXTERNAL_FORCING_SURF |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/seaice/seaice_advdiff.F |
166 |
SEAICE_ADVDIFF |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
173 |
SEAICE_ADVDIFF |
itmpkey = (act1 + 1) + act2*max1 |
|
./pkg/seaice/seaice_advection.F |
153 |
SEAICE_ADVECTION |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_advection.F |
161 |
SEAICE_ADVECTION |
& + act1*max0 |
|
./pkg/seaice/seaice_growth.F |
380 |
SEAICE_GROWTH |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_growth.F |
387 |
SEAICE_GROWTH |
iicekey = (act1 + 1) + act2*max1 |
|
./pkg/seaice/seaice_lsr.F |
678 |
SEAICE_LSR |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_lsr.F |
685 |
SEAICE_LSR |
itmpkey3 = (act1 + 1) + act2*max1 |
|
./pkg/seaice/seaice_reg_ridge.F |
87 |
SEAICE_REG_RIDGE |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_reg_ridge.F |
94 |
SEAICE_REG_RIDGE |
iicekey = (act1 + 1) + act2*max1 |
|
./pkg/shelfice/shelfice_thermodynamics.F |
221 |
SHELFICE_THERMODYNAMICS |
act1 = bi - myBxLo(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
228 |
SHELFICE_THERMODYNAMICS |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/streamice/streamice_adv_front.F |
124 |
STREAMICE_ADV_FRONT |
act1 = bi - myBxLo(myThid) |
|
./pkg/streamice/streamice_adv_front.F |
133 |
STREAMICE_ADV_FRONT |
& + (sNx+2)*(sNy+2)*act1 |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
106 |
STREAMICE_VISC_BETA_HYBRID |
act1 = bi - myBxLo(myThid) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
117 |
STREAMICE_VISC_BETA_HYBRID |
& + Nr*sNx*sNy*act1 |
|
./pkg/thsice/thsice_advdiff.F |
113 |
THSICE_ADVDIFF |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_advdiff.F |
120 |
THSICE_ADVDIFF |
ticekey = (act1 + 1) + act2*max1 |
|
./pkg/thsice/thsice_advection.F |
154 |
THSICE_ADVECTION |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_advection.F |
161 |
THSICE_ADVECTION |
ticekey = (act1 + 1) + act2*max1 |
|
./pkg/thsice/thsice_advection.F |
261 |
THSICE_ADVECTION |
& + nipass*act1 |
|
./pkg/thsice/thsice_calc_thickn.F |
226 |
THSICE_CALC_THICKN |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_calc_thickn.F |
233 |
THSICE_CALC_THICKN |
ticekey = (act1 + 1) + act2*max1 |
|
./pkg/thsice/thsice_calc_thickn.F |
891 |
THSICE_CALC_THICKN |
& + sNx*sNy*act1 |
|
./pkg/thsice/thsice_do_advect.F |
71 |
THSICE_DO_ADVECT |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_do_advect.F |
78 |
THSICE_DO_ADVECT |
ticekey = (act1 + 1) + act2*max1 |
|
./pkg/thsice/thsice_extend.F |
135 |
THSICE_EXTEND |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_extend.F |
142 |
THSICE_EXTEND |
ticekey = (act1 + 1) + act2*max1 |
|
./pkg/thsice/thsice_get_exf.F |
213 |
THSICE_GET_EXF |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_get_exf.F |
223 |
THSICE_GET_EXF |
& + sNx*sNy*MaxTsf*act1 |
|
./pkg/thsice/thsice_get_exf.F |
283 |
THSICE_GET_EXF |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_get_exf.F |
293 |
THSICE_GET_EXF |
& + sNx*sNy*MaxTsf*act1 |
|
./pkg/thsice/thsice_get_exf.F |
341 |
THSICE_GET_EXF |
& + niter_bulk*sNx*sNy*MaxTsf*act1 |
|
./pkg/thsice/thsice_main.F |
276 |
THSICE_MAIN |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_main.F |
283 |
THSICE_MAIN |
ticekey = (act1 + 1) + act2*max1 |
|
./pkg/thsice/thsice_main.F |
89 |
THSICE_MAIN |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_main.F |
96 |
THSICE_MAIN |
ticekey = (act1 + 1) + act2*max1 |
|
./pkg/thsice/thsice_solve4temp.F |
195 |
THSICE_SOLVE4TEMP |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_solve4temp.F |
202 |
THSICE_SOLVE4TEMP |
ticekey = (act1 + 1) + act2*max1 |
|
./pkg/thsice/thsice_solve4temp.F |
244 |
THSICE_SOLVE4TEMP |
& + sNx*sNy*act1 |
|
./pkg/thsice/thsice_step_fwd.F |
115 |
THSICE_STEP_FWD |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_step_fwd.F |
122 |
THSICE_STEP_FWD |
ticekey = (act1 + 1) + act2*max1 |
|
./pkg/thsice/thsice_step_temp.F |
87 |
THSICE_STEP_TEMP |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_step_temp.F |
94 |
THSICE_STEP_TEMP |
ticekey = (act1 + 1) + act2*max1 |
|
./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 |
164 |
SALT_INTEGRATE |
act1 = bi - myBxLo(myThid) |
|
./model/src/salt_integrate.F |
171 |
SALT_INTEGRATE |
itdkey = (act1 + 1) + act2*max1 |
|
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F |
58 |
COST_HFLUX |
act1 = bi - myBxLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F |
63 |
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/external_forcing_surf.F |
180 |
EXTERNAL_FORCING_SURF |
act1 = bi - myBxLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
187 |
EXTERNAL_FORCING_SURF |
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_global_oce_optim/code_oad/cost_hflux.F |
58 |
COST_HFLUX |
act1 = bi - myBxLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F |
63 |
COST_HFLUX |
ikey = (act1 + 1) + act2*max1 |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
65 |
COST_TEMP |
act1 = bi - myBxLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
70 |
COST_TEMP |
ikey = (act1 + 1) + act2*max1 |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
180 |
EXTERNAL_FORCING_SURF |
act1 = bi - myBxLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
187 |
EXTERNAL_FORCING_SURF |
ikey = (act1 + 1) + act2*max1 |
|
./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 |
172 |
TEMP_INTEGRATE |
act1 = bi - myBxLo(myThid) |
|
./model/src/temp_integrate.F |
179 |
TEMP_INTEGRATE |
itdkey = (act1 + 1) + act2*max1 |
|
./model/src/thermodynamics.F |
141 |
THERMODYNAMICS |
act1 = bi - myBxLo(myThid) |
|
./model/src/thermodynamics.F |
148 |
THERMODYNAMICS |
itdkey = (act1 + 1) + act2*max1 |
|
./pkg/autodiff/tamc.h |
126 |
NO PROCEDURE |
INTEGER act0, act1, act2, act3, act4 |
|
./pkg/ebm/ebm_atmosphere.F |
89 |
EBM_ATMOSPHERE |
act1 = bi - myBxLo(myThid) |
|
./pkg/ebm/ebm_atmosphere.F |
96 |
EBM_ATMOSPHERE |
iebmkey = (act1 + 1) + act2*max1 |
|
./pkg/ecco/cost_drifter.F |
135 |
COST_DRIFTER |
act1 = bi - myBxLo(myThid) |
|
./pkg/ecco/cost_drifter.F |
142 |
COST_DRIFTER |
ikey = (act1 + 1) + act2*max1 |
|
./pkg/ecco/cost_tau_eddy.F |
222 |
COST_TAU_EDDY |
act1 = bi - myBxLo(myThid) |
|
./pkg/ecco/cost_tau_eddy.F |
227 |
COST_TAU_EDDY |
ikey = (act1 + 1) + act2*max1 |