File |
Line number |
Procedure |
Code |
./pkg/mom_common/mom_u_sidedrag.F |
58 |
MOM_U_SIDEDRAG |
_RL Ahtmp, A4tmp |
./pkg/mom_common/mom_u_sidedrag.F |
74 |
MOM_U_SIDEDRAG |
Ahtmp=MIN(viscAh+viscAhGrid*rAw(i,j,bi,bj)/deltaTmom, |
./pkg/mom_common/mom_u_sidedrag.F |
96 |
MOM_U_SIDEDRAG |
& Ahtmp*uFld(i,j) |
./pkg/mom_common/mom_v_sidedrag.F |
58 |
MOM_V_SIDEDRAG |
_RL Ahtmp,A4tmp |
./pkg/mom_common/mom_v_sidedrag.F |
74 |
MOM_V_SIDEDRAG |
Ahtmp=MIN(viscAh+viscAhGrid*rAs(i,j,bi,bj)/deltaTmom, |
./pkg/mom_common/mom_v_sidedrag.F |
90 |
MOM_V_SIDEDRAG |
& Ahtmp*vFld(i,j)*cosFacV(j,bi,bj) |