File |
Line number |
Procedure |
Code |
./pkg/shap_filt/shap_filt_tracerold.F |
33 |
SHAP_FILT_TRACEROLD |
_RL tmpFldY(1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
./pkg/shap_filt/shap_filt_tracerold.F |
61 |
SHAP_FILT_TRACEROLD |
tmpFldY(i,j,1) = tmpFldX(i,j,N2) |
./pkg/shap_filt/shap_filt_tracerold.F |
67 |
SHAP_FILT_TRACEROLD |
tmpFldY(i,j,1) = field(i,j,k,bi,bj) |
./pkg/shap_filt/shap_filt_tracerold.F |
78 |
SHAP_FILT_TRACEROLD |
tmpFldY(i,j,N2) = -0.25*( |
./pkg/shap_filt/shap_filt_tracerold.F |
79 |
SHAP_FILT_TRACEROLD |
& ( tmpFldY(i,j+1,N1)-tmpFldY(i, j ,N1) ) |
./pkg/shap_filt/shap_filt_tracerold.F |
81 |
SHAP_FILT_TRACEROLD |
& -( tmpFldY(i, j ,N1)-tmpFldY(i,j-1,N1) ) |
./pkg/shap_filt/shap_filt_tracerold.F |
91 |
SHAP_FILT_TRACEROLD |
field(i,j,k,bi,bj) = tmpFldX(i,j,N2) - tmpFldY(i,j,N2) |
./pkg/shap_filt/shap_filt_tracerold.F |
98 |
SHAP_FILT_TRACEROLD |
& -0.5*( tmpFldX(i,j,N2)+tmpFldY(i,j,N2) ) |
./pkg/shap_filt/shap_filt_u.F |
101 |
SHAP_FILT_U |
uVel(i,j,k,bi,bj) = tmpFldX(i,j,N2) - tmpFldY(i,j,N2) |
./pkg/shap_filt/shap_filt_u.F |
108 |
SHAP_FILT_U |
& -0.5*( tmpFldX(i,j,N2)+tmpFldY(i,j,N2) ) |
./pkg/shap_filt/shap_filt_u.F |
31 |
SHAP_FILT_U |
_RL tmpFldY(1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
./pkg/shap_filt/shap_filt_u.F |
68 |
SHAP_FILT_U |
tmpFldY(i,j,1) = tmpFldX(i,j,N2) |
./pkg/shap_filt/shap_filt_u.F |
74 |
SHAP_FILT_U |
tmpFldY(i,j,1) = uVel(i,j,k,bi,bj) |
./pkg/shap_filt/shap_filt_u.F |
86 |
SHAP_FILT_U |
tmpFldY(i,j,N2) = -0.25*( |
./pkg/shap_filt/shap_filt_u.F |
87 |
SHAP_FILT_U |
& (tmpFldY(i,j+1,N1)-tmpFldY(i, j ,N1))*maskZ(i,j+1) |
./pkg/shap_filt/shap_filt_u.F |
88 |
SHAP_FILT_U |
& -(tmpFldY(i, j ,N1)-tmpFldY(i,j-1,N1))*maskZ(i, j ) |
./pkg/shap_filt/shap_filt_u.F |
90 |
SHAP_FILT_U |
& -2.*(2.-maskZ(i,j)-maskZ(i,j+1))*tmpFldY(i,j,N1) |
./pkg/shap_filt/shap_filt_v.F |
101 |
SHAP_FILT_V |
vVel(i,j,k,bi,bj) = tmpFldX(i,j,N2) - tmpFldY(i,j,N2) |
./pkg/shap_filt/shap_filt_v.F |
108 |
SHAP_FILT_V |
& -0.5*( tmpFldX(i,j,N2)+tmpFldY(i,j,N2) ) |
./pkg/shap_filt/shap_filt_v.F |
31 |
SHAP_FILT_V |
_RL tmpFldY(1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
./pkg/shap_filt/shap_filt_v.F |
71 |
SHAP_FILT_V |
tmpFldY(i,j,1) = tmpFldX(i,j,N2) |
./pkg/shap_filt/shap_filt_v.F |
77 |
SHAP_FILT_V |
tmpFldY(i,j,1) = vVel(i,j,k,bi,bj) |
./pkg/shap_filt/shap_filt_v.F |
89 |
SHAP_FILT_V |
tmpFldY(i,j,N2) = -0.25*( |
./pkg/shap_filt/shap_filt_v.F |
90 |
SHAP_FILT_V |
& tmpFldY(i,j-1,N1) + tmpFldY(i,j+1,N1) |
./pkg/shap_filt/shap_filt_v.F |
91 |
SHAP_FILT_V |
& - 2.*tmpFldY(i,j,N1) |