| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_hdiv.F |
27 |
MOM_CALC_HDIV |
_RL hDiv(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_calc_hdiv.F |
38 |
MOM_CALC_HDIV |
hDiv(I,J)=( |
|
./pkg/mom_common/mom_calc_hdiv.F |
52 |
MOM_CALC_HDIV |
hDiv(I,J)= |
|
./pkg/mom_common/mom_calc_hdiv.F |
9 |
MOM_CALC_HDIV |
O hDiv, |
|
./pkg/mom_common/mom_calc_visc.F |
11 |
MOM_CALC_VISC |
I hDiv,vort3,tension,strain,KE,hFacZ, |
|
./pkg/mom_common/mom_calc_visc.F |
304 |
MOM_CALC_VISC |
& hDiv, bi,bj, myThid ) |
|
./pkg/mom_common/mom_calc_visc.F |
309 |
MOM_CALC_VISC |
divDx(i,j) = (hDiv(i,j)-hDiv(i-1,j))*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_common/mom_calc_visc.F |
318 |
MOM_CALC_VISC |
& hDiv, bi,bj, myThid ) |
|
./pkg/mom_common/mom_calc_visc.F |
323 |
MOM_CALC_VISC |
divDy(i,j) = (hDiv(i,j)-hDiv(i,j-1))*recip_DYC(i,j,bi,bj) |
|
./pkg/mom_common/mom_calc_visc.F |
95 |
MOM_CALC_VISC |
_RL hDiv(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_hdissip.F |
29 |
MOM_HDISSIP |
_RL hDiv(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_hdissip.F |
8 |
MOM_HDISSIP |
I hDiv,vort3,tension,strain,KE, |
|
./pkg/mom_fluxform/mom_fluxform.F |
137 |
MOM_FLUXFORM |
_RL hDiv(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_fluxform/mom_fluxform.F |
198 |
MOM_FLUXFORM |
hDiv(i,j) = 0. |
|
./pkg/mom_fluxform/mom_fluxform.F |
283 |
MOM_FLUXFORM |
CALL MOM_CALC_HDIV(bi,bj,k,2,uFld,vFld,hDiv,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
297 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(hDiv, 'momHDiv ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
367 |
MOM_FLUXFORM |
I hDiv,vort3,tension,strain,KE,hFacZ, |
|
./pkg/mom_vecinv/mom_vecinv.F |
180 |
MOM_VECINV |
hDiv(i,j) = 0. |
|
./pkg/mom_vecinv/mom_vecinv.F |
244 |
MOM_VECINV |
CALL MOM_CALC_HDIV(bi,bj,k,2,uFld,vFld,hDiv,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
265 |
MOM_VECINV |
I hDiv,vort3,tension,strain,KE,hfacZ, |
|
./pkg/mom_vecinv/mom_vecinv.F |
270 |
MOM_VECINV |
CALL MOM_VI_DEL2UV(bi,bj,k,hDiv,vort3,hFacZ, |
|
./pkg/mom_vecinv/mom_vecinv.F |
306 |
MOM_VECINV |
CALL MOM_HDISSIP(bi,bj,k,hDiv,vort3,tension,strain,KE, |
|
./pkg/mom_vecinv/mom_vecinv.F |
314 |
MOM_VECINV |
CALL MOM_VI_HDISSIP(bi,bj,k,hDiv,vort3,tension,strain,KE, |
|
./pkg/mom_vecinv/mom_vecinv.F |
719 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('D', 'I10',1,hDiv, bi,bj,k,myIter,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
730 |
MOM_VECINV |
CALL MNC_CW_RL_W_OFFSET(pf,'mom_vi',bi,bj,'D', hDiv, |
|
./pkg/mom_vecinv/mom_vecinv.F |
746 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(hDiv, 'momHDiv ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
91 |
MOM_VECINV |
_RL hDiv (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
107 |
MOM_VI_DEL2UV |
& hDiv, bi,bj, myThid ) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
115 |
MOM_VI_DEL2UV |
& + ( hDiv(i,j) - hDiv(i,j-1) )*recip_DYC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
23 |
MOM_VI_DEL2UV |
_RL hDiv(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
86 |
MOM_VI_DEL2UV |
& hDiv, bi,bj, myThid ) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
8 |
MOM_VI_DEL2UV |
I hDiv,vort3,hFacZ, |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
94 |
MOM_VI_DEL2UV |
& + ( hDiv(i,j) - hDiv(i-1,j) )*recip_DXC(i,j,bi,bj) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
35 |
MOM_VI_HDISSIP |
_RL hDiv(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
66 |
MOM_VI_HDISSIP |
Dij=hDiv( i , j )*viscAh_D(i,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
67 |
MOM_VI_HDISSIP |
Dim=hDiv( i ,j-1)*viscAh_D(i,j-1) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
68 |
MOM_VI_HDISSIP |
Dmj=hDiv(i-1, j )*viscAh_D(i-1,j) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
87 |
MOM_VI_HDISSIP |
Dim=hDiv( i ,j-1) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
88 |
MOM_VI_HDISSIP |
Dij=hDiv( i , j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
89 |
MOM_VI_HDISSIP |
Dmj=hDiv(i-1, j ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
8 |
MOM_VI_HDISSIP |
I hDiv,vort3,tension,strain,KE, |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
123 |
SHAP_FILT_UV_S2 |
& hDiv,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
139 |
SHAP_FILT_UV_S2 |
hDiv(i,j)=(tmpFldU(i+1,j,k,bi,bj)-tmpFldU(i,j,k,bi,bj)) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
156 |
SHAP_FILT_UV_S2 |
hDiv(i,j) = hDiv(i,j) * rA(i,j,bi,bj) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
166 |
SHAP_FILT_UV_S2 |
I bi,bj,k,hDiv,vort3,hFacZ, |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
205 |
SHAP_FILT_UV_S2 |
& hDiv, bi,bj, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
211 |
SHAP_FILT_UV_S2 |
& ( (hDiv(i,j) - hDiv(i-1,j)) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
221 |
SHAP_FILT_UV_S2 |
& hDiv, bi,bj, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
227 |
SHAP_FILT_UV_S2 |
& ( (hDiv(i,j) - hDiv(i,j-1)) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
70 |
SHAP_FILT_UV_S2 |
_RL hDiv(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
80 |
SHAP_FILT_UV_S2 |
hDiv(i,j) = 0. _d 0 |