| 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 |
338 |
MOM_CALC_VISC |
Uscl=SQRT(KE(i,j)*L2)*viscAhRe_max |
|
./pkg/mom_common/mom_calc_visc.F |
340 |
MOM_CALC_VISC |
Uscl=0. |
|
./pkg/mom_common/mom_calc_visc.F |
416 |
MOM_CALC_VISC |
viscAh_DMin(i,j)=MAX(viscAhGridMin*L2rdt,Uscl) |
|
./pkg/mom_common/mom_calc_visc.F |
449 |
MOM_CALC_VISC |
Uscl = SQRT(keZpt*L2)*viscAhRe_max |
|
./pkg/mom_common/mom_calc_visc.F |
452 |
MOM_CALC_VISC |
Uscl =0. |
|
./pkg/mom_common/mom_calc_visc.F |
456 |
MOM_CALC_VISC |
Uscl =0. |
|
./pkg/mom_common/mom_calc_visc.F |
521 |
MOM_CALC_VISC |
viscAh_ZMin(i,j)=MAX(viscAhGridMin*L2rdt,Uscl) |