File |
Line number |
Procedure |
Code |
./pkg/gmredi/gmredi_k3d.F |
120 |
GMREDI_K3D |
_RL vFldY( 1-Olx:sNx+Olx,1-Oly:sNy+Oly,Nr ) |
./pkg/gmredi/gmredi_k3d.F |
345 |
GMREDI_K3D |
vFldY(i,j,k) = vEulerMean(i,j,k,bi,bj) |
./pkg/gmredi/gmredi_k3d.F |
355 |
GMREDI_K3D |
vFldY(i,j,k) = vVel(i,j,k,bi,bj) |
./pkg/gmredi/gmredi_k3d.F |
381 |
GMREDI_K3D |
& *( vFldY(i,j+1,k) + vFldY(i,j,k) ) |
./model/src/rotate_uv2en.F |
101 |
ROTATE_UV2EN_RL |
& *( vFldY(i,j+1,k,bi,bj) + vFldY(i,j,k,bi,bj) ) |
./model/src/rotate_uv2en.F |
113 |
ROTATE_UV2EN_RL |
tmpV(i,j) = vFldY(i,j,k,bi,bj) |
./model/src/rotate_uv2en.F |
12 |
ROTATE_UV2EN_RL |
U uFldX, vFldY, |
./model/src/rotate_uv2en.F |
153 |
ROTATE_UV2EN_RL |
vFldY(i,1,k,bi,bj)=0. |
./model/src/rotate_uv2en.F |
157 |
ROTATE_UV2EN_RL |
vFldY(1,j,k,bi,bj)=0. |
./model/src/rotate_uv2en.F |
161 |
ROTATE_UV2EN_RL |
vFldY(i,j,k,bi,bj) = 0.5 _d 0 |
./model/src/rotate_uv2en.F |
165 |
ROTATE_UV2EN_RL |
vFldY(i,j,k,bi,bj)=vFldY(i,j,k,bi,bj)*maskS(i,j,kk,bi,bj) |
./model/src/rotate_uv2en.F |
174 |
ROTATE_UV2EN_RL |
vFldY(i,j,k,bi,bj) = tmpV(i,j) |
./model/src/rotate_uv2en.F |
177 |
ROTATE_UV2EN_RL |
vFldY(i,j,k,bi,bj)=vFldY(i,j,k,bi,bj)*maskC(i,j,kk,bi,bj) |
./model/src/rotate_uv2en.F |
193 |
ROTATE_UV2EN_RS |
U uFldX, vFldY, |
./model/src/rotate_uv2en.F |
233 |
ROTATE_UV2EN_RS |
_RS vFldY(1-olx:snx+olx,1-oly:sny+oly,kSize,nsx,nsy) |
./model/src/rotate_uv2en.F |
282 |
ROTATE_UV2EN_RS |
& *( vFldY(i,j+1,k,bi,bj) + vFldY(i,j,k,bi,bj) ) |
./model/src/rotate_uv2en.F |
294 |
ROTATE_UV2EN_RS |
tmpV(i,j) = vFldY(i,j,k,bi,bj) |
./model/src/rotate_uv2en.F |
334 |
ROTATE_UV2EN_RS |
vFldY(i,1,k,bi,bj)=0. |
./model/src/rotate_uv2en.F |
338 |
ROTATE_UV2EN_RS |
vFldY(1,j,k,bi,bj)=0. |
./model/src/rotate_uv2en.F |
342 |
ROTATE_UV2EN_RS |
vFldY(i,j,k,bi,bj) = 0.5 _d 0 |
./model/src/rotate_uv2en.F |
346 |
ROTATE_UV2EN_RS |
vFldY(i,j,k,bi,bj)=vFldY(i,j,k,bi,bj)*maskS(i,j,kk,bi,bj) |
./model/src/rotate_uv2en.F |
355 |
ROTATE_UV2EN_RS |
vFldY(i,j,k,bi,bj) = tmpV(i,j) |
./model/src/rotate_uv2en.F |
358 |
ROTATE_UV2EN_RS |
vFldY(i,j,k,bi,bj)=vFldY(i,j,k,bi,bj)*maskC(i,j,kk,bi,bj) |
./model/src/rotate_uv2en.F |
52 |
ROTATE_UV2EN_RL |
_RL vFldY(1-olx:snx+olx,1-oly:sny+oly,kSize,nsx,nsy) |