| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_v_sidedrag.F |
52 |
MOM_V_SIDEDRAG |
_RL Ahtmp,A4tmp |
|
./pkg/mom_common/mom_v_sidedrag.F |
60 |
MOM_V_SIDEDRAG |
Ahtmp=min(viscAh+viscAhGrid*rAs(i,j,bi,bj)/deltaTmom, |
|
./pkg/mom_common/mom_v_sidedrag.F |
76 |
MOM_V_SIDEDRAG |
& Ahtmp*vFld(i,j)*cosFacV(J,bi,bj) |
|
./pkg/mom_common/mom_u_sidedrag.F |
52 |
MOM_U_SIDEDRAG |
_RL Ahtmp,A4tmp |
|
./pkg/mom_common/mom_u_sidedrag.F |
60 |
MOM_U_SIDEDRAG |
Ahtmp=min(viscAh+viscAhGrid*rAw(i,j,bi,bj)/deltaTmom, |
|
./pkg/mom_common/mom_u_sidedrag.F |
82 |
MOM_U_SIDEDRAG |
& Ahtmp*uFld(i,j) |