| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_visc.F |
120 |
MOM_CALC_VISC |
_RL Uscl,U4scl |
|
./pkg/mom_common/mom_calc_visc.F |
343 |
MOM_CALC_VISC |
U4scl=SQRT(KE(i,j))*L3*viscA4Re_max |
|
./pkg/mom_common/mom_calc_visc.F |
345 |
MOM_CALC_VISC |
U4scl=0. |
|
./pkg/mom_common/mom_calc_visc.F |
430 |
MOM_CALC_VISC |
viscA4_DMin(i,j)=MAX(viscA4GridMin*L4rdt,U4scl) |
|
./pkg/mom_common/mom_calc_visc.F |
450 |
MOM_CALC_VISC |
U4scl= SQRT(keZpt)*L3*viscA4Re_max |
|
./pkg/mom_common/mom_calc_visc.F |
453 |
MOM_CALC_VISC |
U4scl=0. |
|
./pkg/mom_common/mom_calc_visc.F |
457 |
MOM_CALC_VISC |
U4scl=0. |
|
./pkg/mom_common/mom_calc_visc.F |
532 |
MOM_CALC_VISC |
viscA4_ZMin(i,j)=MAX(viscA4GridMin*L4rdt,U4scl) |