| File |
Line number |
Procedure |
Code |
|
./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_u_sidedrag.F |
62 |
MOM_U_SIDEDRAG |
A4tmp=min(viscA4+viscA4Grid*(rAw(i,j,bi,bj)**2)/deltaTmom, |
|
./model/src/config_summary.F |
128 |
CONFIG_SUMMARY |
CALL WRITE_0D_R8( viscA4Grid, INDEX_NONE,'viscA4Grid =', |
|
./model/src/config_check.F |
262 |
CONFIG_CHECK |
& ( viscC4leith.NE.0. .OR. viscA4Grid.NE.0. |
|
./model/src/ini_parms.F |
146 |
INI_PARMS |
& viscA4Max, viscA4Grid, viscA4GridMax, viscA4GridMin, |
|
./model/inc/PARAMS.h |
583 |
NO PROCEDURE |
& viscA4Max, viscA4Grid, viscA4GridMax, viscA4GridMin, |
|
./model/inc/PARAMS.h |
658 |
NO PROCEDURE |
_RL viscA4Grid, viscA4GridMax, viscA4GridMin |
|
./pkg/mom_vecinv/mom_vecinv.F |
211 |
MOM_VECINV |
& .OR. viscA4Grid.NE.0. |
|
./pkg/mom_vecinv/mom_vecinv.F |
226 |
MOM_VECINV |
& .OR. viscAhGrid.NE.0. .OR. viscA4Grid.NE.0. |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
335 |
MOM_VI_HDISSIP |
IF ( viscC4leith.NE.0. .OR. viscA4Grid.NE.0. |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
55 |
MOM_VI_HDISSIP |
& .OR.(viscA4Grid.NE.0.) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
70 |
MOM_VI_HDISSIP |
vg4=viscA4Grid*recip_dt |
|
./model/src/set_defaults.F |
114 |
SET_DEFAULTS |
viscA4Grid = 0.D0 |