| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_getffields.F |
482 |
EXF_GETFFIELDS |
tmpUE(i,j,bi,bj) = 0. _d 0 |
|
./pkg/exf/exf_getffields.F |
609 |
EXF_GETFFIELDS |
& maskc, tmpUE, xx_uwind0, xx_uwind1, xx_uwind_dummy, |
|
./pkg/exf/exf_getffields.F |
619 |
EXF_GETFFIELDS |
CALL ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/exf/exf_getffields.F |
61 |
EXF_GETFFIELDS |
_RL tmpUE(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/exf/exf_getffields.F |
743 |
EXF_GETFFIELDS |
& tmpUE(i,j,bi,bj)=tmpUE(i,j,bi,bj)+ |
|
./pkg/exf/exf_getffields.F |
755 |
EXF_GETFFIELDS |
CALL ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/exf/exf_getsurfacefluxes.F |
121 |
EXF_GETSURFACEFLUXES |
& tmpUE(i,j,bi,bj)=tmpUE(i,j,bi,bj) |
|
./pkg/exf/exf_getsurfacefluxes.F |
180 |
EXF_GETSURFACEFLUXES |
& maskc, tmpUE, xx_tauu0, xx_tauu1, xx_tauu_dummy, |
|
./pkg/exf/exf_getsurfacefluxes.F |
200 |
EXF_GETSURFACEFLUXES |
_EXCH_XY_RL(tmpUE,myThid) |
|
./pkg/exf/exf_getsurfacefluxes.F |
203 |
EXF_GETSURFACEFLUXES |
call ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/exf/exf_getsurfacefluxes.F |
71 |
EXF_GETSURFACEFLUXES |
_RL tmpUE(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
./pkg/exf/exf_getsurfacefluxes.F |
93 |
EXF_GETSURFACEFLUXES |
tmpUE(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_map_forcing.F |
305 |
CTRL_MAP_FORCING |
tmpUE(i,j,bi,bj) = 0. _d 0 |
|
./pkg/ctrl/ctrl_map_forcing.F |
319 |
CTRL_MAP_FORCING |
if (xx_gentim2d_file(iarr)(1:5).EQ.'xx_fe') tmpUE |
|
./pkg/ctrl/ctrl_map_forcing.F |
320 |
CTRL_MAP_FORCING |
& (i,j,bi,bj)=tmpUE(i,j,bi,bj)+xx_gentim2d(i,j,bi,bj,iarr) |
|
./pkg/ctrl/ctrl_map_forcing.F |
329 |
CTRL_MAP_FORCING |
_EXCH_XY_RL(tmpUE,myThid) |
|
./pkg/ctrl/ctrl_map_forcing.F |
331 |
CTRL_MAP_FORCING |
CALL ROTATE_UV2EN_RL(tmpUX,tmpVY,tmpUE,tmpVN, |
|
./pkg/ctrl/ctrl_map_forcing.F |
59 |
CTRL_MAP_FORCING |
_RL tmpUE(1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |