| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_getffields.F |
475 |
EXF_GETFFIELDS |
tmpUX(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 |
501 |
EXF_GETFFIELDS |
uwind(i,j,bi,bj)=uwind(i,j,bi,bj)+tmpUX(i,j,bi,bj) |
|
./pkg/exf/exf_getffields.F |
54 |
EXF_GETFFIELDS |
_RL tmpUX(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/exf/exf_getsurfacefluxes.F |
112 |
EXF_GETSURFACEFLUXES |
tmpUX(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 |
147 |
EXF_GETSURFACEFLUXES |
ustress(i,j,bi,bj)=ustress(i,j,bi,bj)+tmpUX(i,j,bi,bj) |
|
./pkg/exf/exf_getsurfacefluxes.F |
60 |
EXF_GETSURFACEFLUXES |
_RL tmpUX(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |