File |
Line number |
Procedure |
Code |
./pkg/atm2d/put_ocnvars.F |
100 |
PUT_OCNVARS |
wind(i,j,1,1)= pass_wspeed(i,j) |
./pkg/atm2d/put_ocnvars.F |
102 |
PUT_OCNVARS |
_EXCH_XY_RL(wind , myThid ) |
./pkg/bling/BLING_VARS.h |
10 |
NO PROCEDURE |
& wind, FIce, Silica |
./pkg/bling/BLING_VARS.h |
19 |
NO PROCEDURE |
_RL wind(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/bling/bling_airseaflux.F |
141 |
BLING_AIRSEAFLUX |
wind(i,j,bi,bj) = wspeed(i,j,bi,bj) |
./pkg/bling/bling_airseaflux.F |
146 |
BLING_AIRSEAFLUX |
pisvel(i,j) = 0.337 _d 0 * wind(i,j,bi,bj)**2/3.6 _d 5 |
./pkg/dic/DIC_VARS.h |
13 |
NO PROCEDURE |
& wind, FIce, Silica, Kwexch_Pre |
./pkg/dic/DIC_VARS.h |
19 |
NO PROCEDURE |
_RL wind(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/dic/dic_fields_update.F |
95 |
DIC_FIELDS_UPDATE |
wind(i,j,bi,bj) = surfWSpeed(i,j,bi,bj) |
./pkg/dic/dic_surfforcing.F |
145 |
DIC_SURFFORCING |
pisvel(i,j)=0.337 _d 0 *wind(i,j,bi,bj)**2/3.6 _d 5 |