| File |
Line number |
Procedure |
Code |
|
./pkg/smooth/smooth_diff2d.F |
131 |
SMOOTH_DIFF2D |
if (smooth2Dmask(i,j,bi,bj).NE.0.) then |
|
./pkg/smooth/smooth_diff2d.F |
135 |
SMOOTH_DIFF2D |
& smooth2Dmask(i,j,bi,bj)*smooth2Dmask(i-1,j,bi,bj)* |
|
./pkg/smooth/smooth_diff2d.F |
140 |
SMOOTH_DIFF2D |
& smooth2Dmask(i,j,bi,bj)*smooth2Dmask(i+1,j,bi,bj)* |
|
./pkg/smooth/smooth_diff2d.F |
145 |
SMOOTH_DIFF2D |
& smooth2Dmask(i,j,bi,bj)*smooth2Dmask(i,j-1,bi,bj)* |
|
./pkg/smooth/smooth_diff2d.F |
150 |
SMOOTH_DIFF2D |
& smooth2Dmask(i,j,bi,bj)*smooth2Dmask(i,j+1,bi,bj)* |
|
./pkg/smooth/smooth_diff2d.F |
30 |
SMOOTH_DIFF2D |
_RL smooth2Dmask(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/smooth/smooth_diff2d.F |
64 |
SMOOTH_DIFF2D |
smooth2Dmask(i,j,bi,bj) = mask_in(i,j,1,bi,bj) |
|
./pkg/smooth/smooth_diff2d.F |
73 |
SMOOTH_DIFF2D |
_EXCH_XY_RL ( smooth2Dmask , myThid ) |