File |
Line number |
Procedure |
Code |
./pkg/mom_common/mom_calc_hfacz.F |
195 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
200 |
MOM_CALC_HFACZ |
hFacZ(i,j) = 0.25 _d 0 * hFacZOpen |
./pkg/mom_common/mom_calc_hfacz.F |
213 |
MOM_CALC_HFACZ |
hFacZOpen=MIN( |
./pkg/mom_common/mom_calc_hfacz.F |
219 |
MOM_CALC_HFACZ |
hFacZ(i,j) = 0.5 _d 0 * hFacZOpen |
./pkg/mom_common/mom_calc_hfacz.F |
225 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacW(i,j,k,bi,bj), |
./pkg/mom_common/mom_calc_hfacz.F |
227 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacS(i,j,k,bi,bj),hFacZOpen) |
./pkg/mom_common/mom_calc_hfacz.F |
228 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacS(i-1,j,k,bi,bj),hFacZOpen) |
./pkg/mom_common/mom_calc_hfacz.F |
229 |
MOM_CALC_HFACZ |
hFacZ(i,j)=hFacZOpen |
./pkg/mom_common/mom_calc_hfacz.F |
261 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacW(i,j,k,bi,bj), |
./pkg/mom_common/mom_calc_hfacz.F |
263 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacS(i,j,k,bi,bj),hFacZOpen) |
./pkg/mom_common/mom_calc_hfacz.F |
264 |
MOM_CALC_HFACZ |
hFacZ(i,j)=hFacZOpen |
./pkg/mom_common/mom_calc_hfacz.F |
267 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
272 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
277 |
MOM_CALC_HFACZ |
hFacZ(i,j) = hFacZOpen / 3. _d 0 |
./pkg/mom_common/mom_calc_hfacz.F |
286 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacW(i,j,k,bi,bj), |
./pkg/mom_common/mom_calc_hfacz.F |
288 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacS(i-1,j,k,bi,bj),hFacZOpen) |
./pkg/mom_common/mom_calc_hfacz.F |
289 |
MOM_CALC_HFACZ |
hFacZ(i,j)=hFacZOpen |
./pkg/mom_common/mom_calc_hfacz.F |
292 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
297 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
302 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
307 |
MOM_CALC_HFACZ |
hFacZ(i,j) = hFacZOpen / 3. _d 0 |
./pkg/mom_common/mom_calc_hfacz.F |
316 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacW(i,j,k,bi,bj), |
./pkg/mom_common/mom_calc_hfacz.F |
318 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacS(i,j,k,bi,bj),hFacZOpen) |
./pkg/mom_common/mom_calc_hfacz.F |
319 |
MOM_CALC_HFACZ |
hFacZ(i,j)=hFacZOpen |
./pkg/mom_common/mom_calc_hfacz.F |
322 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
327 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
332 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
337 |
MOM_CALC_HFACZ |
hFacZ(i,j) = hFacZOpen / 3. _d 0 |
./pkg/mom_common/mom_calc_hfacz.F |
345 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacW(i,j,k,bi,bj), |
./pkg/mom_common/mom_calc_hfacz.F |
347 |
MOM_CALC_HFACZ |
hFacZOpen=MIN(_hFacS(i-1,j,k,bi,bj),hFacZOpen) |
./pkg/mom_common/mom_calc_hfacz.F |
348 |
MOM_CALC_HFACZ |
hFacZ(i,j)=hFacZOpen |
./pkg/mom_common/mom_calc_hfacz.F |
351 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
356 |
MOM_CALC_HFACZ |
hFacZOpen= |
./pkg/mom_common/mom_calc_hfacz.F |
361 |
MOM_CALC_HFACZ |
hFacZ(i,j) = hFacZOpen / 3. _d 0 |
./pkg/mom_common/mom_calc_hfacz.F |
70 |
MOM_CALC_HFACZ |
_RS hFacZOpen |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
27 |
MOM_VI_HFACZ_DISS |
_RS hFacZOpen |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
44 |
MOM_VI_HFACZ_DISS |
hFacZOpen=MIN(_hFacW(i,j,k,bi,bj) |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
49 |
MOM_VI_HFACZ_DISS |
hFacZ(i,j)=0.5*hFacZOpen |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
64 |
MOM_VI_HFACZ_DISS |
hFacZOpen=MIN( _hFacW(i,j,k,bi,bj) |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
69 |
MOM_VI_HFACZ_DISS |
hFacZ(i,j)=hFacZOpen |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
70 |
MOM_VI_HFACZ_DISS |
IF (hFacZOpen.EQ.0.) THEN |
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
73 |
MOM_VI_HFACZ_DISS |
r_hFacZ(i,j)=1./hFacZOpen |
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
26 |
MOM_VI_MASK_VORT3 |
_RS hFacZOpen |
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
43 |
MOM_VI_MASK_VORT3 |
hFacZOpen=min(_hFacW(i,j,k,bi,bj), |
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
45 |
MOM_VI_MASK_VORT3 |
hFacZOpen=min(_hFacS(i,j,k,bi,bj),hFacZOpen) |
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
46 |
MOM_VI_MASK_VORT3 |
hFacZOpen=min(_hFacS(i-1,j,k,bi,bj),hFacZOpen) |
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
47 |
MOM_VI_MASK_VORT3 |
hFacZ(i,j)=hFacZOpen |