| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_visc.F |
121 |
MOM_CALC_VISC |
_RL divDy(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_calc_visc.F |
249 |
MOM_CALC_VISC |
divDy(i,j) = 0. |
|
./pkg/mom_common/mom_calc_visc.F |
277 |
MOM_CALC_VISC |
divDy(i,j) = (hDiv(i,j)-hDiv(i,j-1))*recip_dyC(i,j,bi,bj) |
|
./pkg/mom_common/mom_calc_visc.F |
356 |
MOM_CALC_VISC |
& + (divDy(i,j+1)*divDy(i,j+1) |
|
./pkg/mom_common/mom_calc_visc.F |
357 |
MOM_CALC_VISC |
& + divDy(i,j)*divDy(i,j) ) ) |
|
./pkg/mom_common/mom_calc_visc.F |
375 |
MOM_CALC_VISC |
grdDiv=MAX( grdDiv, ABS(divDy(i,j+1)) ) |
|
./pkg/mom_common/mom_calc_visc.F |
376 |
MOM_CALC_VISC |
grdDiv=MAX( grdDiv, ABS(divDy(i,j)) ) |
|
./pkg/mom_common/mom_calc_visc.F |
467 |
MOM_CALC_VISC |
& + (divDy(i-1,j)*divDy(i-1,j) |
|
./pkg/mom_common/mom_calc_visc.F |
468 |
MOM_CALC_VISC |
& + divDy(i,j)*divDy(i,j) ) ) |
|
./pkg/mom_common/mom_calc_visc.F |
486 |
MOM_CALC_VISC |
grdDiv=MAX( grdDiv, ABS(divDy(i,j)) ) |
|
./pkg/mom_common/mom_calc_visc.F |
487 |
MOM_CALC_VISC |
grdDiv=MAX( grdDiv, ABS(divDy(i-1,j)) ) |