| Symbol | Description | Uses |
| D1I | 6 |
| File | Line number | Procedure | Code |
| ./pkg/seaice/seaice_solve4temp.F | 100 | SEAICE_SOLVE4TEMP |
_RL D1, D1I |
| ./pkg/seaice/seaice_solve4temp.F | 193 | SEAICE_SOLVE4TEMP |
D1I=SEAICE_dalton*lhSublim*SEAICE_rhoAir |
| ./pkg/seaice/seaice_solve4temp.F | 404 | SEAICE_SOLVE4TEMP |
F_lh(I,J) = D1I*UG(I,J)*(qhice(I,J)-AQH(I,J,bi,bj)) |
| ./pkg/seaice/seaice_solve4temp.F | 420 | SEAICE_SOLVE4TEMP |
& + D1I*UG(I,J)*dqh_dTs(I,J) |
| ./pkg/seaice/seaice_solve4temp.F | 507 | SEAICE_SOLVE4TEMP |
F_lh(I,J) = D1I * UG(I,J)*(qhice(I,J)-AQH(I,J,bi,bj)) |
| ./pkg/seaice/seaice_solve4temp.F | 525 | SEAICE_SOLVE4TEMP |
& + D1I*UG(I,J)*dqh_dTs(I,J)*delTsurf |