Symbol Description Uses
sol_a 5



File Line number Procedure Code
./pkg/seaice/seaice_freedrift.F 135 SEAICE_FREEDRIFT
             sol_a=rhs_a-ATAN2(tmpscal3,tmpscal2)
./pkg/seaice/seaice_freedrift.F 137 SEAICE_FREEDRIFT
             sol_a=0. _d 0
./pkg/seaice/seaice_freedrift.F 142 SEAICE_FREEDRIFT
           uice_cntr(i,j,bi,bj)=uvel_cntr-sol_n*COS(sol_a)
./pkg/seaice/seaice_freedrift.F 143 SEAICE_FREEDRIFT
           vice_cntr(i,j,bi,bj)=vvel_cntr-sol_n*SIN(sol_a)
./pkg/seaice/seaice_freedrift.F 46 SEAICE_FREEDRIFT
      _RL mIceCor, rhs_x, rhs_y, rhs_n, rhs_a, sol_n, sol_a