| Symbol | Description | Uses |
| a10 | coefficients in quadratic eqn for T1 | 4 |
| File | Line number | Procedure | Code |
| ./pkg/thsice/thsice_solve4temp.F | 176 | THSICE_SOLVE4TEMP |
_RL a10 (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
| ./pkg/thsice/thsice_solve4temp.F | 324 | THSICE_SOLVE4TEMP |
a10(i,j) = rhoi*cpIce *hIce(i,j)/(2. _d 0*dt) + |
| ./pkg/thsice/thsice_solve4temp.F | 489 | THSICE_SOLVE4TEMP |
a1 = a10(i,j) - k12(i,j)*dFlxdT(i,j) / (k12(i,j)-dFlxdT(i,j)) |
| ./pkg/thsice/thsice_solve4temp.F | 503 | THSICE_SOLVE4TEMP |
a1 = a10(i,j) + k12(i,j) |