| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_visc.F |
119 |
MOM_CALC_VISC |
_RL divDx(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_calc_visc.F |
289 |
MOM_CALC_VISC |
divDx(i,j) = 0. |
|
./pkg/mom_common/mom_calc_visc.F |
309 |
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 |
394 |
MOM_CALC_VISC |
grdDiv=0.25 _d 0*( (divDx(i+1,j)*divDx(i+1,j) |
|
./pkg/mom_common/mom_calc_visc.F |
395 |
MOM_CALC_VISC |
& + divDx(i,j)*divDx(i,j) ) |
|
./pkg/mom_common/mom_calc_visc.F |
415 |
MOM_CALC_VISC |
grdDiv=MAX( ABS(divDx(i+1,j)), ABS(divDx(i,j)) ) |
|
./pkg/mom_common/mom_calc_visc.F |
530 |
MOM_CALC_VISC |
grdDiv=0.25 _d 0*( (divDx(i,j-1)*divDx(i,j-1) |
|
./pkg/mom_common/mom_calc_visc.F |
531 |
MOM_CALC_VISC |
& + divDx(i,j)*divDx(i,j) ) |
|
./pkg/mom_common/mom_calc_visc.F |
550 |
MOM_CALC_VISC |
grdDiv=MAX( ABS(divDx(i,j)), ABS(divDx(i,j-1)) ) |