Symbol Description Uses
pisvel 3



File Line number Procedure Code
./pkg/dic/dic_surfforcing.F 146 DIC_SURFFORCING
              pisvel(i,j)=0.337 _d 0 *wind(i,j,bi,bj)**2/3.6 _d 5
./pkg/dic/dic_surfforcing.F 147 DIC_SURFFORCING
              Kwexch_Pre(i,j,bi,bj) = pisvel(i,j)
./pkg/dic/dic_surfforcing.F 55 DIC_SURFFORCING
      _RL pisvel(1-OLx:sNx+OLx,1-OLy:sNy+OLy)