File |
Line number |
Procedure |
Code |
./model/inc/GRID.h |
421 |
NO PROCEDURE |
& recip_hFacC,recip_hFacW,recip_hFacS, |
./model/inc/GRID.h |
460 |
NO PROCEDURE |
_RS recip_hFacS (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./model/inc/RECIP_HFACS_MACROS.h |
36 |
NO PROCEDURE |
# define _recip_hFacS(i,j,k,bi,bj) recip_hFacS(i,j,k,bi,bj)*maskS(i,j,k,bi,bj) |
./pkg/gmredi/gmredi_calc_psi_bvp.F |
217 |
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(km1)*recip_hFacS(i,j,km1,bi,bj) |
./pkg/gmredi/gmredi_calc_psi_bvp.F |
221 |
GMREDI_CALC_PSI_BVP |
& +recip_drF(k)*recip_hFacS(i,j,k,bi,bj) ) |
./pkg/gmredi/gmredi_calc_psi_bvp.F |
223 |
GMREDI_CALC_PSI_BVP |
& *recip_drF(k)*recip_hFacS(i,j,k,bi,bj) |
./pkg/gmredi/gmredi_k3d.F |
683 |
GMREDI_K3D |
& *recip_drF(k)*recip_hFacS(i,j,k,bi,bj) |
./pkg/gmredi/gmredi_k3d.F |
702 |
GMREDI_K3D |
& *recip_drF(k)*recip_hFacS(i,j,k,bi,bj) |
./pkg/mom_common/mom_uv_smag_3d.F |
113 |
MOM_UV_SMAG_3D |
& )*rkSign*recip_hFacS(i,j,k,bi,bj) |
./pkg/mom_common/mom_v_botdrag_impl.F |
170 |
MOM_V_BOTDRAG_IMPL |
& )*recip_hFacS(i,j,k,bi,bj)*0.25 _d 0 |
./pkg/mom_common/mom_v_bottomdrag.F |
156 |
MOM_V_BOTTOMDRAG |
& )*recip_hFacS(i,j,k,bi,bj)*0.25 _d 0 |
./model/src/dynamics.F |
606 |
DYNAMICS |
I -2, kappaRV, recip_hFacS(1-OLx,1-OLy,1,bi,bj), |
./model/src/dynamics.F |
638 |
DYNAMICS |
I 0, kappaRV, recip_hFacS(1-OLx,1-OLy,1,bi,bj), |
./pkg/shelfice/shelfice_v_drag.F |
146 |
SHELFICE_V_DRAG |
& )*recip_hFacS(i,j,k,bi,bj)*0.25 _d 0 |
./model/src/ini_masks_etc.F |
495 |
INI_MASKS_ETC |
recip_hFacS(i,j,k,bi,bj) = 1. _d 0 / hFacS(i,j,k,bi,bj) |
./model/src/ini_masks_etc.F |
498 |
INI_MASKS_ETC |
recip_hFacS(i,j,k,bi,bj) = 0. |
./verification/tidal_basin_2d/code/external_forcing.F |
174 |
EXTERNAL_FORCING_V |
& *recip_drF(kLev)*recip_hFacS(i,j,kLev,bi,bj) |
./model/src/timestep.F |
300 |
TIMESTEP |
& *recip_hFacS(i,j,k,bi,bj) |
./model/src/update_masks_etc.F |
315 |
UPDATE_MASKS_ETC |
recip_hFacS(I,J,K,bi,bj) = 1. _d 0 / hFacS(I,J,K,bi,bj) |
./model/src/update_masks_etc.F |
318 |
UPDATE_MASKS_ETC |
recip_hFacS(I,J,K,bi,bj) = 0. |
./model/src/update_r_star.F |
106 |
UPDATE_R_STAR |
recip_hFacS(i,j,k,bi,bj) = maskS(i,j,k,bi,bj) |
./model/src/update_r_star.F |
114 |
UPDATE_R_STAR |
& recip_hFacS(i,j,k,bi,bj) = 1. _d 0 / _hFacS(i,j,k,bi,bj) |
./model/src/update_r_star.F |
71 |
UPDATE_R_STAR |
recip_hFacS(i,j,k,bi,bj) = maskS(i,j,k,bi,bj) |
./model/src/update_r_star.F |
79 |
UPDATE_R_STAR |
& recip_hFacS(i,j,k,bi,bj) = 1. _d 0 / _hFacS(i,j,k,bi,bj) |
./model/src/update_sigma.F |
173 |
UPDATE_SIGMA |
recip_hFacS(i,j,k,bi,bj) = maskS(i,j,k,bi,bj)*drF(k) |
./model/src/update_surf_dr.F |
118 |
UPDATE_SURF_DR |
recip_hFacS(i,j,ks,bi,bj)= 1. _d 0 / hFac_surfNm1S(i,j,bi,bj) |
./model/src/update_surf_dr.F |
82 |
UPDATE_SURF_DR |
recip_hFacS(i,j,ks,bi,bj)= 1. _d 0 / hFac_surfS(i,j,bi,bj) |
./pkg/aim_v23/aim_tendency_apply.F |
303 |
AIM_TENDENCY_APPLY_V |
& * recip_hFacS(i,j,k,bi,bj) |
./pkg/aim_v23/aim_tendency_apply.F |
326 |
AIM_TENDENCY_APPLY_V |
& * recip_hFacS(i,j,k,bi,bj) |
./pkg/atm_phys/atm_phys_tendency_apply.F |
154 |
ATM_PHYS_TENDENCY_APPLY_V |
& )*recip_hFacS(i,j,k,bi,bj) |
./pkg/ctrl/ctrl_getobcse.F |
163 |
CTRL_GETOBCSE |
& *recip_hFacS(i,j,k,bi,bj) |
./pkg/ctrl/ctrl_getobcse.F |
232 |
CTRL_GETOBCSE |
& *recip_hFacS(i,j,k,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
165 |
CTRL_GETOBCSN |
& *recip_hFacS(i,j+jp1,k,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
234 |
CTRL_GETOBCSN |
& *recip_hFacS(i,j+jp1,k,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
161 |
CTRL_GETOBCSS |
& *recip_hFacS(i,j+jp1,k,bi,bj) |
./pkg/ctrl/ctrl_getobcss.F |
230 |
CTRL_GETOBCSS |
& *recip_hFacS(i,j+jp1,k,bi,bj) |
./pkg/ctrl/ctrl_getobcsw.F |
163 |
CTRL_GETOBCSW |
& *recip_hFacS(i,j,k,bi,bj) |
./pkg/ctrl/ctrl_getobcsw.F |
232 |
CTRL_GETOBCSW |
& *recip_hFacS(i,j,k,bi,bj) |