| File |
Line number |
Procedure |
Code |
|
./model/inc/GRID.h |
315 |
NO PROCEDURE |
& deepFacC, deepFac2C, recip_deepFacC, recip_deepFac2C, |
|
./model/inc/GRID.h |
326 |
NO PROCEDURE |
_RL recip_deepFacC (Nr) |
|
./pkg/generic_advdiff/gad_biharm_x.F |
56 |
GAD_BIHARM_X |
& *_recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/generic_advdiff/gad_biharm_y.F |
58 |
GAD_BIHARM_Y |
& *_recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/generic_advdiff/gad_diff_x.F |
55 |
GAD_DIFF_X |
& *_recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/generic_advdiff/gad_diff_y.F |
57 |
GAD_DIFF_Y |
& *_recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
71 |
GAD_DST2U1_ADV_X |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_y.F |
70 |
GAD_DST2U1_ADV_Y |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
87 |
GAD_DST3_ADV_X |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
86 |
GAD_DST3_ADV_Y |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
63 |
GAD_DST3FL_ADV_X |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
59 |
GAD_DST3FL_ADV_Y |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
78 |
GAD_FLUXLIMIT_ADV_X |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
78 |
GAD_FLUXLIMIT_ADV_Y |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) ) |
|
./pkg/generic_advdiff/gad_grad_x.F |
63 |
GAD_GRAD_X |
& *_recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/generic_advdiff/gad_grad_y.F |
65 |
GAD_GRAD_Y |
& *_recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/generic_advdiff/gad_ppm_flx_x.F |
107 |
GAD_PPM_FLX_X |
& * recip_deepFacC(kk) |
|
./pkg/generic_advdiff/gad_ppm_flx_x.F |
80 |
GAD_PPM_FLX_X |
& * recip_deepFacC(kk) |
|
./pkg/generic_advdiff/gad_ppm_flx_y.F |
107 |
GAD_PPM_FLX_Y |
& * recip_deepFacC(kk) |
|
./pkg/generic_advdiff/gad_ppm_flx_y.F |
80 |
GAD_PPM_FLX_Y |
& * recip_deepFacC(kk) |
|
./pkg/generic_advdiff/gad_pqm_flx_x.F |
113 |
GAD_PQM_FLX_X |
& * recip_deepFacC(kk) |
|
./pkg/generic_advdiff/gad_pqm_flx_x.F |
80 |
GAD_PQM_FLX_X |
& * recip_deepFacC(kk) |
|
./pkg/generic_advdiff/gad_pqm_flx_y.F |
113 |
GAD_PQM_FLX_Y |
& * recip_deepFacC(kk) |
|
./pkg/generic_advdiff/gad_pqm_flx_y.F |
80 |
GAD_PQM_FLX_Y |
& * recip_deepFacC(kk) |
|
./model/src/apply_forcing.F |
134 |
APPLY_FORCING_U |
& - recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/apply_forcing.F |
324 |
APPLY_FORCING_V |
& - recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
151 |
CALC_GRAD_PHI_HYD |
dPhiHydX(i,j) = _recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
157 |
CALC_GRAD_PHI_HYD |
dPhiHydY(i,j) = _recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
179 |
CALC_GRAD_PHI_HYD |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
187 |
CALC_GRAD_PHI_HYD |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
198 |
CALC_GRAD_PHI_HYD |
& *rC(k)*recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
206 |
CALC_GRAD_PHI_HYD |
& *rC(k)*recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
229 |
CALC_GRAD_PHI_HYD |
& *rC(k)*recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
232 |
CALC_GRAD_PHI_HYD |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
242 |
CALC_GRAD_PHI_HYD |
& *rC(k)*recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./model/src/calc_grad_phi_hyd.F |
245 |
CALC_GRAD_PHI_HYD |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_hdiv.F |
43 |
MOM_CALC_HDIV |
& )*recip_rA(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_hdiv.F |
60 |
MOM_CALC_HDIV |
& )*recip_rA(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
122 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
137 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
164 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
171 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
178 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
194 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
221 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
228 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
235 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
251 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
278 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
285 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
301 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_relvort3.F |
63 |
MOM_CALC_RELVORT3 |
& )*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_strain.F |
62 |
MOM_CALC_STRAIN |
& )*recip_rAz(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_tension.F |
59 |
MOM_CALC_TENSION |
& )*recip_rA(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_visc.F |
269 |
MOM_CALC_VISC |
& *recip_dxC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_visc.F |
282 |
MOM_CALC_VISC |
& *recip_dyC(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_visc.F |
291 |
MOM_CALC_VISC |
& *recip_dxG(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_calc_visc.F |
302 |
MOM_CALC_VISC |
& *recip_dyG(i,j,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_common/mom_quasihydrostatic.F |
106 |
MOM_QUASIHYDROSTATIC |
& )* 0.5 _d 0 * recip_rSphere*recip_deepFacC(k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
259 |
MOM_U_IMPLICIT_R |
& *recip_deepFacC(k)*recip_rhoFacC(k) |
|
./pkg/mom_common/mom_u_metric_nh.F |
56 |
MOM_U_METRIC_NH |
uMetricTerms(i,j) = uFld(i,j)*recip_rSphere*recip_deepFacC(k) |
|
./pkg/mom_common/mom_v_implicit_r.F |
259 |
MOM_V_IMPLICIT_R |
& *recip_deepFacC(k)*recip_rhoFacC(k) |
|
./pkg/mom_common/mom_v_metric_nh.F |
56 |
MOM_V_METRIC_NH |
vMetricTerms(i,j) = vFld(i,j)*recip_rSphere*recip_deepFacC(k) |
|
./pkg/mom_fluxform/mom_u_metric_sphere.F |
52 |
MOM_U_METRIC_SPHERE |
& uFld(i,j)*recip_rSphere*recip_deepFacC(k) |
|
./pkg/mom_fluxform/mom_v_metric_sphere.F |
49 |
MOM_V_METRIC_SPHERE |
vMetricTerms(i,j) = -recip_rSphere*recip_deepFacC(k) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
122 |
MOM_VI_DEL2UV |
& )*maskS(i,j,k,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
97 |
MOM_VI_DEL2UV |
& )*maskW(i,j,k,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
259 |
MOM_VI_HDISSIP |
& *recip_deepFacC(k) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
261 |
MOM_VI_HDISSIP |
& *recip_deepFacC(k) |
|
./pkg/mom_vecinv/mom_vi_u_grad_ke.F |
34 |
MOM_VI_U_GRAD_KE |
& *_maskW(i,j,k,bi,bj)*recip_deepFacC(k) |
|
./pkg/mom_vecinv/mom_vi_v_grad_ke.F |
34 |
MOM_VI_V_GRAD_KE |
& *_maskS(i,j,k,bi,bj)*recip_deepFacC(k) |
|
./model/src/correction_step.F |
95 |
CORRECTION_STEP |
& *recip_deepFacC(k)*recip_rhoFacC(k) |
|
./model/src/correction_step.F |
98 |
CORRECTION_STEP |
& *recip_deepFacC(k)*recip_rhoFacC(k) |
|
./model/src/ini_dynvars.F |
108 |
INI_DYNVARS |
& *recip_deepFacC(k)*recip_rhoFacC(k) |
|
./model/src/ini_dynvars.F |
110 |
INI_DYNVARS |
& *recip_deepFacC(k)*recip_rhoFacC(k) |
|
./model/src/set_grid_factors.F |
54 |
SET_GRID_FACTORS |
recip_deepFacC(k) = 1. _d 0 |
|
./model/src/set_grid_factors.F |
88 |
SET_GRID_FACTORS |
recip_deepFacC(k) = 1. _d 0/deepFacC(k) |
|
./model/src/timestep.F |
326 |
TIMESTEP |
& *recip_deepFacC(k)*recip_rhoFacC(k) |
|
./model/src/timestep.F |
82 |
TIMESTEP |
& *recip_deepFacC(k)*recip_rhoFacC(k) |