File |
Line number |
Procedure |
Code |
./pkg/exf/exf_getffields.F |
476 |
EXF_GETFFIELDS |
tmpVY(i,j,bi,bj) = 0. _d 0 |
./pkg/exf/exf_getffields.F |
494 |
EXF_GETFFIELDS |
call ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
./pkg/exf/exf_getffields.F |
502 |
EXF_GETFFIELDS |
vwind(i,j,bi,bj)=vwind(i,j,bi,bj)+tmpVY(i,j,bi,bj) |
./pkg/exf/exf_getffields.F |
55 |
EXF_GETFFIELDS |
_RL tmpVY(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
./pkg/exf/exf_getsurfacefluxes.F |
113 |
EXF_GETSURFACEFLUXES |
tmpVY(i,j,bi,bj) = 0. _d 0 |
./pkg/exf/exf_getsurfacefluxes.F |
134 |
EXF_GETSURFACEFLUXES |
call ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
./pkg/exf/exf_getsurfacefluxes.F |
138 |
EXF_GETSURFACEFLUXES |
CALL EXCH_UV_XY_RL( tmpUX, tmpVY, .TRUE., myThid ) |
./pkg/exf/exf_getsurfacefluxes.F |
140 |
EXF_GETSURFACEFLUXES |
CALL EXCH_UV_AGRID_3D_RL( tmpUX, tmpVY, .TRUE., 1, myThid) |
./pkg/exf/exf_getsurfacefluxes.F |
148 |
EXF_GETSURFACEFLUXES |
vstress(i,j,bi,bj)=vstress(i,j,bi,bj)+tmpVY(i,j,bi,bj) |
./pkg/exf/exf_getsurfacefluxes.F |
61 |
EXF_GETSURFACEFLUXES |
_RL tmpVY(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |