File |
Line number |
Procedure |
Code |
./pkg/exf/EXF_FIELDS.h |
231 |
NO PROCEDURE |
COMMON /exfl_wind_r/ wStress, cw, sw, sh |
./pkg/exf/EXF_FIELDS.h |
232 |
NO PROCEDURE |
_RL wStress (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/exf/exf_bulkformulae.F |
328 |
EXF_BULKFORMULAE |
windStress = wStress(i,j,bi,bj) |
./pkg/exf/exf_init_varia.F |
49 |
EXF_INIT_VARIA |
wStress(i,j,bi,bj) = 0. |
./pkg/exf/exf_wind.F |
101 |
EXF_WIND |
wStress(i,j,bi,bj) = 0. _d 0 |
./pkg/exf/exf_wind.F |
156 |
EXF_WIND |
wStress(i,j,bi,bj) = SQRT(usSq) |
./pkg/exf/exf_wind.F |
158 |
EXF_WIND |
cw(i,j,bi,bj) = ustress(i,j,bi,bj)/wStress(i,j,bi,bj) |
./pkg/exf/exf_wind.F |
159 |
EXF_WIND |
sw(i,j,bi,bj) = vstress(i,j,bi,bj)/wStress(i,j,bi,bj) |
./pkg/exf/exf_wind.F |
161 |
EXF_WIND |
wStress(i,j,bi,bj) = 0. _d 0 |
./pkg/exf/exf_wind.F |
179 |
EXF_WIND |
ustar = wStress(i,j,bi,bj)*recip_sqrtRhoA |