Symbol Description Uses
uvel_cntr 4



File Line number Procedure Code
./pkg/seaice/seaice_freedrift.F 145 SEAICE_FREEDRIFT
           uice_cntr(i,j,bi,bj)=uvel_cntr-sol_n*COS(sol_a)
./pkg/seaice/seaice_freedrift.F 48 SEAICE_FREEDRIFT
      _RL taux_onIce_cntr, tauy_onIce_cntr, uvel_cntr, vvel_cntr
./pkg/seaice/seaice_freedrift.F 91 SEAICE_FREEDRIFT
           uvel_cntr=HALF*(uvel(i,j,kSrf,bi,bj)+uvel(i+1,j,kSrf,bi,bj))
./pkg/seaice/seaice_freedrift.F 95 SEAICE_FREEDRIFT
           rhs_y= -tauy_onIce_cntr +mIceCor*uvel_cntr