| File |
Line number |
Procedure |
Code |
|
./model/inc/GRID.h |
426 |
NO PROCEDURE |
& drC, drF, recip_drC, recip_drF, rC, rF, |
|
./model/inc/GRID.h |
482 |
NO PROCEDURE |
_RS recip_drF (Nr) |
|
./pkg/flt/flt_mapping.F |
198 |
FLT_MAP_IJLOCAL2XY |
fm = ( rr - rF(k) ) * recip_drF(k)*rkSign |
|
./pkg/flt/flt_runga2.F |
109 |
FLT_RUNGA2 |
scalez=rkSign*recip_drF(kc) |
|
./pkg/flt/flt_runga4.F |
111 |
FLT_RUNGA4 |
scalez=rkSign*recip_drF(kc) |
|
./pkg/frazil/frazil_tendency_apply.F |
62 |
FRAZIL_TENDENCY_APPLY_T |
& * recip_drF(k) * _recip_hFacC(i,j,k,bi,bj) |
|
./pkg/generic_advdiff/gad_advection.F |
478 |
GAD_ADVECTION |
& *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_advection.F |
501 |
GAD_ADVECTION |
& *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_advection.F |
530 |
GAD_ADVECTION |
& *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_advection.F |
675 |
GAD_ADVECTION |
& *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_advection.F |
698 |
GAD_ADVECTION |
& *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_advection.F |
727 |
GAD_ADVECTION |
& *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_advection.F |
924 |
GAD_ADVECTION |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/generic_advdiff/gad_advection.F |
934 |
GAD_ADVECTION |
& *_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_biharm_r.F |
82 |
GAD_BIHARM_R |
tmpFac = recip_drF(kl)*recip_deepFac2C(kl)*recip_rhoFacC(kl) |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
68 |
GAD_C2_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
71 |
GAD_C2_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
74 |
GAD_C2_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
77 |
GAD_C2_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
703 |
GAD_CALC_RHS |
& _recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
744 |
GAD_CALC_RHS |
& *_recip_hFacC(i,j,k+1,bi,bj)*recip_drF(k+1) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
753 |
GAD_CALC_RHS |
& *_recip_hFacC(i,j,k+1,bi,bj)*recip_drF(k+1) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
771 |
GAD_CALC_RHS |
& -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_del2.F |
59 |
GAD_DEL2 |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
120 |
GAD_DIAGNOSTICS_STATE |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
75 |
GAD_DIAGNOSTICS_STATE |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
87 |
GAD_DST2U1_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
90 |
GAD_DST2U1_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
93 |
GAD_DST2U1_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
96 |
GAD_DST2U1_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
154 |
GAD_DST3FL_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
158 |
GAD_DST3FL_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
162 |
GAD_DST3FL_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
166 |
GAD_DST3FL_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
170 |
GAD_DST3FL_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
174 |
GAD_DST3FL_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
178 |
GAD_DST3FL_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
182 |
GAD_DST3FL_IMPL_R |
& *recip_hFacC(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
115 |
GAD_FLUXLIMIT_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
118 |
GAD_FLUXLIMIT_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
121 |
GAD_FLUXLIMIT_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
124 |
GAD_FLUXLIMIT_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
147 |
GAD_IMPLICIT_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
157 |
GAD_IMPLICIT_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_som_advect.F |
412 |
GAD_SOM_ADVECT |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/generic_advdiff/gad_som_advect.F |
589 |
GAD_SOM_ADVECT |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
158 |
GAD_U3C4_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
162 |
GAD_U3C4_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
166 |
GAD_U3C4_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
170 |
GAD_U3C4_IMPL_R |
& *recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
174 |
GAD_U3C4_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
178 |
GAD_U3C4_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
182 |
GAD_U3C4_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
186 |
GAD_U3C4_IMPL_R |
& *recip_hFac(i,j,k-1)*recip_drF(k-1) |
|
./pkg/ggl90/ggl90_calc.F |
469 |
GGL90_CALC |
& *recip_drF(k-1)*recip_hFacC(i,j,k-1,bi,bj) |
|
./pkg/ggl90/ggl90_calc.F |
489 |
GGL90_CALC |
& *recip_drF( k ) * recip_hFacC(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
129 |
GMREDI_CALC_EIGS |
& *recip_drC(k+1)*recip_drF(k)/N2(i,j,k+1) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
134 |
GMREDI_CALC_EIGS |
& *recip_drF(k)*recip_drC(k)/N2(i,j,k) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
136 |
GMREDI_CALC_EIGS |
& *recip_drF(k)*recip_drC(k+1)/N2(i,j,k+1) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
141 |
GMREDI_CALC_EIGS |
& *recip_drF(k)*recip_drC(k)/N2(i,j,k) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
145 |
GMREDI_CALC_PSI_BVP |
& *recip_drF(km1)*recip_hFacW(i,j,km1,bi,bj) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
148 |
GMREDI_CALC_PSI_BVP |
& *(recip_drF(km1)*recip_hFacW(i,j,km1,bi,bj) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
149 |
GMREDI_CALC_PSI_BVP |
& +recip_drF(k)*recip_hFacW(i,j,k,bi,bj) ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
151 |
GMREDI_CALC_PSI_BVP |
& *recip_drF(k)*recip_hFacW(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
216 |
GMREDI_CALC_PSI_BVP |
& *recip_drF(km1)*recip_hFacS(i,j,km1,bi,bj) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
219 |
GMREDI_CALC_PSI_BVP |
& *(recip_drF(km1)*recip_hFacS(i,j,km1,bi,bj) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
220 |
GMREDI_CALC_PSI_BVP |
& +recip_drF(k)*recip_hFacS(i,j,k,bi,bj) ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
222 |
GMREDI_CALC_PSI_BVP |
& *recip_drF(k)*recip_hFacS(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_k3d.F |
669 |
GMREDI_K3D |
& *recip_drF(k)*recip_hFacW(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_k3d.F |
672 |
GMREDI_K3D |
& *recip_drF(k)*recip_hFacS(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_k3d.F |
687 |
GMREDI_K3D |
& *recip_drF(k)*recip_hFacW(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_k3d.F |
692 |
GMREDI_K3D |
& *recip_drF(k)*recip_hFacS(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
107 |
GMREDI_RESIDUAL_FLOW |
ustar = delPsi*recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
115 |
GMREDI_RESIDUAL_FLOW |
vstar = delPsi*recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
69 |
GMREDI_RESIDUAL_FLOW |
& + delPsi*recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./pkg/gmredi/gmredi_residual_flow.F |
77 |
GMREDI_RESIDUAL_FLOW |
& + delPsi*recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./pkg/icefront/icefront_thermodynamics.F |
172 |
ICEFRONT_THERMODYNAMICS |
& * recip_drF(K) |
|
./pkg/icefront/icefront_thermodynamics.F |
176 |
ICEFRONT_THERMODYNAMICS |
& * recip_drF(K) |
|
./pkg/kpp/kpp_forcing_surf.F |
356 |
KPP_FORCING_SURF |
& surfForcU(ip1,j,bi,bj) ) * p5 *recip_drF(1) |
|
./pkg/kpp/kpp_forcing_surf.F |
358 |
KPP_FORCING_SURF |
& surfForcV(i,jp1,bi,bj) ) * p5 *recip_drF(1) |
|
./model/src/apply_forcing.F |
137 |
APPLY_FORCING_U |
& *recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
146 |
APPLY_FORCING_U |
& *recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
315 |
APPLY_FORCING_V |
& *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
324 |
APPLY_FORCING_V |
& *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
508 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
519 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
543 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
599 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
618 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
627 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
638 |
APPLY_FORCING_T |
& +TsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
652 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
679 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
883 |
APPLY_FORCING_S |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
894 |
APPLY_FORCING_S |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
908 |
APPLY_FORCING_S |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
917 |
APPLY_FORCING_S |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/apply_forcing.F |
928 |
APPLY_FORCING_S |
& +SsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/layers/layers_fluxcalc.F |
216 |
LAYERS_FLUXCALC |
& + delPsi*recip_drF(kci)*_recip_hFacW(i,j,kci,bi,bj) |
|
./pkg/layers/layers_fluxcalc.F |
295 |
LAYERS_FLUXCALC |
& + delPsi*recip_drF(kci)*_recip_hFacS(i,j,kci,bi,bj) |
|
./pkg/layers/layers_thermodynamics.F |
68 |
LAYERS_CALC_RHS |
& *recip_drF(1)*_recip_hFacC(i,j,1,bi,bj) |
|
./pkg/layers/layers_thermodynamics.F |
84 |
LAYERS_CALC_RHS |
tmpfac = -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/longstep/longstep_thermodynamics.F |
159 |
LONGSTEP_THERMODYNAMICS |
& *dBHybSigF(k)*recip_drF(k) |
|
./model/src/calc_gw.F |
416 |
CALC_GW |
& *recip_drF(k)*rA(i,j,bi,bj) |
|
./model/src/calc_gw.F |
434 |
CALC_GW |
& *recip_drF(k-1)*rA(i,j,bi,bj) |
|
./pkg/mom_common/mom_calc_3d_strain.F |
102 |
MOM_CALC_3D_STRAIN |
str33(i,j,k) = recip_drF(k)*rkSign |
|
./pkg/mom_common/mom_calc_3d_strain.F |
216 |
MOM_CALC_3D_STRAIN |
& recip_drF(Nr)*rkSign |
|
./pkg/mom_common/mom_calc_3d_strain.F |
226 |
MOM_CALC_3D_STRAIN |
& recip_drF(Nr)*rkSign |
|
./model/src/calc_phi_hyd.F |
551 |
CALC_PHI_HYD |
phiHydC(i,j) = ddRloc*recip_drF(k)*2. _d 0 |
|
./pkg/mom_common/mom_u_bottomdrag.F |
78 |
MOM_U_BOTTOMDRAG |
recDrC = recip_drF(k) |
|
./pkg/mom_common/mom_u_bottomdrag.F |
81 |
MOM_U_BOTTOMDRAG |
recDrF_bot(i,j) = _recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_bottomdrag.F |
88 |
MOM_U_BOTTOMDRAG |
recDrF_bot(i,j) = _recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
100 |
MOM_U_IMPLICIT_R |
& *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
147 |
MOM_U_IMPLICIT_R |
& *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
150 |
MOM_U_IMPLICIT_R |
& *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
153 |
MOM_U_IMPLICIT_R |
& *_recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_u_implicit_r.F |
156 |
MOM_U_IMPLICIT_R |
& *_recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_u_implicit_r.F |
166 |
MOM_U_IMPLICIT_R |
& - rCenter*_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
168 |
MOM_U_IMPLICIT_R |
& - rCenter*_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_implicit_r.F |
170 |
MOM_U_IMPLICIT_R |
& + rCenter*_recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_u_implicit_r.F |
172 |
MOM_U_IMPLICIT_R |
& + rCenter*_recip_hFacW(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_u_implicit_r.F |
89 |
MOM_U_IMPLICIT_R |
& *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_u_sidedrag.F |
118 |
MOM_U_SIDEDRAG |
& *recip_drF(k)*recip_rAw(i,j,bi,bj) |
|
./pkg/mom_common/mom_u_sidedrag.F |
82 |
MOM_U_SIDEDRAG |
& *recip_drF(k)*recip_rAw(i,j,bi,bj) |
|
./pkg/mom_common/mom_uv_smag_3d.F |
108 |
MOM_UV_SMAG_3D |
& + recip_drF( k ) |
|
./pkg/mom_common/mom_uv_smag_3d.F |
86 |
MOM_UV_SMAG_3D |
& + recip_drF( k ) |
|
./pkg/mom_common/mom_v_bottomdrag.F |
78 |
MOM_V_BOTTOMDRAG |
recDrC = recip_drF(k) |
|
./pkg/mom_common/mom_v_bottomdrag.F |
81 |
MOM_V_BOTTOMDRAG |
recDrF_bot(i,j) = _recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_bottomdrag.F |
88 |
MOM_V_BOTTOMDRAG |
recDrF_bot(i,j) = _recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_implicit_r.F |
100 |
MOM_V_IMPLICIT_R |
& *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_implicit_r.F |
147 |
MOM_V_IMPLICIT_R |
& *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_implicit_r.F |
150 |
MOM_V_IMPLICIT_R |
& *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_implicit_r.F |
153 |
MOM_V_IMPLICIT_R |
& *_recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_v_implicit_r.F |
156 |
MOM_V_IMPLICIT_R |
& *_recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_v_implicit_r.F |
166 |
MOM_V_IMPLICIT_R |
& - rCenter*_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_implicit_r.F |
168 |
MOM_V_IMPLICIT_R |
& - rCenter*_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_implicit_r.F |
170 |
MOM_V_IMPLICIT_R |
& + rCenter*_recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_v_implicit_r.F |
172 |
MOM_V_IMPLICIT_R |
& + rCenter*_recip_hFacS(i,j,k-1,bi,bj)*recip_drF(k-1) |
|
./pkg/mom_common/mom_v_implicit_r.F |
89 |
MOM_V_IMPLICIT_R |
& *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_common/mom_v_sidedrag.F |
115 |
MOM_V_SIDEDRAG |
& *recip_drF(k)*recip_rAs(i,j,bi,bj) |
|
./pkg/mom_common/mom_v_sidedrag.F |
84 |
MOM_V_SIDEDRAG |
& *recip_drF(k)*recip_rAs(i,j,bi,bj) |
|
./model/src/calc_surf_dr.F |
123 |
CALC_SURF_DR |
& )*recip_drF(ks)*maskC(i,j,ks,bi,bj) |
|
./model/src/calc_surf_dr.F |
161 |
CALC_SURF_DR |
& )*recip_drF(ks)*maskW(i,j,ks,bi,bj) |
|
./model/src/calc_surf_dr.F |
182 |
CALC_SURF_DR |
& )*recip_drF(ks)*maskS(i,j,ks,bi,bj) |
|
./model/src/calc_surf_dr.F |
91 |
CALC_SURF_DR |
& + ( rSurftmp(i,j) - Ro_surf(i,j,bi,bj) )*recip_drF(ks) |
|
./pkg/mom_fluxform/mom_fluxform.F |
440 |
MOM_FLUXFORM |
& -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)/ |
|
./pkg/mom_fluxform/mom_fluxform.F |
443 |
MOM_FLUXFORM |
& -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_fluxform/mom_fluxform.F |
491 |
MOM_FLUXFORM |
& *_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)*recip_rhoFacC(k) |
|
./pkg/mom_fluxform/mom_fluxform.F |
537 |
MOM_FLUXFORM |
& -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k)/ |
|
./pkg/mom_fluxform/mom_fluxform.F |
540 |
MOM_FLUXFORM |
& -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_fluxform/mom_fluxform.F |
667 |
MOM_FLUXFORM |
& -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)/ |
|
./pkg/mom_fluxform/mom_fluxform.F |
670 |
MOM_FLUXFORM |
& -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_fluxform/mom_fluxform.F |
718 |
MOM_FLUXFORM |
& *_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)*recip_rhoFacC(k) |
|
./pkg/mom_fluxform/mom_fluxform.F |
763 |
MOM_FLUXFORM |
& -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k)/ |
|
./pkg/mom_fluxform/mom_fluxform.F |
766 |
MOM_FLUXFORM |
& -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_fluxform/mom_u_del2u.F |
89 |
MOM_U_DEL2U |
& recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./pkg/mom_fluxform/mom_v_del2v.F |
88 |
MOM_V_DEL2V |
& recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./pkg/mom_vecinv/mom_vecinv.F |
372 |
MOM_VECINV |
& -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_vecinv/mom_vecinv.F |
431 |
MOM_VECINV |
& -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
127 |
MOM_VI_U_VERTSHEAR |
& * recip_drF(K) |
|
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
132 |
MOM_VI_U_VERTSHEAR |
& * recip_drF(K) |
|
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
127 |
MOM_VI_V_VERTSHEAR |
& * recip_drF(K) |
|
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
132 |
MOM_VI_V_VERTSHEAR |
& * recip_drF(K) |
|
./pkg/monitor/mon_surfcor.F |
111 |
MON_SURFCOR |
& + salt(i,j,Nr,bi,bj)*drF(Nr)*recip_drF(ks) |
|
./pkg/monitor/mon_vort3.F |
124 |
MON_VORT3 |
& )*recip_drF(k) |
|
./pkg/monitor/mon_vort3.F |
260 |
MON_VORT3 |
hFacZ(1,j) = sNx + hFacZ(1,j)*recip_drF(k) |
|
./pkg/monitor/mon_vort3.F |
278 |
MON_VORT3 |
hFacZ(1,j) = sNx + hFacZ(1,j)*recip_drF(k) |
|
./pkg/monitor/monitor.F |
158 |
MONITOR |
& recip_drF, dT, myThid ) |
|
./pkg/monitor/monitor_g.F |
160 |
G_MONITOR |
& recip_drF,dT,myThid ) |
|
./pkg/obcs/obcs_apply_surf_dr.F |
100 |
OBCS_APPLY_SURF_DR |
& + etaFld(i,j-1,bi,bj)*recip_drF(ks) |
|
./pkg/obcs/obcs_apply_surf_dr.F |
118 |
OBCS_APPLY_SURF_DR |
& + OBEeta(j,bi,bj)*recip_drF(ks) |
|
./pkg/obcs/obcs_apply_surf_dr.F |
121 |
OBCS_APPLY_SURF_DR |
& + etaFld(i,j,bi,bj)*recip_drF(ks) |
|
./pkg/obcs/obcs_apply_surf_dr.F |
137 |
OBCS_APPLY_SURF_DR |
& + OBWeta(j,bi,bj)*recip_drF(ks) |
|
./pkg/obcs/obcs_apply_surf_dr.F |
140 |
OBCS_APPLY_SURF_DR |
& + etaFld(i-1,j,bi,bj)*recip_drF(ks) |
|
./pkg/obcs/obcs_apply_surf_dr.F |
78 |
OBCS_APPLY_SURF_DR |
& + OBNeta(i,bi,bj)*recip_drF(ks) |
|
./pkg/obcs/obcs_apply_surf_dr.F |
81 |
OBCS_APPLY_SURF_DR |
& + etaFld(i,j,bi,bj)*recip_drF(ks) |
|
./pkg/obcs/obcs_apply_surf_dr.F |
97 |
OBCS_APPLY_SURF_DR |
& + OBSeta(i,bi,bj)*recip_drF(ks) |
|
./pkg/opps/opps_calc.F |
374 |
OPPS_CALC |
& (mda(k)*(Pda(k,ktr)-Paa(k,ktr)))*dt*recip_drF(k) |
|
./pkg/opps/opps_calc.F |
392 |
OPPS_CALC |
& *dt*recip_drF(k2) |
|
./pkg/opps/opps_calc.F |
402 |
OPPS_CALC |
& mda(kmx)*(Pda(kmx,ktr)-Paa(kmx,ktr))*dt*recip_drF(kmx+1) |
|
./pkg/opps/opps_calc.F |
845 |
NLOPPS |
* (mda(k)*(tda(k)-taa(k)))*dt*recip_drF(k) |
|
./pkg/opps/opps_calc.F |
848 |
NLOPPS |
* (mda(k)*(sda(k)-saa(k)))*dt*recip_drF(k) |
|
./pkg/opps/opps_calc.F |
858 |
NLOPPS |
* *dt*recip_drF(k2) |
|
./pkg/opps/opps_calc.F |
863 |
NLOPPS |
* *dt*recip_drF(k2) |
|
./pkg/opps/opps_calc.F |
869 |
NLOPPS |
* dt*recip_drF(kmx+1) |
|
./pkg/opps/opps_calc.F |
873 |
NLOPPS |
* dt*recip_drF(kmx+1) |
|
./pkg/ptracers/ptracers_apply_forcing.F |
81 |
PTRACERS_APPLY_FORCING |
& *recip_drF(k)*recip_hFacC(i,j,k,bi,bj) |
|
./pkg/ptracers/ptracers_integrate.F |
386 |
PTRACERS_INTEGRATE |
I recip_hFac, recip_rA, recip_drF, |
|
./pkg/ptracers/ptracers_integrate.F |
393 |
PTRACERS_INTEGRATE |
I recip_hFac, recip_rA, recip_drF, |
|
./model/src/external_forcing.F |
100 |
EXTERNAL_FORCING_U |
& *recip_drF(kLev)*_recip_hFacW(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
109 |
EXTERNAL_FORCING_U |
& *recip_drF(kLev)*_recip_hFacW(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
240 |
EXTERNAL_FORCING_V |
& *recip_drF(kLev)*_recip_hFacS(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
249 |
EXTERNAL_FORCING_V |
& *recip_drF(kLev)*_recip_hFacS(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
395 |
EXTERNAL_FORCING_T |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
406 |
EXTERNAL_FORCING_T |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
430 |
EXTERNAL_FORCING_T |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
486 |
EXTERNAL_FORCING_T |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
505 |
EXTERNAL_FORCING_T |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
514 |
EXTERNAL_FORCING_T |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
525 |
EXTERNAL_FORCING_T |
& +TsurfCor*recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
551 |
EXTERNAL_FORCING_T |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
718 |
EXTERNAL_FORCING_S |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
729 |
EXTERNAL_FORCING_S |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
743 |
EXTERNAL_FORCING_S |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
752 |
EXTERNAL_FORCING_S |
& *recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./model/src/external_forcing.F |
763 |
EXTERNAL_FORCING_S |
& +SsurfCor*recip_drF(kLev)*_recip_hFacC(i,j,kLev,bi,bj) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
112 |
SALT_PLUME_TENDENCY_APPLY_S |
& *recip_drF(k)*mass2rUnit*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
150 |
SALT_PLUME_TENDENCY_APPLY_S |
& *recip_drF(k)*mass2rUnit*_recip_hFacC(i,j,k,bi,bj) |
|
./pkg/salt_plume/salt_plume_tendency_apply_t.F |
61 |
SALT_PLUME_TENDENCY_APPLY_T |
& *recip_drF(k)*mass2rUnit*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/forcing_surf_relax.F |
136 |
FORCING_SURF_RELAX |
& *dBHybSigF(ks)*recip_drF(ks) |
|
./model/src/forcing_surf_relax.F |
141 |
FORCING_SURF_RELAX |
& *dBHybSigF(ks)*recip_drF(ks) |
|
./model/src/freesurf_rescale_g.F |
58 |
FREESURF_RESCALE_G |
& *dBHybSigF(k)*recip_drF(k) |
|
./model/src/impldiff.F |
141 |
IMPLDIFF |
a(i,j,k) = -deltaTX(k)*recip_hFac(i,j,k)*recip_drF(k) |
|
./model/src/impldiff.F |
159 |
IMPLDIFF |
c(i,j,k) = -deltaTX(k)*recip_hFac(i,j,k)*recip_drF(k) |
|
./pkg/shelfice/shelfice_forcing.F |
182 |
SHELFICE_FORCING_S |
& * drLoc*recip_drF(kLev)* _recip_hFacC(i,j,kLev,bi,bj) |
|
./pkg/shelfice/shelfice_forcing.F |
92 |
SHELFICE_FORCING_T |
& * drLoc*recip_drF(kLev)* _recip_hFacC(i,j,kLev,bi,bj) |
|
./pkg/shelfice/shelfice_u_drag.F |
77 |
SHELFICE_U_DRAG |
& -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/shelfice/shelfice_u_drag.F |
84 |
SHELFICE_U_DRAG |
& -_recip_hFacW(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/shelfice/shelfice_update_masks.F |
10 |
SHELFICE_UPDATE_MASKS |
I rF, recip_drF, |
|
./pkg/shelfice/shelfice_update_masks.F |
38 |
SHELFICE_UPDATE_MASKS |
_RS recip_drF (1:Nr) |
|
./pkg/shelfice/shelfice_update_masks.F |
87 |
SHELFICE_UPDATE_MASKS |
hFacMnSz=max( hFacMin, min(hFacMinDr*recip_drF(k),1. _d 0) ) |
|
./pkg/shelfice/shelfice_update_masks.F |
91 |
SHELFICE_UPDATE_MASKS |
hFacCtmp = (rF(k)-R_shelfIce(I,J,bi,bj))*recip_drF(K) |
|
./pkg/shelfice/shelfice_v_drag.F |
77 |
SHELFICE_V_DRAG |
& -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/shelfice/shelfice_v_drag.F |
84 |
SHELFICE_V_DRAG |
& -_recip_hFacS(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/smooth/smooth_correl3d.F |
88 |
SMOOTH_CORREL3D |
& *sqrt(recip_rA(i,j,bi,bj)*recip_drF(k)) |
|
./pkg/smooth/smooth_filtervar3d.F |
152 |
SMOOTH_FILTERVAR3D |
& *(recip_rA(i,j,bi,bj)*recip_drF(k)) |
|
./pkg/smooth/smooth_filtervar3d.F |
223 |
SMOOTH_FILTERVAR3D |
& *sqrt(recip_rA(i,j,bi,bj)*recip_drF(k)) |
|
./pkg/smooth/smooth_impldiff.F |
66 |
SMOOTH_IMPLDIFF |
a(i,j,k) = -deltaTX*recip_hFac(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/smooth/smooth_impldiff.F |
79 |
SMOOTH_IMPLDIFF |
c(i,j,k) = -deltaTX*recip_hFac(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/smooth/smooth_rhs.F |
340 |
SMOOTH_RHS |
& -smooth_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./pkg/smooth/smooth_rhs.F |
352 |
SMOOTH_RHS |
& -smooth_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./model/src/ini_masks_etc.F |
106 |
INI_MASKS_ETC |
hFacMnSz=max( hFacMin, min(hFacMinDr*recip_drF(k),1. _d 0) ) |
|
./model/src/ini_masks_etc.F |
110 |
INI_MASKS_ETC |
hFacCtmp = (rF(k)-Ro_surf(i,j,bi,bj))*recip_drF(k) |
|
./model/src/ini_masks_etc.F |
136 |
INI_MASKS_ETC |
I rF, recip_drF, |
|
./model/src/ini_masks_etc.F |
62 |
INI_MASKS_ETC |
hFacMnSz=max( hFacMin, min(hFacMinDr*recip_drF(k),1. _d 0) ) |
|
./model/src/ini_masks_etc.F |
66 |
INI_MASKS_ETC |
hFacCtmp = (rF(k)-R_low(i,j,bi,bj))*recip_drF(k) |
|
./model/src/ini_sigma_hfac.F |
107 |
INI_SIGMA_HFAC |
& )*recip_drF(k) |
|
./model/src/ini_sigma_hfac.F |
221 |
INI_SIGMA_HFAC |
& )*recip_drF(k) |
|
./model/src/ini_sigma_hfac.F |
232 |
INI_SIGMA_HFAC |
& )*recip_drF(k) |
|
./model/src/ini_vertical_grid.F |
172 |
INI_VERTICAL_GRID |
recip_drF(k) = 1. _d 0/drF(k) |
|
./verification/rotating_tank/code/apply_forcing.F |
128 |
APPLY_FORCING_U |
& *recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
137 |
APPLY_FORCING_U |
& *recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
297 |
APPLY_FORCING_V |
& *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
306 |
APPLY_FORCING_V |
& *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
525 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
536 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
560 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
616 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
635 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
644 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
655 |
APPLY_FORCING_T |
& +TsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
681 |
APPLY_FORCING_T |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
745 |
APPLY_FORCING_T |
& -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
|
./verification/rotating_tank/code/apply_forcing.F |
945 |
APPLY_FORCING_S |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
956 |
APPLY_FORCING_S |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
970 |
APPLY_FORCING_S |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
979 |
APPLY_FORCING_S |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/rotating_tank/code/apply_forcing.F |
990 |
APPLY_FORCING_S |
& +SsurfCor*recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
174 |
EXTERNAL_FORCING_V |
& *recip_drF(kLev)*recip_hFacS(i,j,kLev,bi,bj) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
254 |
EXTERNAL_FORCING_T |
& *recip_drF(kLev)*recip_hFacC(i,j,kLev,bi,bj) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
279 |
EXTERNAL_FORCING_T |
& *recip_drF(klev)*recip_hFacC(i,j,kLev,bi,bj) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
352 |
EXTERNAL_FORCING_S |
& *recip_drF(kLev)*recip_hFacC(i,j,kLev,bi,bj) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
73 |
EXTERNAL_FORCING_U |
& *recip_drF(kLev)*recip_hFacW(i,j,kLev,bi,bj) |
|
./verification/tutorial_global_oce_latlon/code/ptracers_apply_forcing.F |
81 |
PTRACERS_APPLY_FORCING |
& *recip_drF(k)*recip_hFacC(i,j,k,bi,bj) |
|
./model/src/salt_integrate.F |
445 |
SALT_INTEGRATE |
I recip_hFac, recip_rA, recip_drF, |
|
./model/src/salt_integrate.F |
452 |
SALT_INTEGRATE |
I recip_hFac, recip_rA, recip_drF, |
|
./model/src/taueddy_tendency_apply.F |
166 |
TAUEDDY_TENDENCY_APPLY_V |
& *recip_drF(k)*_recip_hFacS(i,j,k,bi,bj) |
|
./model/src/taueddy_tendency_apply.F |
84 |
TAUEDDY_TENDENCY_APPLY_U |
& *recip_drF(k)*_recip_hFacW(i,j,k,bi,bj) |
|
./model/src/temp_integrate.F |
453 |
TEMP_INTEGRATE |
I recip_hFac, recip_rA, recip_drF, |
|
./model/src/temp_integrate.F |
460 |
TEMP_INTEGRATE |
I recip_hFac, recip_rA, recip_drF, |
|
./model/src/thermodynamics.F |
190 |
THERMODYNAMICS |
& *dBHybSigF(k)*recip_drF(k) |
|
./model/src/timestep.F |
294 |
TIMESTEP |
& *dBHybSigF(k)*recip_drF(k) |
|
./model/src/timestep.F |
299 |
TIMESTEP |
& *dBHybSigF(k)*recip_drF(k) |
|
./model/src/tracers_iigw_correction.F |
101 |
TRACERS_IIGW_CORRECTION |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/tracers_iigw_correction.F |
85 |
TRACERS_IIGW_CORRECTION |
& *recip_drF(k)*_recip_hFacC(i,j,k,bi,bj) |
|
./model/src/update_masks_etc.F |
85 |
UPDATE_MASKS_ETC |
hFacMnSz=max( hFacMin, min(hFacMinDr*recip_drF(k),1. _d 0) ) |
|
./model/src/update_masks_etc.F |
90 |
UPDATE_MASKS_ETC |
hFacCtmp = (rF(K)-xx_r_low(I,J,bi,bj))*recip_drF(K) |
|
./model/src/update_masks_etc.F |
92 |
UPDATE_MASKS_ETC |
hFacCtmp = (rF(K)-R_low(I,J,bi,bj))*recip_drF(K) |
|
./model/src/update_sigma.F |
120 |
UPDATE_SIGMA |
& )*recip_drF(k) |
|
./model/src/update_sigma.F |
146 |
UPDATE_SIGMA |
& )*recip_drF(k) |
|
./model/src/update_sigma.F |
172 |
UPDATE_SIGMA |
& )*recip_drF(k) |
|
./pkg/aim_v23/aim_do_physics.F |
101 |
AIM_DO_PHYSICS |
& + salt(i,j,Nr,bi,bj)*drF(Nr)*recip_drF(k) |
|
./pkg/aim_v23/aim_tendency_apply.F |
114 |
AIM_TENDENCY_APPLY_U |
& + uStr_tmp*gravity*recip_drF(k) |
|
./pkg/aim_v23/aim_tendency_apply.F |
137 |
AIM_TENDENCY_APPLY_U |
& + uStr_tmp*gravity*recip_drF(k) |
|
./pkg/aim_v23/aim_tendency_apply.F |
301 |
AIM_TENDENCY_APPLY_V |
& + vStr_tmp*gravity*recip_drF(k) |
|
./pkg/aim_v23/aim_tendency_apply.F |
324 |
AIM_TENDENCY_APPLY_V |
& + vStr_tmp*gravity*recip_drF(k) |
|
./pkg/atm2d/relax_add.F |
141 |
RELAX_ADD |
& (convertFW2Salt *recip_drF(1))*nearIce |
|
./pkg/cfc/cfc11_forcing.F |
165 |
CFC11_FORCING |
& + fluxCFC11(i,j)*recip_drF(1)*recip_hFacC(i,j,1,bi,bj) |
|
./pkg/cfc/cfc12_forcing.F |
166 |
CFC12_FORCING |
& + fluxCFC12(i,j)*recip_drF(1)*recip_hFacC(i,j,1,bi,bj) |
|
./pkg/dic/alk_surfforcing.F |
62 |
ALK_SURFFORCING |
& recip_drF(1)/gsm_S |
|
./pkg/dic/car_flux.F |
114 |
CAR_FLUX |
& *recip_drF(ko) * _recip_hFacC(i,j,ko,bi,bj) |
|
./pkg/dic/car_flux.F |
130 |
CAR_FLUX |
& *recip_drF(ko) * _recip_hFacC(i,j,ko,bi,bj) |
|
./pkg/dic/dic_biotic_forcing.F |
255 |
DIC_BIOTIC_FORCING |
& InputFe(i,j,bi,bj)*recip_drF(1) |
|
./pkg/dic/dic_surfforcing.F |
253 |
DIC_SURFFORCING |
GDC(i,j)= recip_drF(kLev)*recip_hFacC(i,j,kLev,bi,bj) |
|
./pkg/dic/o2_surfforcing.F |
125 |
O2_SURFFORCING |
& *recip_drF(K) * recip_hFacC(i,j,K,bi,bj) |
|
./pkg/dic/phos_flux.F |
120 |
PHOS_FLUX |
& *recip_drF(ko) * _recip_hFacC(i,j,ko,bi,bj) |
|
./pkg/dic/phos_flux.F |
137 |
PHOS_FLUX |
& *recip_drF(ko) * _recip_hFacC(i,j,ko,bi,bj) |
|
./pkg/down_slope/dwnslp_apply.F |
13 |
DWNSLP_APPLY |
I recip_hFac, recip_rA_arg, recip_drF, |
|
./pkg/down_slope/dwnslp_apply.F |
152 |
DWNSLP_APPLY |
& *recip_drF(k)*recip_hFac(ijd,k) |
|
./pkg/down_slope/dwnslp_apply.F |
161 |
DWNSLP_APPLY |
& *recip_drF(k)*recip_hFac(ijs,k) |
|
./pkg/down_slope/dwnslp_apply.F |
172 |
DWNSLP_APPLY |
& *recip_drF(k)*recip_hFac(ijd,k) |
|
./pkg/down_slope/dwnslp_apply.F |
177 |
DWNSLP_APPLY |
& *recip_drF(kshelf)*recip_hFac(ijs,kshelf) |
|
./pkg/down_slope/dwnslp_apply.F |
58 |
DWNSLP_APPLY |
_RS recip_drF(Nr) |