| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_visc.F |
120 |
MOM_CALC_VISC |
_RL divDx(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_calc_visc.F |
248 |
MOM_CALC_VISC |
divDx(i,j) = 0. |
|
./pkg/mom_common/mom_calc_visc.F |
265 |
MOM_CALC_VISC |
divDx(i,j) = (hDiv(i,j)-hDiv(i-1,j))*recip_dxC(i,j,bi,bj) |
|
./pkg/mom_common/mom_calc_visc.F |
354 |
MOM_CALC_VISC |
grdDiv=0.25 _d 0*( (divDx(i+1,j)*divDx(i+1,j) |
|
./pkg/mom_common/mom_calc_visc.F |
355 |
MOM_CALC_VISC |
& + divDx(i,j)*divDx(i,j) ) |
|
./pkg/mom_common/mom_calc_visc.F |
374 |
MOM_CALC_VISC |
grdDiv=MAX( ABS(divDx(i+1,j)), ABS(divDx(i,j)) ) |
|
./pkg/mom_common/mom_calc_visc.F |
465 |
MOM_CALC_VISC |
grdDiv=0.25 _d 0*( (divDx(i,j-1)*divDx(i,j-1) |
|
./pkg/mom_common/mom_calc_visc.F |
466 |
MOM_CALC_VISC |
& + divDx(i,j)*divDx(i,j) ) |
|
./pkg/mom_common/mom_calc_visc.F |
485 |
MOM_CALC_VISC |
grdDiv=MAX( ABS(divDx(i,j)), ABS(divDx(i,j-1)) ) |