| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_getffields.F |
485 |
EXF_GETFFIELDS |
tmpVY(i,j,bi,bj) = 0. _d 0 |
|
./pkg/exf/exf_getffields.F |
619 |
EXF_GETFFIELDS |
CALL ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/exf/exf_getffields.F |
627 |
EXF_GETFFIELDS |
vwind(i,j,bi,bj)=vwind(i,j,bi,bj)+tmpVY(i,j,bi,bj) |
|
./pkg/exf/exf_getffields.F |
64 |
EXF_GETFFIELDS |
_RL tmpVY(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/exf/exf_getffields.F |
755 |
EXF_GETFFIELDS |
CALL ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/exf/exf_getffields.F |
763 |
EXF_GETFFIELDS |
vwind(i,j,bi,bj)=vwind(i,j,bi,bj)+tmpVY(i,j,bi,bj) |
|
./pkg/exf/exf_getsurfacefluxes.F |
203 |
EXF_GETSURFACEFLUXES |
call ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/exf/exf_getsurfacefluxes.F |
207 |
EXF_GETSURFACEFLUXES |
CALL EXCH_UV_XY_RL( tmpUX, tmpVY, .TRUE., myThid ) |
|
./pkg/exf/exf_getsurfacefluxes.F |
209 |
EXF_GETSURFACEFLUXES |
CALL EXCH_UV_AGRID_3D_RL( tmpUX, tmpVY, .TRUE., 1, myThid) |
|
./pkg/exf/exf_getsurfacefluxes.F |
217 |
EXF_GETSURFACEFLUXES |
vstress(i,j,bi,bj)=vstress(i,j,bi,bj)+tmpVY(i,j,bi,bj) |
|
./pkg/exf/exf_getsurfacefluxes.F |
74 |
EXF_GETSURFACEFLUXES |
_RL tmpVY(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/exf/exf_getsurfacefluxes.F |
96 |
EXF_GETSURFACEFLUXES |
tmpVY(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_map_forcing.F |
308 |
CTRL_MAP_FORCING |
tmpVY(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_map_forcing.F |
331 |
CTRL_MAP_FORCING |
CALL ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/ctrl/ctrl_map_forcing.F |
339 |
CTRL_MAP_FORCING |
fv(i,j,bi,bj)=fv(i,j,bi,bj)+tmpVY(i,j,bi,bj) |
|
./pkg/ctrl/ctrl_map_forcing.F |
62 |
CTRL_MAP_FORCING |
_RL tmpVY(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |