| File |
Line number |
Procedure |
Code |
|
./pkg/mom_common/mom_calc_visc.F |
120 |
MOM_CALC_VISC |
_RL divDy(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/mom_common/mom_calc_visc.F |
290 |
MOM_CALC_VISC |
divDy(i,j) = 0. |
|
./pkg/mom_common/mom_calc_visc.F |
323 |
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 |
396 |
MOM_CALC_VISC |
& + (divDy(i,j+1)*divDy(i,j+1) |
|
./pkg/mom_common/mom_calc_visc.F |
397 |
MOM_CALC_VISC |
& + divDy(i,j)*divDy(i,j) ) ) |
|
./pkg/mom_common/mom_calc_visc.F |
416 |
MOM_CALC_VISC |
grdDiv=MAX( grdDiv, ABS(divDy(i,j+1)) ) |
|
./pkg/mom_common/mom_calc_visc.F |
417 |
MOM_CALC_VISC |
grdDiv=MAX( grdDiv, ABS(divDy(i,j)) ) |
|
./pkg/mom_common/mom_calc_visc.F |
532 |
MOM_CALC_VISC |
& + (divDy(i-1,j)*divDy(i-1,j) |
|
./pkg/mom_common/mom_calc_visc.F |
533 |
MOM_CALC_VISC |
& + divDy(i,j)*divDy(i,j) ) ) |
|
./pkg/mom_common/mom_calc_visc.F |
551 |
MOM_CALC_VISC |
grdDiv=MAX( grdDiv, ABS(divDy(i,j)) ) |
|
./pkg/mom_common/mom_calc_visc.F |
552 |
MOM_CALC_VISC |
grdDiv=MAX( grdDiv, ABS(divDy(i-1,j)) ) |