| Symbol | Description | Uses |
| sol_a | 5 |
| File | Line number | Procedure | Code |
| ./pkg/seaice/seaice_freedrift.F | 140 | SEAICE_FREEDRIFT |
sol_a=rhs_a-atan2(tmpscal3,tmpscal2) |
| ./pkg/seaice/seaice_freedrift.F | 142 | SEAICE_FREEDRIFT |
sol_a=0. _d 0 |
| ./pkg/seaice/seaice_freedrift.F | 147 | SEAICE_FREEDRIFT |
uice_cntr(i,j,bi,bj)=uvel_cntr-sol_n*cos(sol_a) |
| ./pkg/seaice/seaice_freedrift.F | 148 | SEAICE_FREEDRIFT |
vice_cntr(i,j,bi,bj)=vvel_cntr-sol_n*sin(sol_a) |
| ./pkg/seaice/seaice_freedrift.F | 45 | SEAICE_FREEDRIFT |
_RL mIceCor, rhs_x, rhs_y, rhs_n, rhs_a, sol_n, sol_a |