| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_visc.F |
114 |
MOM_CALC_VISC |
_RL leith2fac, leith4fac |
|
./pkg/mom_common/mom_calc_visc.F |
205 |
MOM_CALC_VISC |
leith2fac =(viscC2leith /pi)**6 |
|
./pkg/mom_common/mom_calc_visc.F |
210 |
MOM_CALC_VISC |
leith2fac =(viscC2leith /pi)**3 |
|
./pkg/mom_common/mom_calc_visc.F |
216 |
MOM_CALC_VISC |
leith2fac=0. _d 0 |
|
./pkg/mom_common/mom_calc_visc.F |
365 |
MOM_CALC_VISC |
& SQRT(leith2fac*grdVrt+leithD2fac*grdDiv)*L3 |
|
./pkg/mom_common/mom_calc_visc.F |
383 |
MOM_CALC_VISC |
viscAh_Dlth(i,j)=(leith2fac*grdVrt+(leithD2fac*grdDiv))*L3 |
|
./pkg/mom_common/mom_calc_visc.F |
476 |
MOM_CALC_VISC |
& SQRT(leith2fac*grdVrt+leithD2fac*grdDiv)*L3 |
|
./pkg/mom_common/mom_calc_visc.F |
494 |
MOM_CALC_VISC |
viscAh_ZLth(i,j)=(leith2fac*grdVrt+(leithD2fac*grdDiv))*L3 |