| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
635 |
NO PROCEDURE |
& viscA4Max, viscA4Grid, viscA4GridMax, viscA4GridMin, |
|
./model/inc/PARAMS.h |
711 |
NO PROCEDURE |
_RL viscA4Grid, viscA4GridMax, viscA4GridMin |
|
./model/src/ini_parms.F |
161 |
INI_PARMS |
& viscA4Max, viscA4Grid, viscA4GridMax, viscA4GridMin, |
|
./model/src/set_defaults.F |
118 |
SET_DEFAULTS |
viscA4GridMax = 1. _d 21 |
|
./pkg/mom_common/mom_v_sidedrag.F |
83 |
MOM_V_SIDEDRAG |
IF (viscA4GridMax.GT.0.) THEN |
|
./pkg/mom_common/mom_v_sidedrag.F |
84 |
MOM_V_SIDEDRAG |
A4tmp=min(A4tmp,viscA4GridMax*(rAs(i,j,bi,bj)**2)/deltaTmom) |
|
./pkg/mom_common/mom_u_sidedrag.F |
83 |
MOM_U_SIDEDRAG |
A4tmp=min(A4tmp,viscA4GridMax*(rAw(i,j,bi,bj)**2)/deltaTmom) |
|
./pkg/mom_common/mom_calc_visc.F |
416 |
MOM_CALC_VISC |
viscA4_DMax(i,j)=min(viscA4GridMax*L4rdt,viscA4Max) |
|
./pkg/mom_common/mom_calc_visc.F |
544 |
MOM_CALC_VISC |
viscA4_ZMax(i,j)=min(viscA4GridMax*L4rdt,viscA4Max) |