| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_getffields.F |
492 |
EXF_GETFFIELDS |
tmpUX(i,j,bi,bj) = 0. _d 0 |
|
./pkg/exf/exf_getffields.F |
511 |
EXF_GETFFIELDS |
CALL ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/exf/exf_getffields.F |
518 |
EXF_GETFFIELDS |
uwind(i,j,bi,bj)=uwind(i,j,bi,bj)+tmpUX(i,j,bi,bj) |
|
./pkg/exf/exf_getffields.F |
51 |
EXF_GETFFIELDS |
_RL tmpUX(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nsx,nsy) |
|
./pkg/exf/exf_getsurfacefluxes.F |
114 |
EXF_GETSURFACEFLUXES |
tmpUX(i,j,bi,bj) = 0. _d 0 |
|
./pkg/exf/exf_getsurfacefluxes.F |
136 |
EXF_GETSURFACEFLUXES |
call ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/exf/exf_getsurfacefluxes.F |
140 |
EXF_GETSURFACEFLUXES |
CALL EXCH_UV_XY_RL( tmpUX, tmpVY, .TRUE., myThid ) |
|
./pkg/exf/exf_getsurfacefluxes.F |
142 |
EXF_GETSURFACEFLUXES |
CALL EXCH_UV_AGRID_3D_RL( tmpUX, tmpVY, .TRUE., 1, myThid) |
|
./pkg/exf/exf_getsurfacefluxes.F |
149 |
EXF_GETSURFACEFLUXES |
ustress(i,j,bi,bj)=ustress(i,j,bi,bj)+tmpUX(i,j,bi,bj) |
|
./pkg/exf/exf_getsurfacefluxes.F |
61 |
EXF_GETSURFACEFLUXES |
_RL tmpUX(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |