| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
808 |
NO PROCEDURE |
& viscA4, viscA4W, viscA4Max, |
|
./model/inc/PARAMS.h |
890 |
NO PROCEDURE |
_RL viscA4 |
|
./pkg/mom_common/mom_u_sidedrag.F |
76 |
MOM_U_SIDEDRAG |
A4tmp=MIN(viscA4+viscA4Grid*(rAw(i,j,bi,bj)**2)/deltaTmom, |
|
./pkg/mom_common/mom_u_sidedrag.F |
91 |
MOM_U_SIDEDRAG |
& -viscA4*del2u(i,j)*sqcosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_u_sidedrag.F |
93 |
MOM_U_SIDEDRAG |
& -viscA4*del2u(i,j)*cosFacU(j,bi,bj) |
|
./pkg/mom_common/mom_v_sidedrag.F |
76 |
MOM_V_SIDEDRAG |
A4tmp=MIN(viscA4+viscA4Grid*(rAs(i,j,bi,bj)**2)/deltaTmom, |
|
./pkg/mom_common/mom_v_sidedrag.F |
92 |
MOM_V_SIDEDRAG |
& -viscA4*del2v(i,j)*sqcosFacV(j,bi,bj) |
|
./model/src/config_summary.F |
163 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( viscA4, INDEX_NONE, 'viscA4 = ', |
|
./model/src/config_summary.F |
165 |
CONFIG_SUMMARY |
IF ( viscA4D.NE.viscA4 ) |
|
./model/src/config_summary.F |
168 |
CONFIG_SUMMARY |
IF ( viscA4Z.NE.viscA4 ) |
|
./model/src/ini_parms.F |
192 |
INI_PARMS |
& viscA4, viscA4W, |
|
./model/src/ini_parms.F |
479 |
INI_PARMS |
IF ( viscA4D .EQ. UNSET_RL ) viscA4D = viscA4 |
|
./model/src/ini_parms.F |
480 |
INI_PARMS |
IF ( viscA4Z .EQ. UNSET_RL ) viscA4Z = viscA4 |
|
./model/src/set_defaults.F |
140 |
SET_DEFAULTS |
viscA4 = 0. _d 11 |
|
./model/src/set_parms.F |
114 |
SET_PARMS |
useBiharmonicVisc = viscA4.NE.zeroRL |