| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
721 |
NO PROCEDURE |
& viscFacAdj, viscAh, viscAhW, viscAhMax, |
|
./model/inc/PARAMS.h |
794 |
NO PROCEDURE |
_RL viscAh |
|
./pkg/mom_common/mom_calc_visc.F |
179 |
MOM_CALC_VISC |
& (viscAh.NE.0.) |
|
./pkg/mom_common/mom_u_sidedrag.F |
79 |
MOM_U_SIDEDRAG |
Ahtmp=min(viscAh+viscAhGrid*rAw(i,j,bi,bj)/deltaTmom, |
|
./pkg/mom_common/mom_u_sidedrag.F |
94 |
MOM_U_SIDEDRAG |
& viscAh*uFld(i,j)*cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_v_sidedrag.F |
79 |
MOM_V_SIDEDRAG |
Ahtmp=min(viscAh+viscAhGrid*rAs(i,j,bi,bj)/deltaTmom, |
|
./model/src/config_summary.F |
102 |
CONFIG_SUMMARY |
IF ( viscAhZ.NE.viscAh ) |
|
./model/src/config_summary.F |
97 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( viscAh, INDEX_NONE, 'viscAh = ', |
|
./model/src/config_summary.F |
99 |
CONFIG_SUMMARY |
IF ( viscAhD.NE.viscAh ) |
|
./model/src/ini_parms.F |
158 |
INI_PARMS |
& viscAh, viscAhW, viscAhMax, |
|
./model/src/ini_parms.F |
441 |
INI_PARMS |
IF ( viscAhW .EQ. UNSET_RL ) viscAhW = viscAh |
|
./model/src/ini_parms.F |
444 |
INI_PARMS |
IF ( viscAhD .EQ. UNSET_RL ) viscAhD = viscAh |
|
./model/src/ini_parms.F |
445 |
INI_PARMS |
IF ( viscAhZ .EQ. UNSET_RL ) viscAhZ = viscAh |
|
./model/src/set_defaults.F |
102 |
SET_DEFAULTS |
viscAh = 0. _d 3 |