Symbol Description Uses
a10 coefficients in quadratic eqn for T1 4



File Line number Procedure Code
./pkg/thsice/thsice_solve4temp.F 167 THSICE_SOLVE4TEMP
      _RL  a10, b10
./pkg/thsice/thsice_solve4temp.F 290 THSICE_SOLVE4TEMP
      a10 = rhoi*cpIce *hi/(2. _d 0*dt) +
./pkg/thsice/thsice_solve4temp.F 367 THSICE_SOLVE4TEMP
         a1 = a10 - k12*df0dT / (k12-df0dT)
./pkg/thsice/thsice_solve4temp.F 377 THSICE_SOLVE4TEMP
            a1 = a10 + k12