| File |
Line number |
Procedure |
Code |
|
./pkg/smooth/smooth_diff2d.F |
134 |
SMOOTH_DIFF2D |
if (smooth2Dmask(i,j,bi,bj).NE.0.) then |
|
./pkg/smooth/smooth_diff2d.F |
138 |
SMOOTH_DIFF2D |
& smooth2Dmask(i,j,bi,bj)*smooth2Dmask(i-1,j,bi,bj)* |
|
./pkg/smooth/smooth_diff2d.F |
143 |
SMOOTH_DIFF2D |
& smooth2Dmask(i,j,bi,bj)*smooth2Dmask(i+1,j,bi,bj)* |
|
./pkg/smooth/smooth_diff2d.F |
148 |
SMOOTH_DIFF2D |
& smooth2Dmask(i,j,bi,bj)*smooth2Dmask(i,j-1,bi,bj)* |
|
./pkg/smooth/smooth_diff2d.F |
153 |
SMOOTH_DIFF2D |
& smooth2Dmask(i,j,bi,bj)*smooth2Dmask(i,j+1,bi,bj)* |
|
./pkg/smooth/smooth_diff2d.F |
33 |
SMOOTH_DIFF2D |
_RL smooth2Dmask(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/smooth/smooth_diff2d.F |
67 |
SMOOTH_DIFF2D |
smooth2Dmask(i,j,bi,bj) = mask_in(i,j,1,bi,bj) |
|
./pkg/smooth/smooth_diff2d.F |
76 |
SMOOTH_DIFF2D |
CALL EXCH_XY_RL ( smooth2Dmask , myThid ) |