Symbol Description Uses
WIND 4



File Line number Procedure Code
./pkg/bling/bling_fields_load.F 162 BLING_FIELDS_LOAD
             WIND(i,j,bi,bj) = bWght*dicwind0(i,j,bi,bj)
./pkg/bling/bling_ini_forcing.F 79 BLING_INI_FORCING
             WIND(i,j,bi,bj)   = 5. _d 0*maskC(i,j,1,bi,bj)
./pkg/dic/dic_fields_load.F 175 DIC_FIELDS_LOAD
             WIND(i,j,bi,bj) = bWght*dicwind0(i,j,bi,bj)
./pkg/dic/dic_ini_forcing.F 79 DIC_INI_FORCING
             WIND(i,j,bi,bj)   = 5. _d 0*maskC(i,j,1,bi,bj)