| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_wind.F |
143 |
EXF_WIND |
wsLoc(i,j) = 0. _d 0 |
|
./pkg/exf/exf_wind.F |
147 |
EXF_WIND |
wsLoc(i,j) = SQRT(tmp1 + tmp2) |
|
./pkg/exf/exf_wind.F |
156 |
EXF_WIND |
wsLoc(i,j) = tmp4 + tmp1*tmp1 / tmp4 - tmp1 |
|
./pkg/exf/exf_wind.F |
165 |
EXF_WIND |
wspeed(i,j,bi,bj) = wsLoc(i,j) |
|
./pkg/exf/exf_wind.F |
46 |
EXF_WIND |
_RL wsLoc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/exf/exf_wind.F |
67 |
EXF_WIND |
wsLoc(i,j) = 0. _d 0 |
|
./pkg/exf/exf_wind.F |
83 |
EXF_WIND |
wsLoc(i,j) = SQRT(wsSq) |
|
./pkg/exf/exf_wind.F |
84 |
EXF_WIND |
cw(i,j,bi,bj) = uwind(i,j,bi,bj)/wsLoc(i,j) |
|
./pkg/exf/exf_wind.F |
85 |
EXF_WIND |
sw(i,j,bi,bj) = vwind(i,j,bi,bj)/wsLoc(i,j) |
|
./pkg/exf/exf_wind.F |
87 |
EXF_WIND |
wsLoc(i,j) = 0. _d 0 |
|
./pkg/exf/exf_wind.F |
97 |
EXF_WIND |
wspeed(i,j,bi,bj) = wsLoc(i,j) |