| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
803 |
NO PROCEDURE |
& viscFacAdj, viscAh, viscAhW, smag3D_coeff, |
|
./model/inc/PARAMS.h |
879 |
NO PROCEDURE |
_RL viscAh |
|
./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 |
89 |
MOM_U_SIDEDRAG |
& viscAh*uFld(i,j)*cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_v_sidedrag.F |
74 |
MOM_V_SIDEDRAG |
Ahtmp=MIN(viscAh+viscAhGrid*rAs(i,j,bi,bj)/deltaTmom, |
|
./model/src/config_summary.F |
135 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( viscAh, INDEX_NONE, 'viscAh = ', |
|
./model/src/config_summary.F |
137 |
CONFIG_SUMMARY |
IF ( viscAhD.NE.viscAh ) |
|
./model/src/config_summary.F |
140 |
CONFIG_SUMMARY |
IF ( viscAhZ.NE.viscAh ) |
|
./model/src/ini_parms.F |
185 |
INI_PARMS |
& viscAh, viscAhW, viscAhMax, |
|
./model/src/ini_parms.F |
477 |
INI_PARMS |
IF ( viscAhD .EQ. UNSET_RL ) viscAhD = viscAh |
|
./model/src/ini_parms.F |
478 |
INI_PARMS |
IF ( viscAhZ .EQ. UNSET_RL ) viscAhZ = viscAh |
|
./model/src/set_defaults.F |
121 |
SET_DEFAULTS |
viscAh = 0. _d 3 |
|
./model/src/set_parms.F |
108 |
SET_PARMS |
useHarmonicVisc = viscAh .NE.zeroRL |