| 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 |
62 |
MOM_V_SIDEDRAG |
A4tmp=min(viscA4+viscA4Grid*(rAs(i,j,bi,bj)**2)/deltaTmom, |
|
./pkg/mom_common/mom_v_sidedrag.F |
65 |
MOM_V_SIDEDRAG |
A4tmp=min(A4tmp,viscA4GridMax*(rAw(i,j,bi,bj)**2)/deltaTmom) |
|
./pkg/mom_common/mom_v_sidedrag.F |
67 |
MOM_V_SIDEDRAG |
A4tmp=max(A4tmp,viscA4GridMin*(rAw(i,j,bi,bj)**2)/deltaTmom) |
|
./pkg/mom_common/mom_v_sidedrag.F |
77 |
MOM_V_SIDEDRAG |
& -A4tmp*del2v(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 |
62 |
MOM_U_SIDEDRAG |
A4tmp=min(viscA4+viscA4Grid*(rAw(i,j,bi,bj)**2)/deltaTmom, |
|
./pkg/mom_common/mom_u_sidedrag.F |
64 |
MOM_U_SIDEDRAG |
A4tmp=min(A4tmp,viscA4GridMax*(rAw(i,j,bi,bj)**2)/deltaTmom) |
|
./pkg/mom_common/mom_u_sidedrag.F |
65 |
MOM_U_SIDEDRAG |
A4tmp=max(A4tmp,viscA4GridMin*(rAw(i,j,bi,bj)**2)/deltaTmom) |
|
./pkg/mom_common/mom_u_sidedrag.F |
83 |
MOM_U_SIDEDRAG |
& -A4tmp*del2u(i,j) |