File |
Line number |
Procedure |
Code |
./model/inc/SURFACE.h |
109 |
NO PROCEDURE |
& h0FacC, h0FacW, h0FacS |
./model/inc/SURFACE.h |
112 |
NO PROCEDURE |
_RS h0FacS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
./model/src/calc_surf_dr.F |
179 |
CALC_SURF_DR |
hFac_surfS(i,j,bi,bj) = h0FacS(i,j,ks,bi,bj) |
./pkg/mom_common/mom_v_sidedrag.F |
107 |
MOM_V_SIDEDRAG |
hFacZClosedW = h0FacS(i,j,k,bi,bj) - hFacZ(i,j) |
./pkg/mom_common/mom_v_sidedrag.F |
108 |
MOM_V_SIDEDRAG |
hFacZClosedE = h0FacS(i,j,k,bi,bj) - hFacZ(i+1,j) |
./pkg/mom_common/mom_v_sidedrag.F |
68 |
MOM_V_SIDEDRAG |
hFacZClosedW = h0FacS(i,j,k,bi,bj) - hFacZ(i,j) |
./pkg/mom_common/mom_v_sidedrag.F |
69 |
MOM_V_SIDEDRAG |
hFacZClosedE = h0FacS(i,j,k,bi,bj) - hFacZ(i+1,j) |
./pkg/mom_fluxform/mom_calc_rtrans.F |
150 |
MOM_CALC_RTRANS |
& - rStarDhSDt(i,j,bi,bj)*drF(k-1)*h0FacS(i,j,k-1,bi,bj) |
./pkg/mom_fluxform/mom_fluxform.F |
285 |
MOM_FLUXFORM |
& MIN( h0FacS(i,j,k,bi,bj), h0FacS(i-1,j,k,bi,bj) ) ) |
./pkg/mom_fluxform/mom_v_del2v.F |
104 |
MOM_V_DEL2V |
hFacZClosedW = h0FacS(i,j,k,bi,bj) - h0FacZ(i,j) |
./pkg/mom_fluxform/mom_v_del2v.F |
105 |
MOM_V_DEL2V |
hFacZClosedE = h0FacS(i,j,k,bi,bj) - h0FacZ(i+1,j) |
./pkg/mom_vecinv/mom_vecinv.F |
317 |
MOM_VECINV |
& MIN( h0FacS(i,j,k,bi,bj), h0FacS(i-1,j,k,bi,bj) ) ) |
./pkg/obcs/obcs_apply_surf_dr.F |
77 |
OBCS_APPLY_SURF_DR |
hFactmp = h0FacS(i,j,ks,bi,bj) |
./pkg/obcs/obcs_apply_surf_dr.F |
80 |
OBCS_APPLY_SURF_DR |
hFactmp = h0FacS(i,j,ks,bi,bj) |
./pkg/obcs/obcs_apply_surf_dr.F |
96 |
OBCS_APPLY_SURF_DR |
hFactmp = h0FacS(i,j,ks,bi,bj) |
./pkg/obcs/obcs_apply_surf_dr.F |
99 |
OBCS_APPLY_SURF_DR |
hFactmp = h0FacS(i,j,ks,bi,bj) |
./model/src/ini_masks_etc.F |
513 |
INI_MASKS_ETC |
h0FacS(i,j,k,bi,bj) = _hFacS(i,j,k,bi,bj) |
./model/src/ini_nlfs_vars.F |
119 |
INI_NLFS_VARS |
hFacS(i,j,k,bi,bj) = h0FacS(i,j,k,bi,bj) |
./model/src/update_masks_etc.F |
345 |
UPDATE_MASKS_ETC |
h0FacS(i,j,k,bi,bj) = _hFacS(i,j,k,bi,bj) |
./model/src/update_r_star.F |
62 |
UPDATE_R_STAR |
hFacS(i,j,k,bi,bj) = h0FacS(i,j,k,bi,bj) |
./model/src/update_r_star.F |
97 |
UPDATE_R_STAR |
hFacS(i,j,k,bi,bj) = h0FacS(i,j,k,bi,bj) |